Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1840to1844
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
1840to1844
1840to1844
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Zeile ausblenden bei bestimmtem Wert

VBA Zeile ausblenden bei bestimmtem Wert
28.07.2021 11:12:58
Michael
Hallo zusammen,
ich habe folgendes Problem:
Mein Arbeitsblatt 2 enthält aus einem anderen Arbeitsblatt 1 (mit =....) verlinkte Werte. Ich möchte nun im Arbeitsblatt 2 alle Zeilen automatisch ausgeblendet haben, die in Spalte K den Wert "Nein" aufweisen. Am besten wahrscheinlich mit einem WorksheetChange Event vermute ich?
Vielleicht kann hier jemand weiterhelfen. Vielen Dank

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Zeile ausblenden bei bestimmtem Wert
28.07.2021 11:17:37
Hajo_Zi
warum nicht Autofilter?
GrußformelHomepage
AW: VBA Zeile ausblenden bei bestimmtem Wert
28.07.2021 11:26:09
Michael
Hallo Hajo,
ich kann im Moment keinen Autofilter setzen, da die Spalte K noch keine Einträge hat. Diese wird erst später durch andere User befüllt, die aber nicht so Excel-affin sind, weshalb ich es gerne dynamisiert hätte.
VG Michael
AW: VBA Zeile ausblenden bei bestimmtem Wert
28.07.2021 12:01:27
Oberschlumpf
Hi Michael,
da es primär nicht eine Zellwertänderung, sondern mit "=..." eine Formelberechnung ist, vermute ich eher, der Code muss ins Calculate-Ereignis des Tabellenblatts.
Versuch mal (ungetestet)

Private Sub Worksheet_Calculate()
Dim lloRow As Long
'suche beginnt in Zeile 1 (lloRow = 1), wenn erst später, dann anpassen
'die letzte, genutzte Zeile wird in Spalte 1 vermutet (.Count, 1), wenn andere Spalte, dann anpassen
For lloRow = 1 To Cells(Rows.Count, 1).End(xlUp).Row
If Range("K" & lloRow).Value = "Nein" Then
Rows(lloRow).EntireRow.Hidden = True
Else
Rows(lloRow).EntireRow.Hidden = False
End If
Next
End Sub
Beachte die Hinweise.
Hilfts?
Wenn nein,...
...dann teste den Code doch mal im Change-Event
...immer noch nein, dann zeig bitte per Upload eine Bsp-Datei.
Ciao
Thorsten
Anzeige
AW: VBA Zeile ausblenden bei bestimmtem Wert
28.07.2021 13:38:59
Michael
Hi Thorsten,
vielen lieben Dank, leider hat es nicht geklappt. Ich habe mal eine Beispieldatei mit ein paar Anmerkungen erstellt. Am besten nicht hinterfragen, warum ich das auf zwei Sheets brauche, aber das ist die Vorgabe :)
Hier der Link: https://www.herber.de/bbs/user/147347.xlsx
Danke, wenn du noch helfen kannst!
VG Michael
AW: VBA Zeile ausblenden bei bestimmtem Wert
28.07.2021 14:48:48
Oberschlumpf
Hi Michael,
ich hatte extra darauf hingewiesen, dass du meine Kommentare im Code beachten sollst.
Mein Code hatte sich auf Zeile 1 für Beginn der Datenzeilen und auf Spalte A, auch Beginn der Datenzeilen, bezogen
(du hattest ja gar nix angegeben, in welchen Zeilen/Spalten all deine Daten stehen)
So, in der Bsp-Datei von dir beginnen die Datenzeilen erst in Spalte B und erst in Zeile 3.
Nach Anpassung meines Codes läuft dieser so, wie ich mir gedacht hatte.
hier, deine Bsp-Datei zurück:
https://www.herber.de/bbs/user/147350.xlsm
in der Bsp-Datei funktioniert nun alles.
Hilfts?
Ciao
Thorsten
Anzeige
AW: VBA Zeile ausblenden bei bestimmtem Wert
28.07.2021 15:03:15
Michael
Hi Thorsten,
vielen Dank, es läuft perfekt. Ich hatte deine Kommentare beachtet, aber dachte, dass ich den Spaltenindex für die Spalte mit dem "Nein" angeben muss.
Merci!

