Zellenansprache
Tine
Ich habe eine ComboBox. Je nach Listenauswahl
wird in einer Zelle ein, dem jeweiligen
Listenwert zugeordneter Wert ausgegeben.
So funktioniert es:
Private Sub ComboBox1_Change()
If ComboBox1.ListIndex = 0 Then
Cells(1, 1).Value = " Ausgabe 0"
End If
If ComboBox1.ListIndex = 1 Then
Cells(1, 1) = "Ausgabe 1"
End If
If ComboBox1.ListIndex = 2 Then
Cells(1, 1).Value = "Ausgabe 2"
End If
End Sub
Wie schafft man es aber, statt den Wert
wie z.B. "Ausgabe 1" einen Verweis auf
eine Zelle der Arbeitsmappe zu basteln.
So bräuchte man bei Bedarf einfach den
Inhalt dieser Zelle ändern.
ich dachte es ginge so:
If ComboBox1.ListIndex = 2 Then
Cells(1, 1).Value = "Tabelle1!A1"
End If
Leider funktioniert dies nicht. auch andere
Varianten führten nicht zum Erfolg.
Vielen Dank für Eure Hilfe!
Tine
Anzeige