Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Variable Spalten nach Kalenderwoche markieren

Variable Spalten nach Kalenderwoche markieren
07.06.2017 11:27:04
Schachtner
Userbild
Hallo zusammen,
ich würde gerne die Spalte markieren, die mit der Kalenderwoche übereinstimmt. Wie mach ich das?
Vor und danach der ausgewählten KW soll je 3 Wochen auch die Spalten markiert werden.
Vielen Dank schon mal.
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Variable Spalten nach Kalenderwoche markieren
07.06.2017 11:29:04
SF
Hola,
mit der bedingten Formatierung.
Was genau gefärbt werden soll, sieht man auf dem Bild nicht.
Übrigens ist ab Excel 2010 Kalenderwoche mit dem Parameter 21 korrekt.
Gruß,
steve1da
AW: Variable Spalten nach Kalenderwoche markieren
07.06.2017 11:38:43
Schachtner
Userbild
Hallo!
Zelle B1 ist mit der Formel "Kalenderwoche" mit Bezug auf dem Datum in A1.
Die Werte ab Spalte K, Zeile 5 sind Zahlen.
Will auch die ganze Spalte markieren und es soll dann so aussehen.
Anzeige
AW: Variable Spalten nach Kalenderwoche markieren
07.06.2017 11:53:33
SF
Hola,
Bereich markieren der gefärbt werden soll. Start - Bedingte Formatierung - Neue Regel - Formel zur Ermittlung...
=(K$5-3=$B$1)

Ich gehe davon aus dass die Kalenderwochen in K5 beginnen.
Gruß,
steve1da
AW: Variable Spalten nach Kalenderwoche markieren
07.06.2017 12:39:38
Schachtner
@ Steve1da: Das funktioniert leider nicht. Will ganze Spalten markieren, nicht nur Zellen.
Anzeige
AW: Variable Spalten nach Kalenderwoche markieren
07.06.2017 12:40:48
SF
Hola,
es wird das gefärbt, was du vorher markiert hast.
Allerdings ist "funktioniert nicht" für Helfer nicht hilfreich (genauso wie Bildchen übrigens).
Gruß,
steve1da
AW: Variable Spalten nach Kalenderwoche markieren
07.06.2017 12:42:22
Schachtner
Hi Steve1da,
war nicht böse gemeint. Ich würde nur gerne die kompletten Spalten markieren wie im Beispiel.
Mit der bedingten Formatierung werden nur einzelne Zellen markiert.
Anzeige
AW: Variable Spalten nach Kalenderwoche markieren
07.06.2017 12:43:36
SF
Hola,
gerne nochmal ;)
Es wird das gefärbt was du vorher markierst. Wenn Spalten gefärbt werden sollen, müssen auch vorher Spalten markiert worden sein.
Gruß,
steve1da
AW: Variable Spalten nach Kalenderwoche markieren
07.06.2017 12:52:40
Schachtner
Hallo,
OK aber dann werden die Spalten nicht verschiedenfarbig markiert und enthalten keine Bezeichnungen wie in meinem Beispiel.
Den VBA-Code hab ich bereits hochgeladen.
LG
Anzeige
AW: Variable Spalten nach Kalenderwoche markieren
07.06.2017 11:40:48
Schachtner
Momentan sieht es so aus aber es funktioniert nicht...
Range(Cells(1, "B1"), Cells(1, "K5:BA5")).EntireColumn.Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("U4").Select
ActiveCell.FormulaR1C1 = """AKTUELLE"" Woche"
Columns("Q:T").Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark2
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("Q4:T4").Select
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Selection.Merge
ActiveCell.FormulaR1C1 = "Sicherheitszeitraum FA (Gesamt 20 AT)"
Range("V1:X7").Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark2
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("V4:X4").Select
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Selection.Merge
ActiveCell.FormulaR1C1 = "Sicherheitszeitraum PO"
Columns("Y:Y").Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 5296274
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("Y4").Select
With Selection.Font
.Color = -16776961
.TintAndShade = 0
End With
ActiveCell.FormulaR1C1 = """REALER"" Produktionsbeginn (4 Wochen = 28 Tage)"
Range("Y4,U4").Select
Range("U4").Activate
With Selection
.HorizontalAlignment = xlGeneral
.VerticalAlignment = xlBottom
.WrapText = True
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Range("V4:X4").Select
End Sub
Anzeige
AW: nutze dazu die bedingte Formatierung ...
07.06.2017 11:31:29
...
Hallo,
... da ich aber aus einem Bild nicht erkennen können, wie Du ab Spalte K Deine Daten erfasst, wäre eine Beispieldatei schon sinnvoll, bevor ich eine konkretere Aussage machen kann.
Gruß Werner
.. , - ...
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Variable Spalten nach Kalenderwoche markieren


