Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 18:14:45
VBA - Excell - Kopie und "Diebstahl" Schützen
25.04.2024 17:49:39
Bedingte Formatierung
25.04.2024 16:50:59
2 Zellen in 2 Blättern mit unterschiedlichen Bereichen vergl
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1740to1744
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
1740to1744
1740to1744
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeile ausblenden,wenn Zeilenbereich leer

Zeile ausblenden,wenn Zeilenbereich leer
18.02.2020 07:44:32
mars
Hallo zusammen,
ich habe mich versucht durch verschieden Foren zu kämpfen, bin aber nicht richtig zur Lösung gekommen. Bin leider auch kein VBA Profi.
Hier zu meinem Problem: Ich möchte mittels Makro Zeilen ausblenden, wenn der Bereich B bis D der Zeile leer ist. In Spalte E steht wiederum Text
Wenn beispielsweise der gesamte Bereich der Zeile 3 B3 bis D3 leer ist, soll die Zeile 3 ausgeblendet werden und für die restlichen Zeilen dann analog.
Über die Möglichkeit eines extra Makros zum wieder Einblenden der Zeilen würde ich mich natürlich noch richtig sehr freuen.
Beste Grüße, Mars

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile ausblenden,wenn Zeilenbereich leer
18.02.2020 08:15:49
SH95
Hallo Mars,
der Code ist ungetestet, da keine Datei von dir vorliegt.
Private Sub ausblenden()
Dim lzeile As Integer
For lzeile = 2 To 100
If Cells(lzeile, 2) = "" And Cells(lzeile, 3) = "" And Cells(lzeile, 4) = "" Then
Rows(lzeile).Hidden = True
End If
Next lzeile
End Sub


Private Sub einblenden()
Dim lzeile As Integer
For lzeile = 2 To 100
If Rows(lzeile).Hidden = True Then
Rows(lzeile).Hidden = False
End If
Next lzeile
End Sub
Der Code muss in den Codebereich des Arbeitsblattes.
Gruß
Stefan
Anzeige
AW: Zeile ausblenden,wenn Zeilenbereich leer
20.02.2020 07:08:16
mars
Hallo,
vielen Dank für die schnelle Antwort. Das funktioniert schon super und entspricht etwa meinen Vorstellungen. Da ich an einem Beispiel erklärt habe, was ich möchte, hätte ich jetzt doch noch eine Frage. Tatsächlich ist der Bereich, der leer sein muss, damit die Zeile ausgeblendet wird größer
In meiner Frage habe ich angegeben von B bis D - Antwort dazu "If Cells(lzeile, 2) = "" And Cells(lzeile, 3) = "" And Cells(lzeile, 4) = "" Then". Das funktioniert auch prima, jedoch sind meine tatsächlichen Spalten von Spalte K bis AE. Ich könnte es natürlich wie vorgeschlagen ergänzen. Dennoch wollte ich Fragen, ob es diesbezüglich noch eine elegantere Lösung gibt?
Ich Danke schon mal für euere Unterstützung.
Mars
Anzeige
AW: Zeile ausblenden,wenn Zeilenbereich leer
20.02.2020 10:44:11
peterk
Hallo
z.B. if Application.WorksheetFunction.CountBlank(Range("K2:AE2")) = 20 then

313 Forumthreads zu ähnlichen Themen

MSGBox wenn Zelleninhalt geleert wurde?!
Tom

Hallo!
Ist es denn eigentlich möglich zu überprüfen ob eine Zelle gerade geleert wurde?
Hintergrund ist, dass ich gern sicherstellen möchte, dass der User wirklich den Zelleninhalt löschen wollte.
Ich würde gern eine Mitteilung erscheinen lassen wenn eine Zelle vom Inhalt her gelösc...
26.08.2008 15:07:01
Thread-ID: 1004826
6 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
Makro unterbrechen wenn bestimmte Zelle leer
WalterK

Guten Morgen,
wer kann mir beim folgenden Code eine kleine Änderung durchführen:
1.) das Makro sollte abgebrochen werden, wenn im Blatt "Daten" die Zelle "AB12" leer ist und
2.) es sollte eine MsgBox mit dem Hinweis kommen, dass die Eingabe bei "AB12" fehlt und das sollte mit OK bes...
03.10.2008 07:29:45
Thread-ID: 1013985
10 Beiträge
Anzeige
VBA leere Zelle finden und obere Inhalte einfügen
Carmen

Hallo Zusammen,
leider habe ich so ganz wenig Ahnung von VBA, weiß aber auch nicht wie ich mir sonst normal mit
Excel weiterhelfen könnte da es zuviele Daten sind.
Hab folgendes Problem, ich möchte gerne dass alle leeren Zellen in den Spalten B-D mit dem Inhalt der Zellen eine Zeile...
08.12.2008 17:08:41
Thread-ID: 1031133
5 Beiträge
Kopieren von Nichtleeren Zellen per Formel
Nichtleeren

Moin,
auf der Arbeit soll ich eine Tabelle anpassen:
In Tabellenblatt1 ist eine Matrix M6:P109, in einigen Zeilen (Artikelnummern in loser Reihenfolge) stehen Werte, (die Artikel, die im Bürobestand fehlen) in den meisten nicht.
Die Zeilen, in denen Werte stehen, sollen nun in Tabel...
10.01.2009 20:43:46
Thread-ID: 1038525
4 Beiträge
Kurze , dumme Frage: Prüfen, ob Zelle leer
Dieter

Hi,
wie kann ich denn prüfen , ob die Zelle B230 im Tabellenblatt "Umsatz" leer ist ?
(Wichtig, es ist nicht das Aktive Tabellenblatt)
Danke Dieter
29.01.2009 13:21:56
Thread-ID: 1044976
8 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
Wenn Dann mit Werten zwischen 2 Zellen
Thomas

Hallo,
montagsgemäß steh ich gerade auf dem Schlauch und benötoge Hilfe für folgendes Problem:
ich habe mind. 10 Werte in % von 50% bis 110%
In den Zellen A1 bis A10 steht ein Text, dahinter also in B1 bis B10 die Prozentwerte.
Dann steht in C1 ein Objektspezifischer Wert/ein E...
23.02.2009 11:55:52
Thread-ID: 1053025
3 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
5
6
2
9
2
4
3
7
4
2
3
7
1
4
3
23
23
1
6
9
4
4
9
4
4