Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
552to556
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
552to556
552to556
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeile Färben wenn 0

Zeile Färben wenn 0
27.01.2005 11:21:40
Modolo
Hallo,

wie kann ich über vba eine Zeile färben wenn ich innerhalb dieser eine 0 stehen habe?
Hatte schon mal im Archiv etwas gefunden ist aber leider irgendwie futsch.

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile Färben wenn 0
Harald
Hallo Modolo
ohne vba
Bedingte Formatierung
Gruß
Harald
AW: Zeile Färben wenn 0
27.01.2005 11:29:32
modolo
wo liegt denn da mein fehler ? weil ich es nur hinbekomme das die zelle gefärbt wird?
AW: Zeile Färben wenn 0
Martin
Hallo Modolo,
das geht bestimmt eleganter, aber hier mal ein einfaches Beispiel für die Zeilen 1-10:

Sub Färben_wenn_0()
Application.ScreenUpdating = False
For i = 1 To 10
For j = 1 To 256
If Cells(i, j) = 0 And Not IsEmpty(Cells(i, j)) Then
Rows(i).Cells.Interior.ColorIndex = 3
Exit For
End If
Next j
Next i
Application.ScreenUpdating = False
End Sub

Die Zeile wird rot gefärbt, wenn mindestens eine Zelle den Wert 0 hat.
Gruß
Martin Beck
Anzeige
AW: Zeile Färben wenn 0
27.01.2005 11:44:47
Modolo
Danke für die SUPERSCHNELLANTWORT aber erklär mir bitte noch wofür i und j stehen (hab die Hoffnung etwas draus zu lernen ?)
AW: Zeile Färben wenn 0
Martin
Hallo,
i ist die lfd. Nr. der Zeile, j die lfd. Nr. (nicht der Buchstabe) der Spalte. Für z.B. i=2 und j=3 ist Cells(i, j) also gleich Cells(2, 3). Dies bezeichnet die Zelle in der zweiten Zeile und dritten Spalte, also C2.
Zum vertiefen der Schleifentechnik bitte unbedingt das hier lesen:
https://www.herber.de/xlfaq/xlbasics/main_for.htm
Gruß
Martin Beck

301 Forumthreads zu ähnlichen Themen

Bitte um Excel Hilfe / Wenn & Leere Zellen
Hans

Hallo Leute,
ich hoffe mir kann hier jemand helfen, da ich vergeblich versucht habe dahinter zu kommen.
Folgendes, ich habe eine Arbeitszeitübersicht in der ich die Arbeitszeit ausrechnen will und der Übersichtlichkeit wegen an Tagen an denen ich nicht arbeite die Zelle leer bleibt.
02.09.2008 15:53:00
Thread-ID: 1006840
7 Beiträge
Anzeige
Wenn Zelle leer, dann Grafik löschen
TomTom

Hi,
ich möchte auf meinem Sheet abprüfen, ob die Zelle A41 und B41 leer sind, und wenn ja, soll eine Grafik (.bmp / wurde eingefügt mit Kopieren und einfügen und heisst im Namensfeld "Bild 01")
gelöscht oder unsichtbar werden.
Wie mache ich dies ?
Danke mal
Gruss
Tom<...
22.09.2008 08:28:10
Thread-ID: 1011373
3 Beiträge
Wenn 1 dann Wert aus Überschrift
Kendra

Hallo,
ich habe folgendes Problem, zu dem mir einfach keine Lösung einfallen will:
Meine Matrix sieht in etwa so aus:
______Peter_Hans_Susi_Karl_Klaus
Auto___0____1____0___2___0
Haus___1____0____0___0___2
Urlaub__0____0____1___0___2
Hobby__2____0____0___1___0...
23.09.2008 14:03:57
Thread-ID: 1011726
7 Beiträge
Anzeige
Zeilen löschen, wenn I = 0
Macro

Hi,
ich möchte ein Tabellenblatt (Export) in den Spalte I durchsuchen, ob sich irgendwo der Wert 0 befindet.
Alle Zeilen die in der Splate eine NULL haben, sollen gelöscht werden. Wie mache ich das mit einem Makro. ?
(leere Zellen sollen aber nicht als NULL interpretiert werden)
...
04.12.2008 08:21:00
Thread-ID: 1030023
5 Beiträge
Wenn Range("O10:O16") leer ist
Heinz

Hallo Leute
Habe mit meinem Makro in der Zeile
'If Sheets("Eingabe").Range("O10:O16").Value = "" Then
'MsgBox "Kein Gewicht eingegeben"
'Exit Sub
'End If
Ein Problem.
Ich möchte wenn in O10 bis O16 kein Eintrag gemacht wurde,das dann die MsgBox startet.
Wenn aber...
31.12.2008 16:19:40
Thread-ID: 1036170
3 Beiträge
0 entfernen, sprich leere Zelle
Bernhard

Hallo,
ich habe ein kleines Problem. Wenn ich z.B. zwei Zelleninhalte addiere und beide Zellen sind leer, spricht nicht 0 sonder leer, bekomme ich als Ergebnis ebenfalls eine 0. Ich möchte aber, dass diese Zellen ebenfall nicht darstellt. Ich habe bisher dann die "" Stringausgabe gewählt. =...
24.01.2009 12:22:54
Thread-ID: 1043326
6 Beiträge
Zeilen ausblenden, wenn 0
evi

Hallo,
ich habe folgendes Problem:
Ich möchte bestimmte Zeilen eines Tabellenblattes (Blatt 2) ausblenden (bspw. Zeile 120-123), wenn in einem anderen Tabellenblatt (Blatt 1) in ein einer bestimmten Zelle (z. Bsp. C45) eine "0" eingetragen ist.
Leider hab ich nicht so viel Ahnung di...
06.02.2009 12:07:03
Thread-ID: 1047705
6 Beiträge
Zählenwenns... Leere Zelle
UweD

Hallo
Ich habe 2 Tabellen, wo (fast) täglich 1. Produktionsrückstände und 2. Fehler aufgelistet sind.
Es kommt vor, daß eine Tabelle mal an einem Tag nicht abgefragt und gefüllt wird.
In der Zusammenfassung wird dieser Tag dann mit 0 gewertet. Wie stelle ich es an, daß an diesem Tag...
13.02.2009 10:55:00
Thread-ID: 1050400
5 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
5
2
6
10
4
2
5
5
4
7
5
9
1
4
10
2
4
9
11
7
9
4
3
3