mehre Befehle in einer Clickanweisung
30.05.2013 11:46:40
Jürgen
stehe gerade etwas auf dem Schlauch.
Ich habe eine TextBox / eine Combobox / eine Checkbox
so nun soll wenn ich in der Combobox eine Auswahl treffe die in Tabelle1.range D1 den Wert dort hinschreiben und die Checkbox auf false setzen.
Wenn ich nun in der Checkbox einen Haken setze soll in der Combobox dort Wert aus D1 gesetzt werden und in E2 das Value von der Checkbox
Leider muss ich immer sowohl Combobox und Checkbox die Auswahl zweimal treffen beim damit es genommen wird.
also wenn z.B. ich bei der Checkbox Klicke wird die Anzeige der Combobox richtig geändert aber erst beim zweiten klick der Haken gesetzt - umgekehrt auch so bei der Combobox.
Private Sub ComboBox1_Change()
Sheets("Tabelle1").Range("G2") = ComboBox1.Value
Sheets("Tabelle1").Range("E2") = Falsch
CheckBox1.Value = false
End Sub
Private Sub CheckBox1_Click()
ComboBox1.Value = Sheets("Tabelle1").Range("D1")
Sheets("Tabelle1").Range("E2") = CheckBox1.Value
End Sub
was mach ich falsch
Danke schon im Voraus