Ereignis mit Commandobutton
22.09.2006 16:15:39
thomas
Ich möchte einen Commandobutton so programmieren, dass, wenn ich einmal auf ihn
drücke dieser Befehl ausgeführt wird:
Dim x As Integer
Dim y As Integer
x = ActiveCell.Column
y = ActiveCell.Row
ActiveCell.FormulaR1C1 = "F"
ActiveCell.Interior.ColorIndex = 36
Cells(y, x + 1).Select
Drücke ich zweimal auf den gleichen Button, so soll jener Befehl ausgeführt werden
Selection.Formula = "F"
Selection.Interior.ColorIndex = 36
Wer kann mir in diesen Fall helfen?
Vielen Dank!!
Thomas