Hallo,
ich habe mir eine Code erstellen lassen, weiß aber nicht ob es klar ist dass am Ende des Monats auf die nächste Zeile/nächster Monat übertragen wird.
Select Case Monat
Case 7 'Zeile 14
zeile = 14
Tabelle1.Cells(zeile, SpalteDatum) = Eintrag
Tabelle1.Cells(zeile, SpalteZeit).Value = ZeitinStunden
Tabelle1.Cells(zeile, SpalteAnzahl).Value = Anzahl
Case 8 'Zeile 15
zeile = 15
Tabelle1.Cells(zeile, SpalteDatum) = Eintrag
Tabelle1.Cells(zeile, SpalteZeit).Value = ZeitinStunden
Tabelle1.Cells(zeile, SpalteAnzahl).Value = Anzahl
Case 9 'Zeile 16
zeile = 16
Tabelle1.Cells(zeile, SpalteDatum) = Eintrag
Tabelle1.Cells(zeile, SpalteZeit).Value = ZeitinStunden
Tabelle1.Cells(zeile, SpalteAnzahl).Value = Anzahl
Danke und Gruß
Marco