313 Forumthreads zu ähnlichen Themen

Zeilen Kopieren mit Formeln u. Formaten
Lemmi

Hallo zusammen,
ich möchte einen Block (5Zeilen) am Ende einer Tabelle einfügen!
Diese Zeilen sollen mit ihren Formaten unf Formel Kopiert und am Ende der Leiste eingefügt werden!
Die Formeln sind in den Roten Zellen.
Die Zellen sonst sind bis auf Spalte A und B ohne Inhalt!
11.08.2008 14:11:35
Thread-ID: 1000856
5 Beiträge
Anzeige
wenn > Spalte I, dann neue Zeile
Dennis

Hallo Leute,
ich benötige einmal Hilfe eines Experten, da ich noch in den Anfängen stecke.
Ich habe folgendes Problem:
Ich habe eine Liste mit Datensätzen (jeder Datensatz steht für eine Person). Die Datensätze sind unterschiedlich lang. Grds. sind die Datensätze von Spalte A - Spal...
04.09.2008 16:41:00
Thread-ID: 1007458
8 Beiträge
Zeile kopieren wenn wert in Zelle
Andreas

hallo zusammen
in der recherche habe ich diesen code gefunden. da ich jedoch alle zeilen bei welchen in der zelle der spalte h ein "x" steht in ein anderes tabellenblatt kopieren möchte muss ich den code anpassen. nun weiss ich leider nicht was ich verändern muss. wäre super, wenn mir das j...
07.09.2008 20:32:00
Thread-ID: 1008007
3 Beiträge
Anzeige
Werte aus PRN Datei einlesen über 65563 Zeilen
Andre´

Hallo alle zusammen,
Ich lese aus einer PRN-Datei die Werte ins Excel ein wie folgt:
Option Explicit
Sub Daten_einlesen() Dim iFree As Integer, strText As String, arrTmp, arrDaten() Dim lngCounter As Long, lngStart As Long, lngEnde As Long ReDim arrDaten(1 To 11, 1 To 1) iFree = Fr...
04.11.2008 08:39:00
Thread-ID: 1021464
12 Beiträge
Wenn Formel mit Spalte
Maris

Hi zusammen,
ist das möglich, dass ich eine Wenn-Formel auf eine Spalte und eine Zelle in der Zeile beziehe? Bsp.:
Tabelle A B C Ergebnis ERM VOLL OHNE 1 x ERM 2 x...
05.11.2008 16:30:00
Thread-ID: 1021984
6 Beiträge
Zeilen kopieren wenn wert in Zelle
Andreas

hallo zusammen
finde für meine herausforderung nichts passendes in der recherche. :-(
ich habe eine tabelle1 mit diversen Einträgen. die Spalten AC, AD, AE enthalten jeweils ein Datum (ist jedoch nicht in jeder Zeile der Fall)
Nun möchte ich folgende Schritte automatisieren
Erst...
24.11.2008 17:08:00
Thread-ID: 1027397
3 Beiträge
Wenn Spalte D übereinstimmt, dann Inhalt kopieren
Wolfgang

Hallo,
in einer Mappe befinden sich zwei Tabellenblätter -Basis und Basis1-, in Spalte D steht die Kundennummer. Wie kann ich erreichen, dass ein Abgleich zu weiteren Tabellen -Tabelle1-4- (es können 4, aber auch nur 1 Tabellenblatt vorhanden sein) erfolgt und wenn die Kundennummer aus Tabe...
30.11.2008 20:33:51
Thread-ID: 1029110
6 Beiträge
wenn zelle gelb, dann ganze zeile loeschen
maxx_1985

Hi zusammen
wie kann man excel das folgende sagen;
wenn in spalte A irgendwo eine gelbe zelle vorkommt, dann loesche mir die ganze ZEILE.
gelb sind naemlich die zwischensummen, die ich raus haben moechte.
danke euch vielmals
gruss
denis
10.12.2008 16:19:09
Thread-ID: 1031735
8 Beiträge
Anzeige

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
4
7
7
2
3
11
5
2
5
7
2
7
12
2
3
5
9
3
2
8
1
6
4
2
12