uhrzeit per schaltfläche
Ich muss aktuelle Uhrzeit in einer tabelle in verschieden Zellen öfter eingeben,
ich will gerne wissen, ob man es automatisch per ein schaltfläche machen kann, indem man auf eine zelle(z.B. A4) klickt und dann auf schaltfläche klickt, und auf der letzt geklickten zelle (A4)automatisch uhrzeit erscheint.
wenn jemand mir diese code geben kann, wäre ich sehr dankbar.
MFG
Alexx1
Antwort schreiben
Antwort 1 von Hajo_Zi vom 16.12.2019, 18:09 Options
Hallo Alex,
ganz ohne Schaltfläche STRG+Doppelpunkt
Gruß Hajo
Antwort 2 von Alexx1 vom 16.12.2019, 20:04 Options
Hallo Hajo,
danke für deine Antwort, das wäre auch mir sehr nützlich, aber wenn ich auf Str+: drucke, kommt Datum statt Uhrzeit, obwohl ich die format von alle zellen als uhrzeit eingestellt habe, das ändert sich automatisch wenn ich stg+ doppelpunkt drucke.
Hast du noch eine Idee?
Viele Grüße
Alexx1
Antwort 3 von ExAl vom 16.12.2019, 20:15 Options
STRG+Doppelpunkt -> Datum
STRG+SHIFT+Doppelpunkt -> Uhrzeit
Antwort 4 von Hajo_Zi vom 16.12.2019, 20:17 Options
Hallo Alex,
Du hast auf Strg+Punkt gedrückt nict Strg+Doppelounkt (Umschalttaste nicht vergessen)
Gruß Hajo
Antwort 5 von aiuto vom 16.12.2019, 20:18 Options
Hi Alexx1,
Du mußt schon STRG+: eingeben.
Also mit (ctrl|shift|.) Hochstellen/Shift/Umschalten,
denn STRG+. erzeugt das Datum.
mfg
vom Helfer
Antwort 6 von rainberg vom 16.12.2019, 20:19 Options
Hallo Alexx,
die richtige Tastenkombination ist Strg+Shift+Punkt.
Hajo hat vorausgesetzt, dass Du weisst, wie man einen Doppelpunkt erzeugst.
Gruß
Rainer
Antwort 7 von Alexx1 vom 17.12.2019, 13:57 Options
Hallo an Alle,
Vielen Dank für die Antworten,
Das stimmt, ich habe wirklich vergessen, dass ich auch schift auch drucken, damit Doppelpunkt zu erzeugen, ich lache selbst darüber.
erstesmal das hat mir sehr geholfen, bis ich diese code finde, weil ich in einem laden arbeite, w ich mit aktueler zeit mich die ganzen tag beschäftige.
Schöne Grüße und vielen Dank
Alexx1
Antwort 8 von aiuto vom 17.12.2019, 14:15 Options
Hi Alexx1,
hier der Code:
Private Sub CommandButton1_Click()
If Selection.Cells.Count > 1 Then Beep: Exit Sub
Selection.Cells.Value = Format(Time, "Long Time")
End Sub
mfg
vom Helfer
Antwort 9 von Alexx1 vom 17.12.2019, 19:20 Options
Hallo Helfer,
danke dir für diese code, das war was ich suchte, und funktioniert super.
Vielleicht kannst du mir noch einmal helfen, und zwar noch ein code, wo ich die Inhalte der markierte Zellen Lösche.
dann wird mein Programm fertig.
Viele Grüße
Alexx1
Antwort 10 von aiuto vom 17.12.2019, 19:34 Options
Hi Alexx1,
Jetzt wird's schwieriger:
Zitat:
und zwar noch ein code, wo ich die Inhalte der markierte Zellen Lösche.
Event.
Selection.clear
mfg
vom Helfer
Antwort 11 von Alexx1 vom 18.12.2019, 17:24 Options
Hallo Helfer,
Vielen Dank nochmal, du bist wirklich ein " Helfer.
Jetzt habe ich mein Programm fertig.
Viele Grüße an euch Alle.
Alexx1