Hallo Profis,
mit nachfolgenden Code will ich aus einer ausgeblendeten Arbeitsmappe ein Tabellenblatt Kopieren und einen neuen Namen geben.
With Workbooks(Name)
.Worksheets(Art).activate
.Worksheets(Art).visible = true
.Worksheets.copyafter:=.Worksheets(.Worksheets(.count)
.AktiveSheet.Name = pname
End with
Leider funktioniert dies nur wenn ich die Arbeitsmappe eingeblendet habe. Wie kann ich das ändern?
Danke!
Gruß
Ludmila