Live-Forum - Die aktuellen Beiträge
Datum
Titel
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
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
620to624
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
620to624
620to624
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blätter ausblenden!

Blätter ausblenden!
05.06.2005 19:43:36
Tayyar
Hallo,
ich brauche wieder hilfe. Es geht um folgendes: ich will beim starten exel-datei alle arbeitsblätter ausbländen bis auf einer das habe ich selber probiert funktioniert auch aber beim start macht jedes blatt einzelner sichtbar( wie Filmszenen) dan blenden alle aus. Ich will aber auf ein mal alle ausblendet.Nicht wie filmszenen. ich füge den Kod wie ich gemacht habe.
Kod: (Start Seite)Tabelle4.Visible = xlSheetVisible

Tabelle5.Visible = xlSheetHidden
Tabelle1.Visible = xlSheetHidden
Tabelle2.Visible = xlSheetHidden
Tabelle.Visible = xlSheetHidden
Tabelle4.Visible = xlSheetHidden
Tabelle10.Visible = xlSheetHidden
Tabelle11.Visible = xlSheetHidden
Tabelle12.Visible = xlSheetHidden
Tabelle13.Visible = xlSheetHidden
Tabelle3.Visible = xlSheetHidden
Tabelle5.Visible = xlSheetHidden
Tabelle6.Visible = xlSheetHidden
Tabelle7.Visible = xlSheetHidden
Tabelle8.Visible = xlSheetHidden
Tabelle9.Visible = xlSheetHidden
mfg
Tayyar

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

Betreff
Datum
Anwender
Anzeige
AW: Blätter ausblenden!
05.06.2005 19:47:06
Hajo_Zi
Hallo Tayyar,
Bildschirmaktualsierung, Makro laufen lassen ohne Anzeige
damit die Ausführung des Makros nicht angezeigt wird, kann man vor den Code schreiben
application.screenupdating = False im Hintergrund ohne Anzeige
Man darf dann nur nicht vergessen, dieses wieder auf True zu setzen.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


AW: Blätter ausblenden!
05.06.2005 20:12:08
Tayyar
Hallo,
Danke für eure hilfe,es funktioniert.
mfg
Tayyar
Anzeige
AW: Blätter ausblenden!
05.06.2005 19:48:57
Fred
Option Explicit

Private Sub Workbook_Open()
Dim wks As Worksheet
Application.ScreenUpdating = False
For Each wks In ThisWorkbook.Worksheets
If wks.Name <> "Tabelle4" Then wks.Visible = xlSheetHidden
Next
Application.ScreenUpdating = True
End Sub

mfg Fred

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige