Clever-Excel-Forum

Normale Version: VBA Zelleninhalt erkennen und Färben
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Guten Tag Leute,

ich bin relativ neu in VBA und möchte ein Makro schreiben,
welches die Zellen nacheinander überprüft.
Sobald innerhalb der Zelle die Tage Mo.-Fr vorkommen, soll die Zelle keine Füllung erhalten.
Bei Samstag und Sonntag soll die Zelle jedoch Rot färben.
Hoffe irgendwer kann mir da einen kleinen Anstoß geben.

Vielen Dank
Hallo,

warum denn VBA? Dafür eigenet sich die bedingte Formatierung hervorragend.

Ansonsten nach diesem Schema
Code:
Option Explicit

Sub Einfaerben()
   Dim i As Long
   
   For i = 1 To 100
       With Tabelle1.Cells(i, 1)
       If .Value = "Sonntag" Or .Value = "Sonntag" Then
           .Interior.Color = vbRed
       End If
   Next i
End Sub
Gruß Jonas
Moin,

@ Jonas: 
Du hast einen Schreibfehler drin.  -> If Sonntag or Sonntag ...  :05:

@ TE:
Da fehlen aber noch so einige Infos. In erster Linie: Was steht wirklich in den Zellen drin? Text? Ein "echtes" Datum, nur anders formatiert? Falls Text: "Sa", "Samstag" oder "Sonnabend"?
Und können sich die kalendarischen Daten auch einmal ändern? Dann muss nämlich vorher jegliche Farb-Formatierung entfernt werden ...
(11.04.2017, 09:43)GMG-CC schrieb: [ -> ]@ Jonas: 
Du hast einen Schreibfehler drin.  -> If Sonntag or Sonntag ...  :05:

Hm, das lässt sich wohl schwer leugnen, Günther :19:

@TE: Die Anpassung solltest Du hinbekommen ;)

Gruß Jonas