questionmark93
Goto Top

Excel - Aktuellen Monat Markieren

Hallo Leute,

Ich habe da mal eine Frage:

Und zwar wie kann ich den aktuellen Monat automatisch farbig markieren?
Bisher habe ich immer diese zwei blauen "Balken" vergrößert bzw verkleinert
und die rote Markierung hin und her geschoben... (siehe Bild)

d38f04c10148b280048866f861fb1c1a

Ich bin mir sicher das geht auch automatisch oder per Button oder so =)
Es sollte halt nur den aktuellen Monat markieren (Formatierungen, und farbige
Hintergründe beibehalten)

Vielen Dank für die Antworten schon mal face-smile

Content-ID: 249414

Url: https://administrator.de/forum/excel-aktuellen-monat-markieren-249414.html

Ausgedruckt am: 22.12.2024 um 16:12 Uhr

sysinfo
sysinfo 17.09.2014 um 10:46:04 Uhr
Goto Top
Hallo Questionmark93 (komischer Name),

wenn ich das Bild als Grundlage nehme, so könntest Du das mit diesem Makro erledigen:

Public Sub monatmarkieren()
Dim Monat As Integer
Dim Monatstring As String
Dim AktMonat As String
Monatstring = "CDEFGHIJKLMN"
Monat = Month(Date)
AktMonat = Mid(Monatstring, Monat, 1)
Range(AktMonat & "25", AktMonat & "55").Select
End Sub

In dieser Zeile:

Range(AktMonat & "25", AktMonat & "55").Select

wird der Bereich markiert. Da ich dein Ende nicht kenne, habe ich in diesem Beispiel die Zeile 55 als Ende angenommen. Ich weiß nicht ob das Ende fest steht oder unterschiedlich ist. Wenn es unterschiedlich ist, dann musst du erst die Letzte Zeile ermitteln.

Gruß

Stephan
colinardo
Lösung colinardo 17.09.2014, aktualisiert am 29.09.2014 um 11:15:20 Uhr
Goto Top
Moin QUestionmark93,
noch einfacher geht es mit einer bedingten Formatierung. Siehe Demo-Sheet. Bereits bestehende Formatierungen bleiben dabei natürlich erhalten, es wird nur jeweils ein roter Rand um die Spalte des aktuellen Monats gezogen. Dafür müssen nur die Monatsbeschriftung als Datum umformatiert werden (MMM siehe Demosheet).

Grüße Uwe
sysinfo
sysinfo 17.09.2014 um 11:49:51 Uhr
Goto Top
Ja das stimmt. Ich bin von selektieren ausgegangen. Wer lesen kann ist eindeutig im Vorteil face-wink
Questionmark93
Questionmark93 26.09.2014 um 13:36:20 Uhr
Goto Top
geht leider nicht =/

8454c5dc16d7b4bcefe2e35df3be87a3
colinardo
Lösung colinardo 26.09.2014, aktualisiert am 29.09.2014 um 11:15:08 Uhr
Goto Top
siehe Demosheet , geht doch, wenn man meine Hinweise im Sheet beachtet und die Monate entsprechend als Datum formatiert face-wink

du musst den Verweis natürlich an deine Monatszellen anpassen !! Bei dir wäre das C$24. Das hast du laut deinem Bild nicht gemacht !!

Also du markierst deine Zellen C25:N39 und erstellst dann eine bedingte Formatierung mit dieser Formel:
=Monat(C$24) = Monat(HEUTE())
und die Formatierung der Monate nicht vergessen... es muss ein Datum in der Zelle stehen

Grüße Uwe
Questionmark93
Questionmark93 26.09.2014 um 13:46:36 Uhr
Goto Top
Doch im nachhinein :D aber es geht immernoch nicht =(
colinardo
Lösung colinardo 26.09.2014, aktualisiert am 29.09.2014 um 11:15:05 Uhr
Goto Top
Zitat von @Questionmark93:

Doch im nachhinein :D aber es geht immernoch nicht =
checke ob Excel die Formel in Anführungszeichen gesetzt hat, wenn ja entferne diese, das kommt manchmal vor.

Am Demosheet siehst du ja das es geht ....ansonsten lade dein sheet mal irgendwo hoch, ist eine Kleinigkeit das zu fixen face-wink
Questionmark93
Questionmark93 26.09.2014 um 13:53:03 Uhr
Goto Top
wo kann ichs hochladen? =)
colinardo
colinardo 27.09.2014 um 12:38:18 Uhr
Goto Top
Wenn's das dann war, bitte nicht vergessen als gelöst zu markieren, merci.