Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1288to1292
1288to1292
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblätter je nach Zellinhalt ein-/ausblenden

Forumthread: Tabellenblätter je nach Zellinhalt ein-/ausblenden

Tabellenblätter je nach Zellinhalt ein-/ausblenden
27.11.2012 15:13:23
R.
Hallo ins Forum!
Ich suche eine Lösung für das folgende Problem:
Je nach Benutzergruppe sollen verschiedene Tabellenblätter einer Arbeitsmappe ein- oder ausgeblendet werden.
Die Steuerung hierzu soll in einem separaten Tabellenblatt passieren, in etwa:
Zelle A1 = Auswahl der Gruppe (1,2,3 oder 4),
dann eine einfache Tabelle mit Zeilenköpfen "Name der Tabellenblätter" (Tabelle1, Tabelle2, ..., Tabelle48), Spaltenköpfen "Name der Gruppe" (Gruppe1, Gruppe2 usw.) sowie den Zellinhalten "ein" oder "aus" bzw. 0 oder 1 (für Tabellenblatt ein- oder ausblenden).
Ich gehe davon aus, dass man hier 2 Prozeduren miteinander verschachteln muss. Leider übersteigt dieses Problem meine Kenntnisse. Kann mir jemand helfen?
Viele Grüße
Rüdiger

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblätter je nach Zellinhalt ein-/ausblenden
27.11.2012 15:52:15
Rudi
Hallo,
das ist eine immer wiederkehrende Frage.
Schau mal ins Archiv.
Gruß
Rudi

AW: Tabellenblätter je nach Zellinhalt ein-/ausblenden
27.11.2012 16:02:11
R.
Vielen Dank für den Hinweis, Rudi.
Ich gehe grundsätzlich erst ins Archiv (oder googele), bevor ich das Forum mit einer Anfrage "belaste".
Leider hatte ich dort nichts Passendes zu meinem Problem gefunden.
Besten Gruß
Rüdiger

Anzeige
AW: Tabellenblätter je nach Zellinhalt ein-/ausblenden
27.11.2012 16:25:03
Rudi
Hallo, 
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lRow As Long, lColumn As Long
If Target.Address = "$A$1" Then
If Application.CountIf(Columns(3), Target) Then
lRow = Application.Match(Target, Columns(3), 0)
For lColumn = 4 To Cells(lRow, Columns.Count).End(xlToLeft).Column
With Sheets(Cells(1, lColumn).Value)
If Cells(lRow, lColumn) = 1 Then
.Visible = xlSheetVisible
Else
.Visible = xlSheetVeryHidden
End If
End With
Next
End If
End If
End Sub

Tabellenaufbau:
ABCDEFGHIJ
14 Tabelle2Tabelle3Tabelle4Tabelle5Tabelle6Tabelle7Tabelle8
2 10010000
3 21011111
4 30111000
5 41000100

Gruß
Rudi

Anzeige
AW: Tabellenblätter je nach Zellinhalt ein-/ausblenden
27.11.2012 20:25:40
R.
Hallo Rudi,
vielen herzlichen Dank!!!
Beste Grüße
Rüdiger

AW: Tabellenblätter je nach Zellinhalt ein-/ausblenden
29.11.2012 17:01:37
R.
Hallo nochmal,
ich verzweifle gerade mit meinen unzähligen "Try-and-error"-Versuchen:
wie muss ich den o.g. Code von Rudi anpassen, damit die Gruppen 1-4 in Zeile 1 und Tabelle2-Tabelle8 in Spalte C stehen können?
Es geht mir also um den Tausch von Zeilen und Spaltenüberschriften.
Dank an alle VBA-Gurus!
Rüdiger

Anzeige
AW: Tabellenblätter je nach Zellinhalt ein-/ausblenden
01.12.2012 18:34:57
schauan
Hallo Rüdiger,
wenn Du Spalten und Zeilen vertauschen willst, dann so:
Private Sub Worksheet_Change(ByVal Target As Range)
  Dim lRow As Long, lColumn As Long
  
  If Target.Address = "$A$1" Then
    If Application.CountIf(Range("D1:G1"), Target) Then
      lColumn = Application.Match(Target, Range("D1:G1"), 0) + 3
      For lRow = 4 To Cells(Rows.Count, lColumn).End(xlUp).Row
        With Sheets(Cells(lRow, 3).Value)
          If Cells(lRow, lColumn) = 1 Then
            .Visible = xlSheetVisible
          Else
            .Visible = xlSheetVeryHidden
          End If
        End With
      Next
    End If
  End If
  
End Sub
Ich habe auch mal ein kleines Userform zusammengebaut, welches ebenfalls Blätter aktiviert und ein- und ausblendet, mit einer kurzen Einführung in die Klassenprogrammierung. Da wird das userform schrittweise erklärt und aufgebaut.
Beitrag:
http://www.xltips.de/ftxt/tab-ste/Klassen_txt.html
Wenn die "Theorie" nicht so von Interesse ist - Direktdownload:
http://www.xltips.de/ftxt/tab-ste/Blaetter/UserformButtonsCls004.xlsm

Anzeige
AW: Tabellenblätter je nach Zellinhalt ein-/ausblenden
04.12.2012 09:34:22
R.
Hallo schauan!
Merci beaucoup!!!
Danke auch für Deine interessanten Links!
Rüdiger
;

Forumthreads zu verwandten Themen

Exceltabelle in Word
S.H.

Hallo,
evtl. bin ich auch im falschen Forum, aber trotzdem meine Frage:
Ich habe ein Excel Arbeitsblatt unter word eingefügt und möchte dort weitere Zeilen einfügen. Das funktioniert auch soweit, am Ende der Word Seite ist allerdings Schluss. Ich schaffe es nicht, das die Tabelle einen...
20.10.2008 20:22:26
Thread-ID: 1017796
3 Beiträge
Excel-Tabelle in Word-Dokument
Dieter

