Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

bedingte Formatierung deaktivieren

Forumthread: bedingte Formatierung deaktivieren

bedingte Formatierung deaktivieren
04.08.2002 17:44:49
Ralf
Hallo Excelspezie's,

kann man eine bedingte Formatierung einer Spalte je nach Bedarf ein- und ausschalten. Ein Button und etwas VBA, aber wie?

Gruß,Ralf

Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: bedingte Formatierung deaktivieren
04.08.2002 18:01:13
andreas e
hallo ralf,

etwa so:

Sub bedformatrein()
Columns("C:C").Select
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
Formula1:="10"
Selection.FormatConditions(1).Interior.ColorIndex = 6
Range("D7").Select
End Sub
Sub format_raus()
Columns("C:C").Select
Selection.ClearFormats
Range("C1").Select
ActiveCell.FormulaR1C1 = "10"
Range("C2").Select
End Sub

das eine macht das format rein das andere raus

nun je nem button zuweisen und natürlich bei rein - deine formatierung!
kannst ja über recorder aufzeichnen


gruß
andreas e

http://www.skripteundaufgaben.de viele kostenlose Downloads und Links zu EXCEL und mehr

Anzeige
Re: bed.Format. + Bahnhof
04.08.2002 18:28:09
ralf
Hallo Andreas e,

danke erst mal für den Tip, aber einem Excel-Schöler müßtest Du das schon ein wenig genauer erklären.

Gruß, Ralf

Re: bed.Format. + Bahnhof
04.08.2002 18:47:31
andreas e
hallo ralf,
zunächst mal zieh über die steuerelememente 2 commandbuttons auf -
dem einen weist du den code zu für format aktivieren dem anderen für format deaktivieren.
allerdings muss der format aktivieren noch deinem code angepasst werden.
hast du schon etwas mit vba gearbeitet ?
wie soll denn deine bedingte formatierung aussehen ?
würde gerne weiter helfen aber dazu sollte man wissen wie weit dein kenntnisstand ist.

gruß
andreas e
http://www.skripteundaufgaben.de viele kostenlose Downloads und Links zu EXCEL und mehr

Anzeige
Re: bed.Format. + Bahnhof
04.08.2002 20:19:24
ralf
Hallo andreas e,

