Thema Datum  Von Nutzer Rating
Antwort
14.05.2020 11:35:32 Anna
Solved
14.05.2020 11:38:17 Gast31774
NotSolved
14.05.2020 11:47:50 Gast69992
NotSolved
14.05.2020 11:39:29 Torsten
NotSolved
14.05.2020 11:56:57 Gast80553
Solved
14.05.2020 12:01:33 Gast56496
Solved
14.05.2020 12:09:47 Anna
NotSolved
14.05.2020 12:02:44 Anna
NotSolved
Rot Zellen in Zeile färben, über Combobox gewählt
 14.05.2020 12:16:29 Gast13882
Solved
14.05.2020 12:24:24 Anna
Solved

Ansicht des Beitrags:
Von:
Gast13882		 Datum:
14.05.2020 12:16:29		 Views:
740		 Rating:
     
Antwort:
 Nein
Thema:
Zellen in Zeile färben, über Combobox gewählt

Hallo Anna

das habe ich dann so gelöst

 

Private Sub ComboBox1_Change()
    Dim c As Range
    Dim rngZelle As Range
    Dim rngBereich As Range
    Dim lngLetzte As Long
    lngLetzte = Cells(Rows.Count, 1).End(xlUp).Row
    Range(Cells(2, 1), Cells(lngLetzte, 14)).Interior.ColorIndex = xlNone
    Set c = Columns(1).Find(ComboBox1.Text, LookIn:=xlValues, lookat:=xlWhole)
    If Not c Is Nothing Then
        Set rngBereich = Range(Cells(c.Row, 2), Cells(c.Row, 14)) 'Spalte B bis N
        For Each rngZelle In rngBereich
            If rngZelle.Value <> "" Then
                rngZelle.Interior.Color = vbRed
            End If
        Next
    End If
End Sub

 

Gruß Tom

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
14.05.2020 11:35:32 Anna
Solved
14.05.2020 11:38:17 Gast31774
NotSolved
14.05.2020 11:47:50 Gast69992
NotSolved
14.05.2020 11:39:29 Torsten
NotSolved
14.05.2020 11:56:57 Gast80553
Solved
14.05.2020 12:01:33 Gast56496
Solved
14.05.2020 12:09:47 Anna
NotSolved
14.05.2020 12:02:44 Anna
NotSolved
Rot Zellen in Zeile färben, über Combobox gewählt
 14.05.2020 12:16:29 Gast13882
Solved
14.05.2020 12:24:24 Anna
Solved