Office: Application.GetSaveAsFilename, Return:=Falsch, andere Sprachversionen?

Hallo,

ich habe eine Funktion, die mir den Dateinamen oder False zurückgibt zum Datei speichern.
Gibt es andere Sprachversionen von False, wie im Deutschen Falsch, oder ist Deutsch die einzige Ausnahme?
Mir ist unbekannt, welche Sprachversion der Anwender benutzt. Tante Google schweigt sich dazu aus.

Aufruf über:
Code:

Funktion mit Fehlerprüfung:
Code:

:)

 

Hallo Ralph,

es war nicht anzunehmen, dass deutsch als einziges übersetzt sein sollte.

So ist auch hier der Beweis dazu, dass es auch auf anderen Sprachen wie französisch = faux übersetzt ist.

FALSCH

viele Grüße
Karl-Heinz

 

Hallo!

Versuch es mal mit: If varFileName = 0
Null ist auch nichts. *wink.gif*

Gruß, René

 

Hallo Ralf,

If varFileName False Then

ist in jeder Sprache richtig. False ist eine Konstante in VBA und VBA ist in allen Sprachen englisch.

 

In welchem Fall wäre der Retun Wert von GetSaveAsFilename denn vom Type Boolean? Doch nur dann, wenn auf Abbrechen gedrückt wurde. Und dann ist der Wert False und er kann nur False sein.

Oder sehe ich da was falsch?

Googel sagte z.B.
https://stackoverflow.com/a/48459556/6600940

 

Hallo,

zuallererst: Nepumuk hat natürlich recht ;-). mumpel auch, da 0 = False.
Aber: if not a then geht nicht, da ein String des Dateinamens nicht in Boolean konvertiert werden kann, LZF 13.

Was mich aber wundert, da ich das nicht das erste Mal nutze und bei der Prüfung immer auf eine Miene lief, komisch, na egal!

zum Testen:
Code:

In der deutschen Excel-Version zeigt ein Mouseover auf a Falsch, nicht "Falsch". Das wird in den anderen Sprachen evtl. auch so sein, bspw. französisch Faux.

@volti: das gilt wohl (nur?) für Formeln, bzw. worksheetfunction.false().

@Warkings: korrekt. Den Beitrag hatte ich auch gefunden, aber den Satz nicht zur Kenntnis genommen. The only time vSavename is a Boolean is when the user cancels, so this approach doesn't need to know how to say False in the user's language.

Danke euch!

 

Und daher sollte man nach Möglichkeit immer die Konstante nehmen, da 0 in allen Sprachen 0 ist.

 

wieder was gelernt! *Smilie

 

Hallo,

Nur nochmal als Zusammenfassung ...

alles was du in deiner Function fcGetSaveAsFilenameWebDAV zwischen
''' Fehlerbehandlung
und
''' Fehlerbehandlung ende
stehen hast, kannst du auch löschen.
Die Function gibt entweder den Boolean False oder einen FullPath zurück ... sonst nichts ...

Warum man das auslagern muss, leuchtet mir auch nicht ein.

Sabina

 

Hallo Sabina,

natürlich, aber ich reduziere die Function erstmal, solange ich noch entwickle.
So ist sie erstmal. Case "Error" lass ich mal noch drin, falls ich einen Fehler im Code mache.
WebDAV habe ich rausgenommen, eine Function = eine Function.
Auch versuche ich sauber zu programmieren.

Code:

 

Das ist ja süß *biggrin.gif*
Code:

 

wenn's mal schnell gehen muss *entsetzt
Code:

 

Das ist genauso süß *grins *biggrin.gif* *biggrin.gif*
Und Vorsicht, das wird ja evtl. mal boolean, nicht vergessen während der Laufzeit umzubenennen :ROTFL:

 

Hallo Ralph,

@volti: das gilt wohl (nur?) für Formeln, bzw. worksheetfunction.false().

Mal abgesehen davon, dass ich das nicht verwenden würde, sondern so wie die anderen es angeführt haben (und es ging mir ja auch nur um die Klärung der Begrifflichkeiten), gilt das nicht nur für Formeln.

Da es ein Varianttyp ist funktioniert auch dieses hier (speziell für deutsch):
If strFilename = "Falsch" Then MsgBox "Abbruch"

viele Grüße
Karl-Heinz

 

Hallo Karl-Heinz,

ich korrigiere dich ungern ... *wink.gif*

da im Code steht :

Dim strFilename [As Variant]

Wird nur ... und ausschließlich ... als Rückgabe des Dialogs, zu prüfen sein ...

If strFilename = False Then MsgBox "Abbruch"

NIEMALS (!!!) deine Variante.
Das kriegst du nur fertig, wenn du schreibst ...

Dim strFilename As String