Schritt-für-Schritt-Anleitung

Um die aktuelle Kalenderwoche in Excel farbig zu markieren, kannst du die bedingte Formatierung verwenden. Hier sind die Schritte, die du befolgen musst:

  1. Bereich auswählen: Markiere den Bereich, den du farbig markieren möchtest. Achte darauf, dass du ganze Spalten auswählst, wenn du die ganze Spalte markieren möchtest.

  2. Bedingte Formatierung öffnen: Gehe zu Start > Bedingte Formatierung > Neue Regel.

  3. Formel zur Ermittlung der zu formatierenden Zellen verwenden: Wähle „Formel zur Ermittlung der zu formatierenden Zellen verwenden“ aus.

  4. Formel eingeben: Gib folgende Formel ein, um die aktuelle Kalenderwoche farbig zu markieren:

    =WOCHE(K$5-3)=WOCHE(HEUTE())

    Diese Formel prüft, ob die Kalenderwoche in Zelle K5 der aktuellen Woche entspricht.

  5. Format wählen: Klicke auf „Formatieren...“ und wähle die gewünschte Farbe aus. Du kannst auch andere Formatierungen wie Schriftart oder Rahmen anpassen.

  6. Regel anwenden: Klicke auf „OK“, um die Regel zu speichern, und dann erneut auf „OK“, um die bedingte Formatierung anzuwenden.


Häufige Fehler und Lösungen

  • Problem: Die bedingte Formatierung färbt nur einzelne Zellen, nicht ganze Spalten.

    • Lösung: Stelle sicher, dass du den gesamten Spaltenbereich markierst, bevor du die Regel erstellst.
  • Problem: Die Formel funktioniert nicht.

    • Lösung: Überprüfe, ob die Zellbezüge korrekt sind und ob du die richtige Funktion für die Kalenderwoche verwendest.

Alternative Methoden

Eine alternative Methode zur Markierung der aktuellen Kalenderwoche in Excel könnte die Verwendung von VBA sein. Hier ist ein einfaches Skript, das du verwenden kannst:

Sub MarkiereAktuelleKW()
    Dim kw As Integer
    kw = Application.WorksheetFunction.WeekNum(Date)

    For Each col In Range("K5:BA5")
        If Application.WorksheetFunction.WeekNum(col.Value) = kw Then
            col.EntireColumn.Interior.Color = RGB(255, 0, 0) ' Rot
        End If
    Next col
End Sub

Dieses Skript markiert die gesamte Spalte, die der aktuellen Kalenderwoche entspricht.


Praktische Beispiele

Ein praktisches Beispiel könnte sein, dass du die Kalenderwoche 22 markieren möchtest. Du kannst die Schritte aus der Schritt-für-Schritt-Anleitung befolgen und die Formel entsprechend anpassen:

=WOCHE(K$5-3)=22

So kannst du gezielt die Spalten für die gewünschte Kalenderwoche farbig markieren.


Tipps für Profis

  • Verwende benannte Bereiche: Um die Formel einfacher zu gestalten, kannst du benannte Bereiche verwenden, um auf die Daten zuzugreifen.

  • Kombiniere mehrere Regeln: Du kannst verschiedene Regeln für unterschiedliche Kalenderwochen erstellen, um die Übersichtlichkeit zu verbessern.

  • Nutze die xlThemeColorDark2: Beim Formatieren kannst du die xlThemeColorDark2 verwenden, um die Farben deiner Tabellen an das Design anzupassen.


FAQ: Häufige Fragen

1. Wie markiere ich die aktuelle Woche in Excel?
Verwende die bedingte Formatierung mit der Formel =WOCHE(K$5-3)=WOCHE(HEUTE()), um die aktuelle Woche farbig zu markieren.

2. Kann ich mehrere Kalenderwochen gleichzeitig markieren?
Ja, du kannst mehrere bedingte Formatierungsregeln für verschiedene Kalenderwochen erstellen, um diese gleichzeitig zu markieren.

3. Welche Excel-Version benötige ich?
Die beschriebenen Methoden funktionieren ab Excel 2010, da dort die Kalenderwoche korrekt ermittelt werden kann.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige