title image


Smiley Re: Datum über for...next-Schleife in Excel-VBA erhöhen
Hallo Marie,



probiers doch mal so





Sub Test()

Dim xDatum As Date

Dim z As Integer

xDatum = Date

MsgBox xDatum

Range("D1:I1").Select

' verbundene Zellen D1:I1 enthält Datum

ActiveCell.FormulaR1C1 = xDatum

' ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

For z = 1 To 5

ActiveCell.FormulaR1C1 = xDatum + z

Range("D1:I1").Select

' ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

Next z

End Sub





Viele Grüße

Herby



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: