Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1696to1700
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
Inhaltsverzeichnis

Bei Öffnen alle Spalten einblenden

Bei Öffnen alle Spalten einblenden
12.06.2019 15:05:28
MiaLeMe
Hallo zusammen,
Könnt ihr mir vielleicht weiterhelfen mit folgendem Problem? :
Ich hab über Workbook_Open() in der Arbeitsmappe einen Befehl, der die Tabelle gegen UserÄnderungen sperrt/schützt, also "UserInterfaceOnly:=True".
Jetzt bräuchte ich aber noch einen Befehl, der alle Columns einblendet, wenn ich die Tabelle öffne. Ich habe das versucht mit "ActiveSheet.Columns.Hidden = False" Aber das nimmt er nicht und "Workbook" nimmt er davor anstelle von Active Sheet auch nicht... ihr wisst bestimmt wie das geht?
LG
Mia Le Mee

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

Betreff
Datum
Anwender
Anzeige
AW: Bei Öffnen alle Spalten einblenden
12.06.2019 15:14:36
Werni
Hallo Mia
Anstatt ActiveSheet solltest du den Blattnamen angeben.
Sheet("Tabelle1").Unprotect
Sheet("Tabelle1").Cells.EntireColumn.Hidden = False
Sheet("Tabelle1").Protect
Gruss Werni
AW: Bei Öffnen alle Spalten einblenden
12.06.2019 15:18:58
Werni
Hallo Nochmal
Sollte Sheets heissen
Gruss Werni
AW: Bei Öffnen alle Spalten einblenden
12.06.2019 15:17:55
Torsten
Hallo Mia,
ActiveSheet.Columns.Hidden = False
muesste iegentlich funktionieren. Kannst aber mal versuchen:
ActiveSheet.Cells.EntireColumn.Hidden = False

Wenn das auch nicht hilft, dann sind deine Spalten vielleicht nicht ausgeblendet sonder nur die Groesse ist veraendert, sodass man sie nicht sieht.
Gruss Torsten
Anzeige

307 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige