Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 11:13:07
Eingezeichnete Standardabweichung im Graphen begrenzen
24.04.2024 11:06:38
WENN; zwischen zwei Daten
24.04.2024 09:53:18
Wartungsliste automatisch aktualisieren
24.04.2024 09:36:02
Wenn Wert x in Zelle a, dann Wert y in Zelle b
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1368to1372
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
1368to1372
1368to1372
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA - Dropdown - Zeilen einblenden

VBA - Dropdown - Zeilen einblenden
16.07.2014 12:00:38
Alex Mueller

Hallo,
bin leider absoluter VBA Anfänger und habe ein "Problemchen" in Excel, welches sich denke ich nur mit VBA lösen lässt.
Habe (stundenlang) recherchiert und versucht mir VBA Code zusammenzuschnipseln und umzubauen, hat aber leider nicht funktioniert.
Es geht um folgendes Problem:
In den Zellen B6 - B12 ist ein Dropdown (mit zwei Optionen "X" und " ") also 2. leer.
Wenn ich jetzt in einer Zelle also z.B. B6 "X" auswähle, sollen die komplette Zeilen 22-24 eingeblendet werden (falls zweite option ausgewählt dann standardmässig ausgeblendet).
Genauso soll es auch bei B7-B12 funktionieren, also wenn eine mit X ausgewählt wird, dann für B7 dementsprechend Zeile 25-27 eingeblendet werden usw.
Ich wäre euch wirklich seehr dankbar, wenn jmd mal drüberschauen könnte, da ich das für die Arbeit brauche.
Vielen lieben Dank,
Schöne Grüße aus München,
Alex

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - Dropdown - Zeilen einblenden
16.07.2014 13:24:34
Daniel
Hi
Würde ich so machen:
1. füge eine Hilfsspalt ein mit einer Formel, die Wahr als Ergebnis hat, wenn die Zeile Angezeigt werden soll und Falsch, wenn sie ausgeblendet werden muss
Für die Zeilen 22-24 wäre die Formel =B6="x"
Für die Zeilen 25-27 wäre die Formel =B7="x"
Usw.
Wenn's immer Blöcke von 3 Zeilen sind, kannst du auch diese einheitliche Formel verwenden:
=Index(B:B;Abrunden((Zeile()-22)/3;0)+6)="x"
Aktiviere den Autofiltern und filtere in dieser Spalten nach wahr.
Wenn du jetzt in der Spalten B einen wer änderst, musst du nur den Autofilter entsprechend aktualisieren.
Gruß Daniel

Anzeige
AW: VBA - Dropdown - Zeilen einblenden
16.07.2014 14:39:41
Christian
Hallo Alex,
so was ähnliches hatte ich mal vor einiger Zeit hier angefragt, laienhaft umgebaut auf Deine Bereiche:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim xzelle As Range, arow As Long, erow As Long
Set xzelle = ActiveCell
arow = ActiveCell.Row + 16 + (2 * (ActiveCell.Row - 6))
erow = ActiveCell.Row + 18 + (2 * (ActiveCell.Row - 6))
If Not Intersect(Target, Range("B6:B12")) Is Nothing Then
If xzelle = "x" Then
Range(Rows(arow), Rows(erow)).Hidden = False
ElseIf xzelle = " " Then
Range(Rows(arow), Rows(erow)).Hidden = True
End If
End If
End Sub
MfG Christian

Anzeige
AW: VBA - Dropdown - Zeilen einblenden
16.07.2014 23:32:01
Ewald
Hallo,
etwas kürzer
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Zeile As Long
If Not Intersect(Target, Range("B6:B12")) Is Nothing Then
Zeile = Target.Row * 3 + 4
If Target.Value = "x" Then
Range("A" & Zeile & ":A" & Zeile + 2).EntireRow.Hidden = False
Else
Range("A" & Zeile & ":A" & Zeile + 2).EntireRow.Hidden = True
End If
End If
End Sub
Damit das direkt auch richtig funktioniert, sollte in B6 bis B12 kein "x" sein und die Zeilen 22-42 müssen ausgeblendet sein oder alle haben ein "x" und alle Zeilen eingeblendet.
Gruß Ewald

Anzeige
AW: VBA - Dropdown - Zeilen einblenden
18.07.2014 14:56:19
Hajo_Zi
Hallo Ewald,
warum offen, Du hast doch eine Lösung vorgeschlagen.
Lasse offen den Fragesteller entscheiden. Heute ist es nicht mehr üblich eine Rückmeldung zu geben, dann ist der Beitrag 6 Tage offen.

AW: VBA - Dropdown - Zeilen einblenden
19.07.2014 23:37:49
Ewald
Hallo Hajo,
war mein Fehler,hatte das falsche Kästchen aktiviert,wollte eigentlich nur das eine Mail kommt,falls eine Antwort kommt.

Heute ist es nicht mehr üblich eine Rückmeldung zu geben
dann sollte man den Fragesteller darauf hinweisen, das allein Anstand und Höflichkeit es gebietet auf eine Antwort eine Rückmeldung zu geben.
Was wäre denn wenn sich die Helfer auf den selben Standpunkt stellen
Warum antworten,kommt ja doch keine Rückmeldung.
dies kann doch nicht der Sinn eines Forums sein.
Gruß Ewald

Anzeige
AW: VBA - Dropdown - Zeilen einblenden
20.07.2014 11:08:06
Hajo_Zi
Hallo Ewald,
ich versuche es schon seit Jahren in einem anderem Forum. Den Leuten in jedem Beitrag mitzuteilen, dass Sie erledigt Beiträge doch als solche Kennzeichnen sollen.
Der Erfolg ist 0,0 %
Ich vermute bei Erinnerung an Rückmeldung wäre das gleiche.
Gruß Hajo

