Datum einer Zelle in Excel VBA zuweisen

Question

Ich versuche gerade, das aktuelle Datum in eine Zelle durch Excel VBA Makro eingeben.

Folgendes ist der Code für das gleiche.

Cells(i,j).value = Format(Date, "mm-dd-yyyy") 

Its me

Anwendungs ​​definiert oder Objekt definiert Fehler geben

Answer 1

Cells(i,j).value = Format(Now, "mm-dd-yyyy") 

Answer 2

Ihr Code schön scheint. Das Problem besteht jedoch wahrscheinlich darin, dass Sie das Active Sheet nicht deklarieren. Oder was sind die Werte von i und j:

debug.print i; j 
ActiveSheet.Cells(i,j).value = Format(Date, "mm-dd-yyyy") 

oder

Worksheets(1).Cells(i,j).value = Format(Date, "mm-dd-yyyy") 

ein wenig über die Range-Objekt Siehe hier: https://msdn.microsoft.com/en-us/library/office/ff838238.aspx