Daten übertragen
12.01.2017 07:38:58
Frank
In meiner Tabelle "Hilfstabelle" steht in Spsalte 5 ab Zeile 2 untereinander das Datum fortlaufend vom 01.01.2017 - 31.-12.2017.
Nun möchte ich gern mit Klick auf einen Button, nur immer das Datum aus Januar in Tabelle "Jan" eintragen.
Mein Versuch:
For lng = 2 To 8767
If Month(Sheets("Hilfstabelle").Cells(lng, 5)) = 1 Then
Sheets("Jan").Cells(lng, 53) = Sheets("Hilfstabelle").Cells(lng, 5)
End If
Next lng
Dieser endet aber am 31.01.2017. Wie bekomme ich auch den Januar der anderen Jahre mit übertragen? Bitte um Hilfe und schon jetzt Danke!
L.G. Frank H.
Anzeige