Dictionary auslesen

[maninweb]

Hallo,

ich würde bei multilanguage tools ja eher empfehlen, den User die Sprache auswählen zu lassen und nicht den Weg über LanguageID zu gehen.
Zudem würde ich eine Liste der unterstützten Sprachen + Übersetzungen in Spalten anlegen und dann per Formel in einer Ergebnisspalte die
entsprechenden Texte gemäß Auswahl des Users ermitteln. Und diese Spalte wäre dann das, was Du einliest.

Gruß

[Lutz Fricke]

Hallo maninweb,

warum der Weg über die Formel und dann einlesen? Ich verstehe den Sinn hinter dieser Kostruktion nicht.

Gruß,
Lutz

[maninweb]

Hallo,

weil der Bezug dann die Auswahl des Users wäre. Bspw. liesse sich per Formel auch eine Standardsprache für unübersetzte
Texte definieren. Zudem lässt es sich bspw. um neue Sprachen erweitern, ohne den Code anzufassen. Insgesamt ist das
aber ein Vorschlag. Du musst es nicht so machen.

Gruß

[snb]

Code:

Private Sub Workbook_Open()
    sn = Tabelle1.UsedRange
    y = Application.Match(Application.LanguageSettings.LanguageID(2), Application.Index(sn, 2), 0)
   
    MsgBox sn(3, y)
    MsgBox sn(4, y)
    MsgBox sn(5, y)
    MsgBox sn(6, y)
End Sub