Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1160to1164
1160to1164
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bedingte Formatierung aktualisieren

Forumthread: Bedingte Formatierung aktualisieren

Bedingte Formatierung aktualisieren
Dennis
Hallo Liebe Forumgemeinde,
ich habe bezüglich der Aktualisierung einer bedingte Formtierung Probleme.
Ich habe eine Excelfile mit 2 Tabellenblättern. In Tabellenblatt 2 stehen alle Informtionen. Das Tabellenblatt 1 dient zur kleinen Übersicht der wichtigsten Informationen aus Tabellenblatt 2.
Ein kleiner VBA-Code färbt die Erste Zelle einer Spalte in Tabellenbaltt 2, wenn in einer bestimmten Zelle ein Inhalt enthalten ist.
Die Formatierung möchte ich im Tabellenblatt 1 ebenfalls enthalten haben. Nun habe ich festgestellt das ich ein Inhalt einfügen kann und damit auch die Formatierung in Tabellenblatt 1.
Dies habe ich soweit auch alles hinbekommen, nur werden die Formatierungen bei Änderung in Tabellenblatt 2 nicht in Tabellenblatt 1 übernommen. Dort bleibt der alte Stand der bei der Verweiserstellung bestanden hat erhalten.
Gibt es möglichkeiten diese Formatierung automatisch zu aktualisieren. Unter dem Menüpunkt Extras - Optionen - Berechnung ist der Haken bei Automatisch, nur tut er es nicht.
Ich wäre über jede Hilfe dankbar und würde mich über eine Antwort freuen.
mfg
Dennis
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Bedingte Formatierung aktualisieren
22.06.2010 13:11:29
Ramses
Hallo
Kannst du mal die Datei hochladen, Daten allenfalls anonymisieren
Gruss Rainer
AW: Bedingte Formatierung aktualisieren
22.06.2010 15:45:44
Dennis
https://www.herber.de/bbs/user/70219.zip
Hallo Rainer
hier die Datei mit nur einem Eintrag wo zufällig jetzt die Daten in der selben Zeile stehen welches aber real mit allen Einträgen nicht der Fall ist.
MFG
Dennis
Anzeige
AW: Bedingte Formatierung aktualisieren
22.06.2010 18:45:19
BoskoBiati
Hallo,
wenn Du per VBA die Färbung durchführst, dann führe Sie doch im gleichen Makro in Deinem anderen Blatt durch. Da ich nicht weiß, wie und wo die Färbung erfolgt, kann ich Dir momentan nicht weiterhelfen.
Gruß
Bosko
AW: Bedingte Formatierung aktualisieren
23.06.2010 08:34:06
Dennis
Hallo Bosko,
die Färbung erfolgt in der Spalte Z des Tabellenblattes "Datenerfassung". Dort erscheint ein kleines Dialogfenster wo man Eintragungen vornehmen kann und sollte dort ein Inhalt drin stehen, färbt sich die erste Spalte dieser Zeile.
Jetzt habe ich im Tabellenblatt "Übersicht" aber die Einträge nicht in der selben Zeile sondern dort werden die Einträge Sortiert dargestellt. Darum kann ich nicht die gleiche Zelle färben lassen wie in dem Tabellenblatt "Datenerfassung".
Darum meine Frage wie ich eine Inhaltsabfrage automatisch machen kann der die Formatierung überwacht aus dem Tabellenblatt Datenerfassung und diese dann bei gleichem Inhalt identisch darstellt im Tabellenblatt "Übersicht".
Vielleicht hat dort schon jemand Erfahrung und könnte mir weiterhelfen. Die VBA-Programmierung in meinem Excel-Sheet ist nicht von mir geschrieben worden. Nur zur INFO.
Gruß
Dennis
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Bedingte Formatierung in Excel automatisch aktualisieren

Schritt-für-Schritt-Anleitung

  1. VBA-Code anpassen: Da die bedingte Formatierung in Tabellenblatt 1 nicht automatisch aktualisiert wird, kannst du den VBA-Code im Tabellenblatt "Datenerfassung" erweitern. Füge folgenden Code hinzu, um die Formatierung auch im Tabellenblatt "Übersicht" zu aktualisieren:

    Private Sub Worksheet_Change(ByVal Target As Range)
   Dim ws1 As Worksheet
   Dim ws2 As Worksheet
   Set ws1 = ThisWorkbook.Worksheets("Übersicht")
   Set ws2 = ThisWorkbook.Worksheets("Datenerfassung")

   If Not Intersect(Target, ws2.Range("Z:Z")) Is Nothing Then
       Call UpdateFormat(ws1, ws2)
   End If
