Makro erstellen(Zeiteingabe)
Hallo ihr vorm PC,
ich habe keine Ahnung von Makros und möchte sie trotzdem nutzen. Ich möchte über ein Makro das aktuelle Datum und die aktuelle Zeit in eine markiertes Zelle eingeben.
Die Zeit soll sich aber nicht später aktualisieren!
Ich arbeite mit Office 2003 und wenn das ohne Makro geht bin ich auch nicht böse.
Schon jetzt Danke
Ulle
Antwort schreiben
Antwort 1 von Saarbauer vom 31.10.2020, 18:14 Options
Hallo,
hier ein Makro
Sub Makro1()
'
' Makro1 Makro
' Makro am 31.10.2008 aufgezeichnet
'
ActiveCell.FormulaR1C1 = "=NOW()"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub
Es schreibt die Daten in eine angewählte Zelle.
Gruß
Helmut
Antwort 2 von Ulle-gt5 vom 31.10.2020, 18:39 Options
Hallo Helmut,
es funktioniert einwandfrei.
Danke und trotzdem bleiben Makros immer ein Rätzel für mich.
Schönen Abend noch
Ulle
Antwort 3 von rainberg vom 31.10.2020, 18:39 Options
Hallo Ulle,
warum ein Makro?
Strg+. (Punkt) fügt das aktuelle Datum ein
Strg+Shift+. (Punkt) fügt die aktuelle Zeit ein
Gruß
Rainer
Antwort 4 von Saarbauer vom 31.10.2020, 18:43 Options
hallo @ rainberg,
was neues gelernt.
Gruß
Helmut
Antwort 5 von Ulle-gt5 vom 01.11.2020, 13:39 Options
Hallo ihr,
danke für euere Hilfe, ist alles Super.
Aber kann mann soetwas nicht auch Nachlesen und wenn, wo?
Gruß
Ulle
Antwort 6 von rainberg vom 01.11.2020, 15:35 Options
Hallo Ulle,
Zitat:
Aber kann mann soetwas nicht auch Nachlesen und wenn, wo?
hier gilt die Devise selbst ist der/die Mann/Frau.
Es gibt zwei Wege:
- Bücher kaufen und lesen (dabei werden andere reich und Du nicht viel schlauer, da Du meisten nicht das findest, was Du suchst)
- nutze die Excelforen und diverse Excelseiten im Internet, Google wird Dir dabei behilflich sein.
Für beide Wege ist natürlich ein gewisses Mass an Eigeninitiative erforderlich und der feste Wille, etwas lernen zu wollen.
Gruß
Rainer
Antwort 7 von Ulle-gt5 vom 01.11.2020, 17:34 Options
Hallo Rainer,
ich bin so froh das es Dich gibt!
Diese zwei Wege bin ich schon gegangen und hab mich verlaufen, nein ich habe ja immer Hilfe bekommen.
Ich möchte eigentlich nur den Aufbau von Makros verstehen?
Nutzen tue ich sie, aber begreifen wollte ich sie auch.
Gruß
Ulle
Antwort 8 von Saarbauer vom 01.11.2020, 18:22 Options
Hallo
Sub Makro1() -> Makroname (änderung möglich, durch überschreiben)
' -> Alle Zeilen mit ' sind anmerkungen, können auch gelöscht werden, ich nutze das ' auch wenn ich Tests mit verschiedenen Wegen teste, da ich dadurch die Zeile nicht löschen muss
' Makro1 Makro
' Makro am 31.10.2008 aufgezeichnet
'
ActiveCell.FormulaR1C1 = "=NOW()" -> Schreibe in die Aktive Zelle "=Jetzt()"
Selection.Copy -> Kopieren
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= False, Transpose:=False -> Inhalt einfügen Werte
End Sub -> Ende des Makros
Ich hoffe es hilft weiter
Gruß
Helmut