Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
364to368
364to368
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

activesheet veryhidden

Forumthread: activesheet veryhidden

activesheet veryhidden
16.01.2004 14:13:50
HaJü
Hallo,
in einer Mappe habe ich mehrere Tabellenblätter markiert und will sie mit

Sub Sheets_unsichtbar()
Application.ScreenUpdating = False
With ThisWorkbook
Activeselection.Visible = xlSheetVeryHidden
End With
Application.ScreenUpdating = True
End Sub

ALLE veryhidden.
Dummerweise springt Thisworkbook immer in das nachfolgende TB
Wer kann mir einen Tipp geben
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: activesheet veryhidden
16.01.2004 14:18:29
xXx
Hallo,
alle Sheets geht nicht! Eins muss bleiben.
'Activeselection' hab ich auch noch nie gesehen!
For sh=2 to thisworkbook.sheets.count
sh.visible=xlsheetveryhidden
next sh
Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen an die Antworter!
Anzeige
AW: activesheet veryhidden
16.01.2004 14:46:46
ANdreas
Hallo HaJü,
vielleicht hilft Dir ja mein Vorschlag etwas weiter.
Du fügst ein leeres neues Tabellenblatt ein, benennst es einfach um in "1".
Und führst dann das Makro aus. Dabei werden alle anderen Tabellenblätter ausgeblendet, und das "Decktabellenblatt" so angepasst, das man eigentlich nichts mehr sieht :-)

Sub Verstecken()
Dim wb As Worksheet
For Each wb In ThisWorkbook.Worksheets
If wb.Name = "1" Then
With ActiveWindow
.DisplayWorkbookTabs = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayHeadings = False
End With
wb.Rows.Hidden = True
wb.Columns.Hidden = True
wb.Protect = "Passwort"
Else
wb.Visible = xlSheetVeryHidden
End If
Next wb
End Sub

Hoffe das hilft weiter,
Andreas
Anzeige
AW: activesheet veryhidden
16.01.2004 15:44:10
Ha-Jü
Geht leider beides nicht!
Ich möchte NUR die Markierten Tabellenblätter veryhidden,
ihr wisst doch, mit STRG mehrere Tabellenblätter zur Gruppen zusammenfassen.
Wie kann das nur gehen???
AW: activesheet veryhidden
16.01.2004 15:56:04
ANdreas
Hallo HaJü,
wenn ich Dich richtig verstanden habe, dann so:

Sub Ausblenden()
Dim sh As Worksheet
For Each sh In ActiveWindow.SelectedSheets
sh.Visible = xlSheetVeryHidden
Next sh
End Sub

Hoffe das hilft weiter,
Andreas
Nibbles für Excel
Anzeige
AW: activesheet veryhidden
16.01.2004 16:19:30
Ha-Jü
Hi Andreas,
das ist's exactly.
Gruss aus Arnsberg
ha-jü
;

Forumthreads zu verwandten Themen

geschütztes Blatt - "ersetzen" geht nicht
Meli

