Office: Tabellenblatt einblenden nach ausblenden

Hallo,

ich habe bei meinem Projekt sämtlich Tabellenblätter ausgeblendet. Nun möchte ich aber in der Startsequenz, dass das Tabellenblatt "Grunddaten" wieder eingeblendet wird.
So sieht´s bei mir aus, aber es wird nicht eingeblendet.

Sub Start_Modul()

ActiveWindow.DisplayWorkbookTabs = False
Sheets("Grunddaten").Visible = True
Register.Show vbModeless

End Sub

Hmm.

Christian

:)

 

Hallo Christian,

mich würde interessieren, wie du das gemacht hast. Wenn ich das versuche, bekomme ich immer die Meldung

"Die Arbeitsmappe muss mindestens ein sichtbares Arbeitsblatt enthalten.
Um das ausgewählte Blatt (oder Blätter) auszublenden, zu löschen oder zu verschieben, müssen Sie zuerst ein neues Blatt einfügen oder ein ausgeblendetes Blatt wieder einblenden."

 

Es sind höchtens alle bis auf ein Blatt ausgeblendet, sonst geht's nicht.
Das Einblenden blendet "Grunddaten" wieder ein. Da Du die Tabs unten ausgeblendet hast und Du Grunddaten nicht aktivierst bleibt das aktuelle Blatt aktiv.
Also, was fehlt? Ein Activate!

 

Hi,

damit geht´s

ActiveWindow.DisplayWorkbookTabs = False

Bei mir sind dann alle "Tabs" ausgeblendet

 

Moin!
Du hast nichts ausgeblendet, sondern die Anzeige der Tab-"Laschen" ausgeschaltet.
Die Lösung kam bereits von Storax!
Statt:
Sheets("Grunddaten").Visible = True
ist folgendes richtig:
Sheets("Grunddaten").Activate

Gruß Ralf

 

Wenn ich die Leiste ausgeblendet habe, dann geht´s leider nicht mit .activate.
Ist aber jetzt auch egal, habe mir einfach eine Umschaltknopf zum ein und ausblenden auf das Userform "geklatscht"

Danke trotzdem

Christian

 

Hallo Christian,

Selbstverständlich geht das! Code:

 

Christian ist mit seinem "Wissen" nicht allein LOL
http://www.mrexcel.com/forum/excel-q...ll-sheets.html