Hallo allerseits,
ich nochmal mit dem Versuch, meine Datenbank hinsichtlich Benutzerführung mehrsprachig zu machen. Ich habe jetzt folgendes zur Änderung der Beschriftung der Schalter in meinem Text stehen:
Dim frm As Form, ctl As Control
Dim Kriterium, Feld As String
For Each frm In Application.Forms
For Each ctl In frm.Controls
Kriterium = „[TextNr] = " & Chr(34) & ctl.Name & Chr(34)
ctl.Caption = DLookup(“[English]", „Texte“, Kriterium)
Next ctl
Next frm
End Sub
Die Tabelle Texte hat folgende Felder:
[TextNr] ist die exakte Bezeichnung des jeweiligen Feldes
[Menü] ist der Name des Formulars, in dem das Feld erscheint
[Deutsch] ist die deutsche Version
[English] ist die englische Version
Problem: Dummerweise haben manche Schalter in unterschiedlichen Formularen gleiche Namen. Somit müsste ich den DLookup-Befehl auf zwei Felder ([TextNr] und [Menü]) verweisen lassen. Geht das ?
Danke im voraus!
Gruß
Sven