Hallo,
ich muß ein geschütztes Blatt befüllen, sprich nur in einigen Zellen darf ich Werte/Verknüpfungen einfügen.
Ich muß ziemlich viele Zellen/Blätter ausfüllen, deswegen möchte ich die Verknüpfungen kopieren und dann durch anderen Text ersetzen lassen. Diese Funktionen (Kopieren/Erse...
30.01.2009 12:43:10
Thread-ID: 1045365
5 Beiträge
xlSheetVeryHidden
Gordon

Moin,
habe folgenen Code in "DieseArebeitsmappe":
Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.DisplayAlerts = False Sheets("Stammdaten").Unprotect Sheets("Bilanzrating").Unprotect Sheets("Z-Score").Unprotect Sheets("Stammdaten").Visible = xlSheetVeryHidden Sheets("...
29.06.2009 13:40:48
Thread-ID: 1085130
7 Beiträge
2 Tabellenblätter in ein PDF nicht möglich
Joachim

Hallo,
ich möchte per VBA das 3. und 4. Tabellenblatt als PDF in EIN Dokument bringen:
Dim n As Integer
Sheets(3).Select
For n = 3 To Sheets.Count
Sheets(n).Select False
Next
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="Adobe PDF", Collate:=True
25.11.2009 08:17:45
Thread-ID: 1119865
6 Beiträge
kopieren eines großen Tabellenblatts nicht möglich
Bibabutzel

Hallo zusammen,
der nette Sepp (Josef Ehrensberger) aus diesem Forum hat mir ein Makro geschrieben, das nach Erfüllung verschiedener Bedingungen mehrere neue Tabellenblätter erzeugt, indem ein "Vorlage-Tabellenblatt" kopiert wird. Das Makro funktioniert tadellos - allerdings nur, wenn das "...
15.01.2010 23:04:46
Thread-ID: 1130392
8 Beiträge
Anzeige
xlSheetVeryHidden, screenupdating...
hans

Hallo zusammen,
ich habe ein Problem was ich nicht ganz verstehe, hoffe es ist nur ne Kleinigkeit, die ich grad einfach nicht mehr sehe...
Habe ein Tabellenblatt welches auf veryhidden gesetzt ist.
Von einem anderen Blatt aus, möchte ich auf eine Rechnung zurückgreifen, welche auf d...
27.04.2010 14:13:14
Thread-ID: 1154076
3 Beiträge
VBA - xlSheetHidden-Blätter bearbeiten
Dogbert

Hallo!
Ich habe immer wieder folgendes Problem: Ich muss aus einer Arbeitsmappe, die versteckte Arbeitsblätter enthält, die versteckten Blätter rauslöschen.
Nun suche ich ein Makro, das mir dieses erledigt, es soll so aussehen (jetzt mal ganz umgangssprachlich formuliert):
n = Anz....
05.11.2010 11:44:42
Thread-ID: 1185339
3 Beiträge
Copy aus xlVeryHidden Sheet
Maria

Der Übersicht halber ein neuer Thread, weil sich das Problem etwas verlagert hat.Ich versuche Daten aus dem xlVeryHidden Sheet in ein anderes (sichtbares) Sheet zu kopieren. Egal was ich wie versuche, es gibt alle möglichen Fehlermeldungen. Gibt es da irgendwelche besonderen Mittel & Wege?
13.05.2002 12:34:40
Thread-ID: 120429
8 Beiträge
VBA Alle Blätter (xlVeryHidden) in Mappe schützen
Christian

Kann ich per VBA alle Sheets (aktuell ca. 25 , 1 sichtbar, 24 xlVeryHidden) in der jeweiligen Arbeitsmappe per VBA schützen / Blattschutz aufheben ?Danke
Christian
24.05.2002 14:37:49
Thread-ID: 123500
4 Beiträge
Zelle kopieren in anderes Blatt geht nicht
Joel

Hallo zusammen
Ich weis nicht warum, aber irgendwie geht das nicht, wenn ich eine ganze Zelle in ein neues Blatt kopieren will. Kopieren geht schon, aber es nimmt nicht alles. Es kopiert mir nur einen Teil (etwa 30%).
Das ist doch nicht normal oder?
Danke schon im Voraus.
Gruss...
10.01.2012 10:08:47
Thread-ID: 1245445
14 Beiträge
Anzeige
Makro für alle Tabellenblätter (Filter,ausblenden.
Maggie

Hallo
ich habe 3 Makros welche nur auf dem aktiven Tabellenblatt laufen, bräuchte sie aber so das sie gleichzeitig in allen Tabellenblättern laufen... habe Null-Ahnung wie ich das hin bekommen soll...
kann mir bitte jemand dabei helfen?
Gruß
Maggie
hier die 3 Makros
---...
06.05.2012 15:13:47
Thread-ID: 1262489
9 Beiträge
VBA Zeile ausblenden wenn Spalte F wert 0
Bernd

Hallo zusammen,
komme leider nicht weiter, habe schon viele Codes ausprobiert keines hat funktioniert. Meine VBA Kenntnisse sind sehr gering.
Wer kann mir bei der Lösung behilflich sein?
Vielen Dank schon mal im Voraus!
Gruß
Bernd
23.03.2013 01:23:10
Thread-ID: 1305603
4 Beiträge
Sheet veryhidden - Verhindern Auswahl über Index
Prevertex

Hallo zusammen.
Ich möchte das Aufrufen von Blättern nur über meine eigenenen Makros garantieren.
Die Blätter sind schon veryhidden und haben codierte Namen. VBA ist passwort-geschützt und eigentlich müssen Makros aktiviert sein, damit irgendwas läuft.
Beim Testen habe ich festgest...
16.06.2013 20:57:13
Thread-ID: 1317968
11 Beiträge

Beliebteste Forumthreads (12 Monate)

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