Hallo,
ich bin nicht nur neu in diesem Forum, sondern auch ein Neuling in der VBA-Programmierung. Ich hoffe, Ihr seht es mir nach, wenn ich "blöde" Fragen stellen sollte...
Derzeit programmiere ich eine Excel-Adress-Datenbank. Das Formular, um neue Adressen anzulegen, ist bereits fertig. Jeder neue Datensatz erhält hierbei eine fortlaufende Nummer.
Das Formular, bestehende Datensätze zu ändern, ist ebenfalls fast fertig. Mithilfe der fortlaufenden Nummer wird der entsprechende Datensatz in die Userform geladen. Bestimmte Felder können dann hierin geändert und in die Exceltabelle zurückgeschrieben werden. Funktioniert alles prima. Nur eine Sache bekomme ich leider nicht hin, wofür ich Eure Hilfe benötige:
In der Spalte B der Exceldatei stehen Ziffern, hinter denen sich eine Legende verbirgt: z.B: 1 = Basistarif, 2 = Basistarif plus Zusatzpaket 1, etc.
Wenn ich die Daten in die Userform lade, soll nicht die Ziffer (z.B. 1) aus Spalte B, sondern die Bezeichnung (z.B. Basistarif) in der Userform angezeigt werden. Ich könnte mir vorstellen, dass ich das mit der if-Anweisung lösen könnte, weiss aber leider nicht wie
Bisher sieht das so aus:
Private Sub UserForm_Initialize()
'Daten in das Formular laden
Textbox1 = Cells(zeile, 2)
Textbox2 = Cells(zeile, 3)
...
end sub
Textbox1 = Cells(zeile, 2) müsste irgendwie umgeschrieben werden
Ich danke schon mal für Eure Hilfe!
ich bin nicht nur neu in diesem Forum, sondern auch ein Neuling in der VBA-Programmierung. Ich hoffe, Ihr seht es mir nach, wenn ich "blöde" Fragen stellen sollte...
Derzeit programmiere ich eine Excel-Adress-Datenbank. Das Formular, um neue Adressen anzulegen, ist bereits fertig. Jeder neue Datensatz erhält hierbei eine fortlaufende Nummer.
Das Formular, bestehende Datensätze zu ändern, ist ebenfalls fast fertig. Mithilfe der fortlaufenden Nummer wird der entsprechende Datensatz in die Userform geladen. Bestimmte Felder können dann hierin geändert und in die Exceltabelle zurückgeschrieben werden. Funktioniert alles prima. Nur eine Sache bekomme ich leider nicht hin, wofür ich Eure Hilfe benötige:
In der Spalte B der Exceldatei stehen Ziffern, hinter denen sich eine Legende verbirgt: z.B: 1 = Basistarif, 2 = Basistarif plus Zusatzpaket 1, etc.
Wenn ich die Daten in die Userform lade, soll nicht die Ziffer (z.B. 1) aus Spalte B, sondern die Bezeichnung (z.B. Basistarif) in der Userform angezeigt werden. Ich könnte mir vorstellen, dass ich das mit der if-Anweisung lösen könnte, weiss aber leider nicht wie
Bisher sieht das so aus:
Private Sub UserForm_Initialize()
'Daten in das Formular laden
Textbox1 = Cells(zeile, 2)
Textbox2 = Cells(zeile, 3)
...
end sub
Textbox1 = Cells(zeile, 2) müsste irgendwie umgeschrieben werden
Ich danke schon mal für Eure Hilfe!