Hallo Hans_Werner,
>
>
> [0] Test-Makros
>
> Sub Calling
> Dim A,B,C as String
> A= "A" : B = "B" : C = "C"
> Called(A,B,C)
> End Sub
>
> Sub Called(Optional A as String,Optional B as String,Optional C as String)
> MsgBox("A: " & IsMissing(A) & Chr(13) &_
> "B: " & IsMissing(B) & Chr(13) &_
> "C: " & IsMissing(C) & Chr(13))
> End Sub
Der Fehler liegt darin, dass Du den optionalen Variablen "as String"
zuweist. Auch ein leerer Inhalt wird wohl als String interpretiert und
so weitergegeben.
Sub Called(Optional A, Optional B, Optional C)
bringt Dir das gewünschte Ergebnis.
Gruß
Robert
--
Homepage: http://robert.familiegrosskopf.de
LibreOffice Community: http://robert.familiegrosskopf.de/map_3
--
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme?
https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