Hallo Forum,
in die Übergabe einzelner Werte einer Excel-Tabelle in ein Word-Dokument habe ich mich ganz gut eingearbeitet. Nun stehe ich allerdings vor dem Problem, eine ganze Tabelle oder nur einen zusammenhängenden Teil der Tabelle in ein Word-Dokument zu übertragen. Kann mir jemand ein...
27.12.2008 16:58:00
Thread-ID: 1035409
8 Beiträge
Anzeige
Excel Tabelle über 2 Seiten in Word
Ralf

Hallo,
ich möchte eine Excel Tabelle in Word einfügen. Das Problem ist, dass die Tabelle sehr lang ist und über 2 Seiten in Word gehen würde. Sie soll auch automatisch aktualisiert werden, wenn die Originaltabelle in Excel verändert wird.
Gibt es da eine Möglichkeit?
Vielen Dank!
16.04.2009 22:29:58
Thread-ID: 1069191
3 Beiträge
Zwei Excel-Tabellen in WinWord verknüpfen
Andreas

Hallo zusammen,
ich habe eine Word-Datei, in der sich an zwei verschiedenen Stellen zwei eingefügte Excel-Dateien befinden. Diese wurde vor langer Zeit mal aus Excel kopiert. Das Original in Excel existiert nicht mehr.
Jetzt möchte ich das Ergebnis einer Berechnung aus der ersten Tabell...
04.08.2009 13:53:46
Thread-ID: 1093412
2 Beiträge
Excell Tabelle in Word und Format behalten
Christian

Hallo.
Bei importieren einer Excell Tabelle in Word wird das Format der Tabelle immer "verhauen" = in die länge gezogen. Das sieht bescheiden aus. Gibt es eine Möglichkeit die Tabelle so zu importieren damit das Seitenverhältnis bleibt. Ich arbeite mit Word und Excell 2007.
Danke im Vor...
05.08.2009 14:48:21
Thread-ID: 1093759
2 Beiträge
Anzeige
aus Word mit Makro in Excel Tabellenblatt wechseln
Joni

Hi,
ich habe das Problem, dass ich aus einem Worddokument eine Exceltabelle, die bereits geöffnet ist, aktivieren möchte und dann da aus 2 Tabellenblättern Werte auslesen. Ich komm da einfach nicht weiter.
Excel als Object habe ich definiert. Beim Workbook und Sheet klappt das nicht meh...
31.10.2009 00:38:15
Thread-ID: 1113446
3 Beiträge
bestimmte Tabellen ein- resp. ausblenden SWITCH
Peter

Guten Abend
In einer grösseren Datei habe ich einige Tabellen, deren Namen einer der Strings "_FA", "_FV" oder "_FF" enthält.
Nun möchte ich ein Makro, mit dem ich diese Tabellen identifiziere und die einzelnen Tabellen einblende, wenn sie ausgeblendet sind, resp. umgekehrt.
Fragen:...
19.11.2009 17:36:31
Thread-ID: 1118717
19 Beiträge
In Tabelle Zellfarbe abfragen - Spalte ausblenden
Gegga

So und weitergehts :)
Ich baue gerae iene etwas aufwendigere Tabelle, wo ich mit mehreren Hilfsspalten arbeiten muss die ausgeblendet werden.
Ich habe einen Com.Button eingefügt mit folgendem Code:
Columns("BJ:BK").Select
Selection.EntireColumn.Hidden = True
Funzt, klar. Da...
21.12.2009 09:56:44
Thread-ID: 1125270
9 Beiträge
Tabellenblatt per Makro ein-/ ausblenden
Bibabutzel

Hallo Ecxel-Gemeinde,
ich mache gerade meine ersten eigenen Gehversuche in Sachen VBA und benötige mal bitte Eure Hilfe. Das Problem ist (für die, die es können) wahrscheinlich ein relativ einfaches:
Im Bereich A20:A59 stehen Namen und zu jedem dieser Namen gibt es ein Tabellenblatt (da...
17.01.2010 00:16:55
Thread-ID: 1130538
10 Beiträge
Tabellenblätter aus ListBox ein- und ausblenden
Dirk

Hallo,
Ich habe eine Userform mit einer Listbox in der alle eingeblendeten Tabellenblätter und eine Listbox in der alle ausgeblendeten Tabellenblätter enthalten sind. Nun möchte ich per Mausklick auf ein Tabellenblattname in einer der Listboxen das entsprechende Blatt ein- bzw. ausblenden.
17.04.2002 10:18:26
Thread-ID: 113989
3 Beiträge
Anzeige
Excel-Tabellen in Word umwandeln
joko0803

Hallo alle,
ich bin nicht sicher, ob dieses Thema hier her gehört.
Falls nein, wäre ich für das Benennen eines entsprechenden Forums dankbar.
In einem Word Dokument habe ich viele Excel-Tabellen eingebunden.
Dieses Word Dokument muss ich an eine Behörde zur Weiterverarbeitung ve...
07.05.2010 16:29:49
Thread-ID: 1156132
6 Beiträge
Einbindung XLS Tabelle in Word Document
Steffen

Hallo
Kann ich eine Exceltabelle (nichts aufregendes nur Zeilen und Spalten) so in eine Word Dokument einbinden, daß die Tabelle im Worddokument aktuell bleibt?
Also wenn ich die Tabelle ergänze oder ändere, soll die Tabelle im Word Dokument automatisch mitaktuallisiert werden (also wen...
21.09.2010 08:38:34
Thread-ID: 1178661
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige