Clever-Excel-Forum

Hallo zusammen,

ich habe ein Problem mit einer VBA-Ausführung die eine sehr lange Ladezeit hat. Das heißt beim öffnen der Datei braucht es ewig bis die Datei geöffnet wird.
Ich glaube das es an einer Variable liegt die falsch ist.

Mit dem Code ist das einblenden von 3 Registerkarten und das ausblenden der selben Registerkarten gesteuert durch eine Tastenkombination.
Kann mir jemand eventuell helfen?

Hier ist der Code:
Sub ausblenden()
'
' ausblenden Makro
'
' Tastenkombination: Strg+a
'
Sheets("Print (mit Werten)").Select
ActiveWindow.SelectedSheets.Visible = False
Sheets("Online Thüringen (mit Werten)").Select
ActiveWindow.SelectedSheets.Visible = False
Sheets("Online Sachsen (mit Werten)").Select
ActiveWindow.SelectedSheets.Visible = False
End Sub

Sub Blättereinblenden()
'
' Blättereinblenden Makro
'

'
Sheets("Online Sachsen").Select
Sheets("Print (mit Werten)").Visible = True
Sheets("Print (mit Werten)").Select
Sheets("Online Thüringen (mit Werten)").Visible = True
Sheets("Online Thüringen (mit Werten)").Select
Sheets("Online Sachsen (mit Werten)").Visible = True

End Sub

Hallo,

Code:
Sub ausblenden()

'

' ausblenden Makro

'

' Tastenkombination: Strg+a

'

    Sheets("Print (mit Werten)").Visible = False

    Sheets("Online Thüringen (mit Werten)").Visible = False

    Sheets("Online Sachsen (mit Werten)").Visible = False

End Sub

Sub Blättereinblenden()

'

' Blättereinblenden Makro

'

'

    Sheets("Print (mit Werten)").Visible = True

    Sheets("Online Thüringen (mit Werten)").Visible = True

    Sheets("Online Sachsen (mit Werten)").Visible = True

End Sub

Gruß Uwe

Karsten

Kuwer