kann mir jemand helfen?
Ich möchte dass sich eine komplette Zeile färbt wenn eine Zelle innerhalb der Zeile angeklickt ist?
Vielen Dank :)
Gruß
Hans
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If alteZeile > 0 Then
Rows(alteZeile).Interior.Color = xlNone
End If
alteZeile = Selection.Row
Rows(Selection.Row).Interior.Color = vbRed
End Sub
Gruess
Private Sub Worksheet_SelectionChange()
ActiveSheet.Calculate
End Sub
eingetragen.
Um eine komplette Zeile in Excel farbig zu markieren, wenn eine Zelle innerhalb dieser Zeile angeklickt wird, kannst Du VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
Wähle das Arbeitsblatt aus, in dem Du die Funktion implementieren möchtest.
Füge den folgenden Code in das Code-Fenster ein:
Option Explicit
Public alteZeile As Long
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If alteZeile > 0 Then
Rows(alteZeile).Interior.Color = xlNone
End If
alteZeile = Selection.Row
Rows(Selection.Row).Interior.Color = vbRed
End Sub
Schließe den VBA-Editor und gehe zurück zu Excel.
Klicke auf eine Zelle in der gewünschten Zeile und beobachte, wie die gesamte Zeile rot markiert wird.
Fehlermeldung: "Fehler beim Kompilieren": Dies kann passieren, wenn Du den Code nicht im richtigen Modul eingegeben hast. Stelle sicher, dass Du den Code im Arbeitsblatt-Modul eingefügt hast und nicht im Modul für das gesamte Projekt.
Die Zeile wird nicht gefärbt: Überprüfe, ob das Makro aktiviert ist. Möglicherweise musst Du die Makros in den Excel-Optionen aktivieren.
Eine alternative Methode zur farblichen Markierung von Zeilen ist die Verwendung der bedingten Formatierung. Hier ist, wie Du das machen kannst:
Wähle den gesamten Bereich aus, auf den Du die bedingte Formatierung anwenden möchtest.
Gehe zu Start > Bedingte Formatierung > Neue Regel.
Wähle Formel zur Ermittlung der zu formatierenden Zellen verwenden.
Gib die folgende Formel ein:
=Zelle("Zeile")=Zeile()
Wähle die gewünschte Hintergrundfarbe aus und klicke auf OK.
Mit dieser Methode wird die gesamte Zeile eingefärbt, wenn eine Zelle in dieser Zeile aktiv ist.
Wenn Du beispielsweise die Zeile einfärben möchtest, wenn der Wert in einer Zelle nicht leer ist, kannst Du die bedingte Formatierung wie folgt anpassen:
Verwende die Formel:
=NICHT(ISTLEER(A1))
Hierbei wird die Zeile gefärbt, wenn die Zelle in Spalte A nicht leer ist. Du kannst die Spalte nach Bedarf anpassen.
1. Wie kann ich die Farbe ändern, die für die Zeilenmarkierung verwendet wird?
Du kannst die Farbe im VBA-Code oder in der bedingten Formatierung anpassen, indem Du die entsprechenden Farbcodes änderst.
2. Funktioniert das auch in Excel Online?
Die VBA-Methode funktioniert nicht in Excel Online. Du kannst jedoch die bedingte Formatierung verwenden, um ähnliche Ergebnisse zu erzielen.
3. Wie viele Zeilen kann ich mit dieser Methode einfärben?
Du kannst diese Methode für beliebig viele Zeilen verwenden, solange Du den Bereich in der bedingten Formatierung entsprechend anpasst.