msdoc old:programmieren:excel https://www.mtacs.de/ 2026-04-11T08:17:24+00:00 msdoc https://www.mtacs.de/ https://www.mtacs.de/lib/tpl/dokuwiki/images/favicon.ico text/html 2023-01-11T19:29:48+00:00 Anonymous (anonymous@undisclosed.example.com) old:programmieren:excel:kalender https://www.mtacs.de/doku.php?id=old:programmieren:excel:kalender&rev=1673465388&do=diff VBA-Script Option Explicit Sub Kalender() Dim jahr As Integer Dim monat As Integer Dim tag As Integer Dim x As Integer jahr = InputBox("Welches Jahr?") Range("A1:BI33").ClearContents Range("A1:BI33").Interior.ColorIndex = xlColorIndexNone 'Range("A2:BI33").Interior.ColorIndex = 5 Range("A1:BI33").Font.Size = 6 Range("A1:BI33").Font.Name = "Arial" 'Range("A1:BI33").Font.ColorIndex = 3 Range("A1:BI33").HorizontalAlignment = xlCenter Range("A1:BI33").VerticalAlignment = xlCenter Range("A1:BI1"…