Hallo an alle Experten,
ich habe folgenden Wunsch.
Momentan habe ich eine Excel-Datei in der ich die Arbeitszeit erfasse.
Dies klappt auch ganz gut, ich hätte nun gerne falls möglich, einen Automatismus der Zeiterfassung, sprich wenn ich morgens den Rechner starte, sich im Autostart die Datei öffnet, automatisch die Zeit eingetragen wird und wenn die Datei geschlossen wird, wobei zu bedenken ist das ein Rechner auch immer wieder gerne mal neu gestartet werden möchte, noch mal die Zeit als Arbeitsende eingetragen wird. Meine Datei ist wie folgt aufgebaut.
In den Zellen A,I,Q,Y,AG,AO,AW,BE,BM,BU,CC und CK habe ich das Datum im Format TTT.TT.MM ab der 4.Zelle, also in A4 Di.01.01.08 bis A34 Do.31.01.08, in I4 Fr.01.02.08 bis I32 Fr.29.02.08 usw…
Jeweils in der Zelle rechts daneben kommt nun die Startzeit hinein und noch eine weitere Zelle daneben die Endzeit, jeweils im Format hh:mm.
Nun meine Frage, ist sowas realisierbar?
Bin für eure Antworten dankbar.
LG und ein schönes WE
Jürgen
Zeiterfassung Nachtrag Korrektur
Hallo noch mal,
ist mir gerade beim lesen aufgefallen, muss natürlich in den Spalten, statt Zellen heißen.
Sorry, wer seine eigene Vorschau zum Artikel lesen kann, ist meist im Vorteil. 
Hallo an alle Experten,
ich habe folgenden Wunsch.
Momentan habe ich eine Excel-Datei in der ich die Arbeitszeit
erfasse.
Dies klappt auch ganz gut, ich hätte nun gerne falls möglich,
einen Automatismus der Zeiterfassung, sprich wenn ich morgens
den Rechner starte, sich im Autostart die Datei öffnet,
automatisch die Zeit eingetragen wird und wenn die Datei
die tagsüber im Hintergrund einfach nur geöffnet bleibt,
geschlossen wird, wobei zu bedenken ist das ein Rechner auch
immer wieder gerne mal neu gestartet werden möchte, noch mal
die Zeit als Arbeitsende eingetragen wird. Meine Datei ist
wie folgt aufgebaut.
In den Zellen A,I,Q,Y,AG,AO,AW,BE,BM,BU,CC und CK habe ich das
Datum im Format TTT.TT.MM ab der 4.Zelle, also in A4
Di.01.01.08 bis A34 Do.31.01.08, in I4 Fr.01.02.08 bis I32
Fr.29.02.08 usw…
Jeweils in der Zelle rechts daneben kommt nun die Startzeit
hinein und noch eine weitere Zelle daneben die Endzeit,
jeweils im Format hh:mm.
Nun meine Frage, ist sowas realisierbar?
Bin für eure Antworten dankbar.
LG und ein schönes WE
Jürgen
Hoffe mal ich habe jetzt alles richtig gesehen.
Jürgen
Dies klappt auch ganz gut, ich hätte nun gerne falls möglich,
einen Automatismus der Zeiterfassung, sprich wenn ich morgens
den Rechner starte, sich im Autostart die Datei öffnet,
automatisch die Zeit eingetragen wird und wenn die Datei
geschlossen wird, wobei zu bedenken ist das ein Rechner auch
immer wieder gerne mal neu gestartet werden möchte, noch mal
die Zeit als Arbeitsende eingetragen wird. Meine Datei ist
wie folgt aufgebaut.
In den Zellen A,I,Q,Y,AG,AO,AW,BE,BM,BU,CC und CK habe ich das
Datum im Format TTT.TT.MM ab der 4.Zelle, also in A4
Di.01.01.08 bis A34 Do.31.01.08, in I4 Fr.01.02.08 bis I32
Fr.29.02.08 usw…
Jeweils in der Zelle rechts daneben kommt nun die Startzeit
hinein und noch eine weitere Zelle daneben die Endzeit,
jeweils im Format hh:mm.
Hi Jürgen,
in ein Standard-Modul:
Option Explicit
'
Sub Zeit()
Dim Zei, Spa
With Worksheets("Tabelle1").Cells(Day(Now) + 3, (Month(Now) - 1) \* 8 + 1)
If .Offset(0, 1) = "" Then
.Offset(0, 1) = Format(Time, "hh:mm")
Else
.Offset(0, 2) = Format(Time, "hh:mm")
End If
End With
End Sub
in „DieseArbeitsmappe“:
Option Explicit
'
Private Sub Workbook\_Open()
Call Zeit
End Sub
'
Private Sub Workbook\_BeforeClose(Cancel As Boolean)
Call Zeit
End Sub
Gruß
Reinhard
Hallo Reinhard,
gaaanz tief verbeug und tausend Dank.
Muss mich mal in naher Zukunft, falls es die Zeit erlaubt ernsthaft mit der Welt der Makros beschäftigen.
Ich bin extrem überrascht wie schnell Du Lösungen anbietest, echt beeindruckend.
Kannst Du mir einen Tipp geben, was ich zum Einstieg am besten gebrauchen kann, vielleicht das, was auch Dir geholfen hat?
Noch mal vielen Dank!
LG
Jürgen
Kannst Du mir einen Tipp geben, was ich zum Einstieg am besten
gebrauchen kann, vielleicht das, was auch Dir geholfen hat?
Hi Jürgen,
mir half/hilft sehr, in Excelforen mitzulesen, zu probieren die Anfragen zu lösen, die Lösungen versuchen zu verstehen.
Weil die Anfragen praxisnäher sind als Beispiele in Büchern.
Wichtig sind anfangs nur relativ wenige Dinge. Schleifen wie While, Do Loop usw. sowie If-Then,Elsi If usw. müssen klar sein.
Dann der Makrorekorder, einfach mal was aufzeichnen, wie du z.B. Zelle A1 gelb färbst. Schauen wie der Code aussieht, schauen was die Hilfe zu einzelnen Befehlen sagt.
In diesen dann eine Schleife einbauen, um A1 bis A12 zu färben.
Dann abzuändern in Färbung von G12:G27…
So habe ich das Stück für Stück gelernt.
Bücher für Anfänger kann ich nicht empfehlen weil ich keine kenne.
Ich habe 4 Bücher zu Vba, aber die verstauben meist.
Leider gab es hier keine Resonanz sonst wüßten „echte“ Anfänger wie sie überhaupt mit Makro starten, Projekt habe ich eingestellt.
http://www.wer-weiss-was.de/cgi-bin/forum/showarticl…
Gruß
Reinhard