commandbutton drücken und zahl in zelle einfügen

...komplette Frage anzeigen

1 Antwort

Hallo Kenji,

Mit einem Doppelklick kommst du zum Codefenster, indem nun eine Private-Sub angelegt sein müsste. Dort hinein schreibst du folgenden Code:

Tabelle1.Range("A1") = 12

Fettich!!

Grüsse

Higlav

Iamiam 03.08.2013, 22:37

oder, wenn Du die Zelle vorher anklicken kannst: Activecell.value = 123

oder möchtest Du beide Zahlen mit EINEM Button für zwei verschiedene Zellen erledigen? Sub ...dem Button zugewiesener Makroname, zB ZWEI_ZAHLEN()... if isempty(Range("A2")) then
'gleichbedeutend: if Range("A2") = "" then
Range("A2").value =123.4
else
Range("A3").value = 234.5
End if
'das .value könnte man weglassen, ich schreibs der Eindeutigkeit wegen immer dazu
End Sub

1

Was möchtest Du wissen?