AW: VBA - Dropdown - Zeilen einblenden
20.07.2014 11:50:12
Ewald
Hallo Hajo,
leider hast du recht, allerdings kann man auch dies steueren, meistens sind es ja immer die selben Fragesteller.
Hilfreich war immer, wenn eine neue Anfrage kam, keine Antwort zu der neuen Frage zu geben sondern darauf hinweisen "Wie wärs, wenn du erst mal für deine anderen Fragen eine Rückmeldung gibst".
Die Entschuldigungen sind dann manchmal sehr abenteuerlich, aber nach dem zweiten oder dritten Mal, funktioniert es dann auf einmal.
Gruß Ewald

Anzeige
AW: VBA - Dropdown - Zeilen einblenden
20.07.2014 12:18:13
Hajo_Zi
Hallo Ewald,
ich bin da wohl der falsche Partner mit dem Ansprechen. Dazu schreibe ich zu viele Beiträge.
Gruß Hajo

318 Forumthreads zu ähnlichen Themen

VBA Zeilen ein/ausblenden + weiters Problem
oblivion

hallo, ich hab mal wieder ein kleines und ein etwas größeres Problem
erstmal zum kleinen. wie bekomme ich es mit hilfe von einem vba hin, wenn ich ein kontrollkästchen mit einem Hacken versehe, dann bestimmte Zeilen (Sagen wir mal Zeile 20 bis 30), die ich vorher versteckt hatte, nun zum vo...
10.08.2008 00:22:06
Thread-ID: 1000558
3 Beiträge
Anzeige
Makro - Zeilen ein- und ausblenden
WalterK

Hallo,
den Code habe ich vor längerer Zeit in einem Forum gefunden und die Bezeichnung "Ein" und "Aus" auf "Privat+Intern Ein" und "Privat+Intern Aus" abgeändert. Noch ist es so, dass über den CommandButton die Zeilen mit den Nichtleeren Zellen in Spalte H aus- oder eingeblendet werden.
...
05.07.2009 11:07:55
Thread-ID: 1086451
6 Beiträge
Automatisch Spalten ausblenden - mit einem Makro?
Jan

Hallo nochmal!
Ich wurde gerade schon einmal in Weltrekordzeit bei meinem anderen Problem geholfen. Vielen herzlichen dank! Nun stehe ich aber erneut vor einer für mich schwierigen Aufgabe. Folgendes Problem:
Wir sind mehrere Gewerke die an einer Excel Tabelle arbeiten. Die Excel Tabell...
28.07.2009 15:46:49
Thread-ID: 1091988
7 Beiträge
Anzeige
bestimmte Spalten ein- und ausblenden (VBA) | Herbers Excel-Forum
Matthias
Hi,
ich bräuchte ein wenig Hilfe zu folgendem Vorhaben:
In einer Liste, in der Identnummern für eine Maschine verwaltet werden, sollen bestimmte Spalten über ein Auswahlmenü ein- und ausgeblendet werden können. Dabei sollen bei Auswahl einer Maschinenbaugröße (von 110 bis 610) immer drei Sp...
24.01.2010 16:55:43
Thread-ID: 1132489
4 Beiträge
VBA: Text in Spalten - mehrere Spalten | Herbers Excel-Forum
Jonathan
Hallo liebe Experten,
ich bräuchte mal wieder etwas Hilfe...
In einer Tabelle stehen in einigen Spalten (jeweils ab Zeile 9 - Zeile 46) Zahlen.
Die Zellen sind als "Standart" definiert. Jedoch ist es so, dass einige Zahlen dennoch nicht als solche erkannt werden. Erst nach einem Doppelk...
05.02.2010 09:43:46
Thread-ID: 1136027
4 Beiträge
Spalten und Zeilen ausblenden per Makro
Stefan

Hallo,
ich möchte per Makro bestimmte Spalten und Zeilen ausblenden. Der mit dem Makrorcorder erst aufgezeichnete und angepaßte Weg blendet mir dann allerdings alle Spalten und Zeilen aus.
Kann mir bitte jemand helfen, wie ich den Code schreiben muss?
Sub Fall2_Spalten_Zeilen_ausb...
06.04.2010 10:10:32
Thread-ID: 1150290
9 Beiträge
VBA Zeilen ein-/ausblenden
Daniel

Hallo
Ich habe eine Frage, ob der nachfolgende VBA-Code vereinfacht werden kann.
Ausgangslage: in der Spalte B sind die Auswahlkriterien (3 stellige Nummern: 101, 102, 103, etc.). Nun soll via Makro alle Zeilen einer bestimmte Nummer (z.B. 101) angezeigt werden.
Ist es möglich, den...
07.07.2010 10:43:30
Thread-ID: 1165894
8 Beiträge
VBA Problem bei Zeilen ausblenden
Lorenz

Hallo Excelspezialisten,
Leider funktioniert der untenstehende Code nur wenn nach Zeile 97 alle Zeilen eingeblendet sind.
Ich habe aber ab Zeile 98 alle Zeilen ausgeblendet.
if Target.Row >= 14 Then
iZ = Target.Row + 1
With Range(Cells(iZ, 1), Cells(97, 1))
.EntireRow...
28.12.2010 14:15:45
Thread-ID: 1193064
8 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
2
4
5
6
5
3
3
8
7
7
3
1
2
5
6
9
5
2
2
4
1
3
2
6
3