Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 08:41:23
Zwei Makros in ein Arbeitsblatt - zweite wird nicht ausführt
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1704to1708
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
1704to1708
1704to1708
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Unterschiedliche Spalten ausblenden mit Bedingung

Unterschiedliche Spalten ausblenden mit Bedingung
07.08.2019 10:41:46
Igor
Hallo Gemeinschaft
Die bisherigen Beiträge zu diesem oder ähnlichen Themen haben mich nicht weiter gebracht. Vielleicht kann mir noch einmal jemand detailliert helfen.
Ausgangslage:
Abhängig von Wert in A8 will ich unterschiedliche Anzahl Spalten ausblenden:
Wert in A8 = 1 dann Spalten B:H ausblenden
Wert in A8 = 2 dann Spalten B:G ausblenden
Wert in A8 = 3 dann Spalten B:F ausblenden
...
Wert in A8 = 7 dann Spalte B:B ausblenden
Wert in A8 = 8 dann keine Spalte ausblenden
Musterdatei:
https://www.herber.de/bbs/user/131311.xlsx
In VBA bin ich unerfahren.
Beste Grüsse
Igor

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Unterschiedliche Spalten ausblenden mit Bedingung
07.08.2019 10:54:46
Matthias
Hallo
Ins Tabellenblatt
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A8")) Is Nothing Then
Auswahl
End If
End Sub
In ein Modul z.B. Modul1
Sub Auswahl()
Cells.EntireColumn.Hidden = False
Select Case Range("A8")
Case Is = 1
Columns("B:H").EntireColumn.Hidden = True
Case Is = 2
Columns("B:G").EntireColumn.Hidden = True
Case Is = 3
Columns("B:F").EntireColumn.Hidden = True
Case Is = 4
Columns("B:E").EntireColumn.Hidden = True
Case Is = 5
Columns("B:D").EntireColumn.Hidden = True
Case Is = 6
Columns("B:C").EntireColumn.Hidden = True
Case Is = 7
Columns("B:B").EntireColumn.Hidden = True
End Select
End Sub
... und als xlsm abspeichern!
Gruß Matthias
Anzeige
AW: Unterschiedliche Spalten ausblenden mit Bedingung
07.08.2019 11:16:10
Igor
Hallo Matthias
Vielen Dank für den Code.
Das funktioniert einwandfrei.
Beste Grüsse
Igor

311 Forumthreads zu ähnlichen Themen

Zellen ausblenden mit Wert 0 in Zelle
Ulrich

Hallo zusammen,
wie kann ich einem Tabellenblatt alle Zeilen ausblenden, bei denen in der ersten Zelle eine 0 (null) steht? Geht sowas überhaupt?
Viele Grüße,
Ulrich
01.09.2008 11:08:49
Thread-ID: 1006360
6 Beiträge
Anzeige
Register ein- und ausblenden
HaKa

Hallo Forum
Wie lautete der VBA-Code um z.B. das Register "Tabelle3" aus-, resp. wieder einzublenden?
Gruss Heinz
14.09.2008 15:40:00
Thread-ID: 1009597
5 Beiträge
Spalten ein und ausblenden
Marion65

Hallo zusammen, ich habe hier eine ExcelTabelle welche zum Ein- und Ausblenden der Spalten kleine + bzw. - Zeichen hat. Wie kann ich diese selber erstellen? Vielen Dank, Marion. https://www.herber.de/bbs/user/55401.xls
15.09.2008 20:09:56
Thread-ID: 1009885
4 Beiträge
Anzeige
Zelleninhalt mit CommandButton in Textbox anzeigen
Markus

Hallo an alle!
Mein Makro kann bisher folgendes:
Per Klick auf 1 von 300 Comandbuttons wird der entsprechende Inhalt aus einer von 300 Zellen in eine Textbox geladen.
"Das funktioniert"
Nun möchte ich , nachdem ich einen Button gedrückt habe und der Inhalt in Textbox angezeigt w...
21.11.2008 11:05:00
Thread-ID: 1026664
2 Beiträge
VBA, Notiz ein- und wieder ausblenden
Burghard

Hallo ins Netz,
ich möchte mit Knopfdruck ein Textfeld (mit Inhalt, es existiert schon) oder ein Autoformat (z.B. Gefaltete Ecke) auf dem Blatt an einer bestimmten Stelle für 1 Minute plazieren und danach soll es wieder verschwinden. Also kopieren und dann automatisch die Kopie wieder lösc...
01.12.2008 09:08:18
Thread-ID: 1029158
2 Beiträge
Commandbutton ein und ausblenden
SoulOpa

Hallo und einen schönen Abend,
ich habe eine Frage! und zwar habe ich ein Commandbutton in der Userform erstellt so das der Commandbutton beim Tabellenblatt beim scrollen immer sichtbar ist. Nun würde ich gerne wenn ich die Mappe zwischendurch verlass das der Button verschwindet und wenn ic...
23.01.2009 17:50:27
Thread-ID: 1043094
5 Beiträge
Zeilen Ein. und Ausblenden
KayR

Hallo,
würde gerne folgendes realisieren, hab aber von VBA
kaum Ahnung.
Wenn Tabelle2!A8 = FALSCH, dann sollen in Tabelle1 die
Zeilen 8,9,10 ausgeblendet werden.
Wenn Tabelle2!A8 = WAHR, dann sollen die Zeilen 8,9,10
wieder eingeblendet werden.
Kann mir jemand bitte...
27.01.2009 20:09:00
Thread-ID: 1044366
6 Beiträge
Ein-/Ausblenden v. Arbeitsblättern mit VBA
Lenni

Moin Excellianer!
Mit folgendem Code "Sheets("Tabelle1").Visible = False" in einem UserForm blende ich die Tabelle 1 und 2 aus. Mit "True" für "False" blende ich sie wieder ein.
Das Ganze hat nur den Nachteil, dass man die Tabelle 1 und/oder 2 über das Menü "Format > Blatt > Einbl...
01.02.2009 00:12:00
Thread-ID: 1045802
4 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
5
2
4
3
5
1
1
4
5
3
3
4
2
2
5
6
6
7
5
2
3
21
5
7
8