End Sub

Sub UpdateFormat(ws1 As Worksheet, ws2 As Worksheet)
   ' Hier wird die Logik zur Formatierung implementiert
   Dim cell As Range
   For Each cell In ws2.Range("Z1:Z" & ws2.Cells(Rows.Count, "Z").End(xlUp).Row)
       If cell.Value <> "" Then
           ws1.Cells(cell.Row, 1).Interior.Color = RGB(255, 0, 0) ' Beispiel für rot
       End If
   Next cell
End Sub

  2. Bedingte Formatierung überprüfen: Stelle sicher, dass die bedingte Formatierung in Tabellenblatt 1 korrekt eingestellt ist. Gehe zu „Start“ > „Bedingte Formatierung“ und überprüfe die Regeln.

  3. Automatische Berechnung aktivieren: Unter „Formeln“ > „Berechnungsoptionen“ sollte der Haken bei „Automatisch“ gesetzt sein. Wenn dies nicht funktioniert, probiere das Dokument zu speichern und erneut zu öffnen.

Häufige Fehler und Lösungen

  • Formatierung wird nicht aktualisiert: Wenn die Formatierung nicht übernommen wird, überprüfe den VBA-Code und stelle sicher, dass die Zellen tatsächlich geändert werden.

  • Kein automatisches Update: Wenn die Berechnung nicht automatisch erfolgt, kann es hilfreich sein, Excel neu zu starten oder das Dokument zu schließen und erneut zu öffnen.

  • Falsche Zellen gefärbt: Achte darauf, dass die Zellreferenzen im VBA-Code korrekt sind. Eine falsche Referenz kann dazu führen, dass die falschen Zellen gefärbt werden.

Alternative Methoden

Wenn VBA für dich nicht die richtige Lösung ist, kannst du die bedingte Formatierung auch manuell anpassen:

  1. Zellen verknüpfen: Du kannst die Zellen in "Übersicht" so verknüpfen, dass sie den Wert aus "Datenerfassung" übernehmen. Gehe zu der Zelle in "Übersicht" und nutze die Formel =Datenerfassung!Z1.

  2. Formelbasierte bedingte Formatierung: Nutze die Möglichkeit, eigene Bedingungen in der bedingten Formatierung zu erstellen. Zum Beispiel kannst du für eine Zelle in „Übersicht“ eine Formel verwenden, die den Wert aus „Datenerfassung“ überprüft.

Praktische Beispiele

  • Beispiel 1: Du hast in „Datenerfassung“ in Zelle Z1 einen Wert eingetragen. In „Übersicht“ wird die erste Zelle (A1) rot gefärbt, wenn Z1 nicht leer ist.

  • Beispiel 2: Nutze die Formel =WENN(Datenerfassung!Z1<>"";1;0) in der bedingten Formatierung in „Übersicht“, um die Zelle A1 zu färben, wenn Z1 einen Inhalt hat.

Tipps für Profis

  • Nutzung von Named Ranges: Erstelle benannte Bereiche für deine Daten, um die Lesbarkeit des VBA-Codes zu verbessern und die Wartung zu erleichtern.

  • Debugging im VBA: Nutze den Debugger in der VBA-Umgebung, um die Ausführung deines Codes Schritt für Schritt zu verfolgen.

  • Regelmäßige Backups: Mache regelmäßig Backups deiner Excel-Dateien, besonders wenn du mit VBA arbeitest, um Datenverlust zu vermeiden.

FAQ: Häufige Fragen

1. Wie kann ich die bedingte Formatierung von mehreren Zellen gleichzeitig aktualisieren?
Du kannst eine Schleife im VBA-Code verwenden, um durch mehrere Zellen zu iterieren und die Formatierungen entsprechend anzupassen.

2. Was mache ich, wenn der VBA-Code nicht funktioniert?
Überprüfe die Schreibweise der Blattnamen und die Zellreferenzen im Code. Teste auch, ob die Makros in Excel aktiviert sind.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige