OpenOffice.cz - web věnovaný kancelářským balíkům OpenOffice.org

kamlan

Člen

Registrace: 15. 9. 2016

Příspěvků: 368

Basic: Chyba funkce InStr [VYŘEŠENO]

Sub error_InStr
	'msgbox InStr("hello","E") 'OK
	msgbox InStr("hello","E",0) 'chyba
End Sub

Makro mi udělá chybu "Činnost nepodporována. Neplatné volání procedury."

Chyba se objevuje i když nainstaluji jiné verze Libre včetně portable verze (6.2.6.1 a testováno i na 6.3.0.4, 6.2.5.2; či portable 6.2.4.1  5.4.7.2).
Win 10 Professional 64b. Ještě jsem si vzpomněl že mám v šuplíku starej laptop a chyba je i na Win 7.

Dle Nápovědy by ten třetí parametr měl fungovat
https://help.libreoffice.org/6.3/cs/tex … _id3155934

Funguje to někomu na linuxu nebo též hází chybu?

Editoval kamlan (13. 8. 2019 15:46:11)

neutr

Člen

Registrace: 8. 3. 2007

Příspěvků: 3,435

Re: Basic: Chyba funkce InStr [VYŘEŠENO]

Otestujte toto :

Sub ExampleInStr
  Print InStr("CBAABC", "abc")       '4 default to case insensitive
  Print InStr(1, "CBAABC", "b")      '2 first argument is 1 by default
  Print InStr(2, "CBAABC", "b")      '2 start with second character
  Print InStr(3, "CBAABC", "b")      '5 start with third character
  Print InStr(1, "CBAABC", "b", 0)   '0 case-sensitive comparison
  Print InStr(1, "CBAABC", "b", 1)   '2 case-insensitive comparison
  Print InStr(1, "CBAABC", "B", 0)   '2 case-sensitive comparison
End Sub

     U mne to chodí. Kód jsem vzal u Andy Pitonyaka - zpracovávám to tak jsem nemusel dlouho hledat :-)

---

Moje e-mailová adresa
Pokud je Váš problém vyřešen, označte prosím svůj příspěvek za "VYŘEŠENÝ"
Zlepšíte orientaci při vyhledávání řešení JAK OZNAČIT TÉMA ZA VYŘEŠENÉ

kamlan

Člen

Registrace: 15. 9. 2016

Příspěvků: 368

Re: Basic: Chyba funkce InStr [VYŘEŠENO]

Super, chodí :-).
Takže jde o to, že když chci zadat nepovinný poslední parametr tak musím zadat i ten první nepovinný parametr. To mě vskutku nenapadlo :-). Díky.