Makro schreib Problem Excel - Beitrag #3 - Post 610048 - Computer Hardware Forum - TweakPC -

[EID]-Mr.GiZMO · 04.03.2009, 14:03

Code:

Sub Dates()
Dim Startzeile As Integer
Dim Startspalte As Integer
Dim AnzahlTage As Integer

' hier definieren
Startzeile = 1
Startspalte = 1
AnzahlTage = 27


For i = 0 To AnzahlTage
    heute = Date + i
    Cells(Startzeile, Startspalte) = heute
Next i
End Sub

Grüße.

€ Oha... neuer Post dazwischen... nicht gesehen.
Ich guck mal, ob ich das schaffe.

04.03.2009, 14:03	#3 (permalink)
[EID]-Mr.GiZMO semi-diabolisch Registriert seit: 12.09.2005 Beiträge: 2.922	AW: Makro schreib Problem Excel Code: Sub Dates() Dim Startzeile As Integer Dim Startspalte As Integer Dim AnzahlTage As Integer ' hier definieren Startzeile = 1 Startspalte = 1 AnzahlTage = 27 For i = 0 To AnzahlTage heute = Date + i Cells(Startzeile, Startspalte) = heute Next i End Sub Grüße. € Oha... neuer Post dazwischen... nicht gesehen. Ich guck mal, ob ich das schaffe.
	Geändert von [EID]-Mr.GiZMO (04.03.2009 um 22:14 Uhr)