#1 5. November 2012 [VBA] Datum nach Variable in Zellen schreiben Hallo, ich möchte in Excel meine Zellen automatisch befüllen lassen. Sprich wenn ich in einem abgesicherten Worksheet die Jahreszahl eingebe, sollen sich die Zellen A1:A31 mit dem entsprechenden Datum + Tag für dieses Jahr befüllen. Worksheets habe ich Jan - Dez. Gibt es dafür eine Möglichkeit? MfG H5N1 + Multi-Zitat Zitieren
#2 5. November 2012 Zuletzt bearbeitet: 5. November 2012 AW: [VBA] Datum nach Variable in Zellen schreiben Irgendwie ist deine Fragestellung leicht schwammig ausgedrückt aber grundsätzlich kannst du folgendes machen um dir quasi einen Kalender zu erstellen: Code: Dim i Dim anzahlws Dim tageimmonat Dim gJahr gJahr = "2012" ' Hier kannste statt der "2012" auch eine Variable bzw Zelle in einem Worksheet eintragen For anzahlws = 1 To 12 'Anzahl der Worksheets bzw Monate tageimmonat = Day(DateSerial(gJahr, anzahlws + 1, 1) - 1) For i = 1 To tageimmonat ThisWorkbook.Worksheets(anzahlws).Cells(i, 1) = Format(DateSerial(gJahr, anzahlws, i), "DDDD") & ", " & DateSerial(gJahr, anzahlws, i) Next i Next anzahlws Musste natürlich die Variable mit der gewünschten Anzahl der Monate einstellen. Für alle 12 Monate brauchste dann natürlicha auch 12 Worksheets. Das Ergebnis sieht dann für den Monat Februar in Worksheet "2" zb so aus: Code: Mittwoch,01.02.2012 Donnerstag,02.02.2012 Freitag,03.02.2012 Samstag,04.02.2012 Sonntag,05.02.2012 Montag,06.02.2012 Dienstag,07.02.2012 Mittwoch,08.02.2012 Donnerstag,09.02.2012 Freitag,10.02.2012 Samstag,11.02.2012 Sonntag,12.02.2012 Montag,13.02.2012 Dienstag,14.02.2012 Mittwoch,15.02.2012 Donnerstag,16.02.2012 Freitag,17.02.2012 Samstag,18.02.2012 Sonntag,19.02.2012 Montag,20.02.2012 Dienstag,21.02.2012 Mittwoch,22.02.2012 Donnerstag,23.02.2012 Freitag,24.02.2012 Samstag,25.02.2012 Sonntag,26.02.2012 Montag,27.02.2012 Dienstag,28.02.2012 Mittwoch,29.02.2012 Es werden halt immer genau die Anzahl an Zeilen befüllt, wie der Monat Tage hat Bei Rückfragen einfach melden + Multi-Zitat Zitieren
#3 8. November 2012 AW: [VBA] Datum nach Variable in Zellen schreiben Danke funktioniert einwandfrei! Habe nur noch ein paar Sachen abgeändert aber funktioniert weiterhin. Ich bin dir sehr dankbar. + Multi-Zitat Zitieren