in Spalte A steht das fortlaufende Datum und in B zu jedem Tag ein Kontostand, der sich je nach Zu-u. Abgang ändert. Die bedingte Formatierung für Spalte B ist so gewählt, daß der Kontostand nur bis zum aktuellen Datum erscheint (Formel ist=wenn(wert(a6)>(wert(heute()));wahr;falsch), so für Zelle B6 halt, und dann Schrift weiß.
Ab und an hätte ich aber die Formatierung abgeschaltet, um die Werte auch über das aktuelle Datum hinaus betrachten zu können, so als eine Art Kontovorschau.
Meine vba-Kenntnisse reichen tatsächlich nicht all zu weit, eine Schaltfläche bekomme ich noch hin, was drinnen steht ....naja.

Gruß, Ralf

Anzeige
Re: bed.Format. + Bahnhof
05.08.2002 15:07:57
andreas e
hallo ralf,
gehen wir es an:
der makrorekorder kann dir da den grossteil der arbeit abnehmen.
du startest die aufzeichnung des Makros in einer leeren Tabelle.
nun markierst du wie in der tabelle die es später bekommen soll den bereich und weist ihm die benutzerdefinierte formatierung zu (siehe deine formel).
danach beendest du den recorder. diesen quellcode kopierst du und fügst in für deine schaltfläche1 ein.
nun wieder der recorder. du hebst über format zellen standard deine Formatierung wieder auf . ende makroaufzeichnung und nun wird dieser code kopiert nach button 2.
das wars dann schon.
ich hoffe das hilft weiter, wenn nicht melde dich nochmals.
gruß
andreas e
Anzeige
Re: bed.Format.
06.08.2002 15:08:11
ralf
hallo andreas e,

nach anfänglicher Kurvenfahrt bin ich dank Deiner Ratschläge doch noch zum Ziel gekommen;
einen kleinen Hinweis könnte ich aber dennoch gebrauchen:

nach einem Button-Click soll der Cursor neben dem aktuellen Datum, das fortlaufend in Spalte A steht, in Spalte B erscheinen,
> z.Z. lautet aus der Makroaufzeichnung abgeleitet die letzte Zeile der Anweisung z. B.: Range("B5").Select.
Statt B5 sollte nun die Anweisung sinngemäß lauten: „gehe zum aktuellen Datum und dann eine Zelle nach rechts“ ..... aber wie?

Gruß Ralf

Anzeige
Re: bed.Format.
06.08.2002 16:34:00
andreas e
hallo ralf,

versuchs mal so :

Sub datum_finden()
Dim z
z = 1
Cells(z, 2).Select
Do Until Cells(z, 2) = Date
z = z + 1
Loop
Cells(z, 3).Select
End Sub

gruß
andreas e

Re: bed.Format.
06.08.2002 18:55:36
ralf
Hallo andreas e,

hab Deinen Tip statt der Zeile Range("B5").Select eingefügt, funzt aber nich so recht.
Mach ich etwas falsch?

Gruß Ralf

Anzeige
Re: bed.Format.
06.08.2002 18:55:46
ralf
Hallo andreas e,

hab Deinen Tip statt der Zeile Range("B5").Select eingefügt, funzt aber nich so recht.
Mach ich etwas falsch?

Gruß Ralf

Re: bed.Format.
07.08.2002 21:48:59
andreas e
hallo ralf,

was funzt denn konkret nicht ?
wenn ich statt cells den range nehme funzt es ohne Problem

gruß
andreas e

Re: bed.Format.
08.08.2002 19:18:21
ralf
Hallo Andreas e,

hab erst einmal den Button geändert, der die Formatierung wieder einschaltet; hab also deinen Cod eingefügt und die Zeile Range..... (von der Makroaufzeichnung) mit einem Hochkomma versehen.
Beim Betätigen des Format-EIN-Buttons wird die bedingte Formatierung aktiv, d.h. die Zahlen werden bis zum aktuellen Datum angezeigt, der rest ist weiße Schrift; so weit, so gut. Nun wird an statt die aktive Zelle neben das aktuelle Datum zu setzten die gesamte Spalte C (Kontostand) markiert.
Ich kann mir nun nicht recht weiterhelfen - VBA-Niete. Bei Bedarf schick ich dir eine abgespeckte Version meiner Tabelle.
Sag halt noch mal Bescheid und vorerst vielen Dank,

Gruß Ralf

Anzeige
;

Forumthreads zu verwandten Themen

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Bedingte Formatierung in Excel ein- und ausschalten


Schritt-für-Schritt-Anleitung

Um die bedingte Formatierung in Excel zu deaktivieren oder anzuhalten, kannst du einfach zwei Makros erstellen. Hier ist, wie du dabei vorgehst:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Erstelle ein neues Modul:
    • Klicke im Menü auf Einfügen und wähle Modul.
  3. Füge den folgenden Code ein, um die bedingte Formatierung zu aktivieren und zu deaktivieren:
Sub bedformatrein()
    Columns("C:C").Select
    Selection.FormatConditions.Delete
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
        Formula1:="10"
    Selection.FormatConditions(1).Interior.ColorIndex = 6
    Range("D7").Select
End Sub

Sub format_raus()
    Columns("C:C").Select
    Selection.ClearFormats
    Range("C1").Select
    ActiveCell.FormulaR1C1 = "10"
    Range("C2").Select
End Sub
  1. Weise jedem Makro einen Button zu:
    • Gehe zurück zu Excel, füge zwei CommandButtons aus den Steuerungselementen hinzu und verlinke sie mit den entsprechenden Makros.

Der Button für die Aktivierung der bedingten Formatierung sollte das bedformatrein-Makro nutzen, während der Button für die Deaktivierung das format_raus-Makro verwenden sollte.


Häufige Fehler und Lösungen

  • Fehler: Die bedingte Formatierung bleibt trotz Klick auf den Deaktivierungs-Button bestehen.

    • Lösung: Stelle sicher, dass das Makro format_raus korrekt zugewiesen ist. Überprüfe auch, ob die Zielspalte richtig ausgewählt ist.
  • Fehler: Der Cursor springt nicht zur gewünschten Zelle.

    • Lösung: Überprüfe den Code, insbesondere die Zeilen, die den Cursor steuern. Nutze den folgenden Code, um zur Zelle neben dem aktuellen Datum zu springen:
Sub datum_finden()
    Dim z
    z = 1
    Cells(z, 2).Select
    Do Until Cells(z, 2) = Date
        z = z + 1
    Loop
    Cells(z, 3).Select
End Sub

Alternative Methoden

Wenn du die bedingte Formatierung in Excel deaktivieren möchtest, ohne VBA zu verwenden, kannst du dies auch manuell tun:

  1. Wähle die Zellen aus, die die bedingte Formatierung haben.
  2. Gehe zu Start > Bedingte Formatierung > Regeln verwalten.
  3. Wähle die Regel aus und klicke auf Löschen, um die Formatierung zu entfernen.

Für eine temporäre Deaktivierung kannst du die Formatierung auch einfach auf Standard zurücksetzen.


Praktische Beispiele

  • Szenario: Du möchtest die bedingte Formatierung für eine Spalte mit Kontoständen aktivieren, die nur bis zum aktuellen Datum sichtbar sein sollen.
  • Lösung: Benutze die Formel =WENN(WERT(A6)>(WERT(HEUTE()));WAHR;FALSCH) und setze die Schriftfarbe auf Weiß für die Zellen, die nach dem heutigen Datum liegen.

Mit den oben genannten Makros kannst du diese Formatierung schnell ein- oder ausschalten, je nach Bedarf.


Tipps für Profis

  • Makros aufzeichnen: Nutze den Makrorekorder, um wiederkehrende Aufgaben zu automatisieren. Dies kann dir helfen, die richtigen VBA-Befehle für deine spezifischen Anforderungen zu lernen.
  • Kombination von Tasten: Lerne nützliche Tastenkombinationen, um schneller durch Excel zu navigieren, zum Beispiel CTRL + SHIFT + L für Filter.

Denke daran, deine Excel-Datei regelmäßig zu speichern, insbesondere wenn du mit VBA arbeitest.


FAQ: Häufige Fragen

1. Wie kann ich die bedingte Formatierung in Excel deaktivieren? Du kannst die bedingte Formatierung deaktivieren, indem du das Makro format_raus ausführst oder die Formatierung manuell über das Menü löschst.

2. Kann ich die bedingte Formatierung nur für bestimmte Zellen anhalten? Ja, du kannst die bedingte Formatierung für spezifische Bereiche anhalten, indem du die Zellen auswählst und das entsprechende Makro anwendest.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige