Ausgeblendetes Tabellenblatt verschwunden

[David Lange]

Hi,

ich habe ein seltsames Problem festgestellt, uzw habe ich mit folgenden Makro ein Ausgeblendetes Tabellenblatt Kopiert und neu benannt allerdings ist
jetzt die ausgeblendete Tabelle in dem Einblende Menü verschwunden. Das Makro funktioniert noch und greift auch auf diese Tabelle zu und in VBA wird
sie auch noch angezeigt nur beim Einblenden wird sie nicht aufgelistet .

Code:

Public Sub PREBlankoKopieren()
    With Worksheets("PRE Neu")
        .Visible = xlSheetVisible
        .Copy After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
        .Visible = xlSheetVeryHidden
                 
        End With
    NeuerName = InputBox("Bitte gebe den neuen Namen des Blattes ein!")
    ActiveSheet.Name = NeuerName
       
       
End Sub

Gruß

David

[Kuwer]

Hallo David,

ändere

        .Visible = xlSheetVeryHidden

in

       .Visible = xlSheetHidden

Gruß Uwe

[Igelbauer]

.Visible = xlSheetVeryHidden

Moin
dein Problem liegt bei VeryHidden
Dann kannst du es nur noch über VBA sichtbar machen.
Wenn du das nicht willst, nimm einfach nur "Hidden"

Gruss Igel

Oh, da war jemand schneller

[David Lange]

Funktioniert Super Dankeschön

Gruß David