Thema Datum  Von Nutzer Rating
Antwort
Rot bestimmte Zellen einer jeweiligen Zeile einfärben
14.01.2011 08:08:12 giz
NotSolved
14.01.2011 09:09:41 Severus
Solved
14.01.2011 09:14:26 giz
NotSolved

Ansicht des Beitrags:
Von:
giz
Datum:
14.01.2011 08:08:12
Views:
1658
Rating: Antwort:
  Ja
Thema:
bestimmte Zellen einer jeweiligen Zeile einfärben

Hallo

Habe ein kleines Problem: ich möchte, wenn ein bestimmter Wert in einer Zelle steht, einen gewissen Zellenbereich derselben Zeile einfärben. Bis jetzt hab ich es nur geschaft, die ganze Zeile einzufärben, was ich aber nicht möchte.

Der Code dazu:

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 3 And Target.Address <> "$A$1" Then Exit Sub ' A=1, B=2,...H=8, usw
Dim zei As Long
For zei = 1 To Cells(65536, 3).End(xlUp).Row
    'Cells(zei, 3).EntireRow.Interior.ColorIndex = xlNone
    If Cells(zei, 3) = Range("D4") Then Cells(zei, 3).EntireRow.Interior.ColorIndex = 34
Next zei
End Sub
 

Herzlichen Danke für's Lösen

G.


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot bestimmte Zellen einer jeweiligen Zeile einfärben
14.01.2011 08:08:12 giz
NotSolved
14.01.2011 09:09:41 Severus
Solved
14.01.2011 09:14:26 giz
NotSolved