Hallo,
habe ein Problem, das mir seit Tagen Kopfzerbrechen bereitet...
Nach einigen Wechsel zwischen unterschiedlichen Tabellenblättern (unterdrückt mit Application.Screenupdating = False) soll nach dem Schließen der UserForm wieder das Ausgangsblatt "Übersicht" gezeigt werden.
Tut er aber nicht... ;o( Habe schon alles Mögliche probiert (z.B. auch mit MsgBox - Coding siehe unten). Letztendlich wird aber immer wieder das falsche Blatt gezeigt.
Wundern tut mich auch, dass der Hide-Befehl im Coding immer wieder klein geschrieben (UserForm.hide) erscheint...
Hat jemand eine Idee? Vielleicht gibt es noch irgendwelche Eigenschaften im UserForm, an denen man schrauben muss?
Danke im voraus!
Liebe Grüße,
Ines
--------------------------------------
'Aufruf UserForm:
Sub Warenausgang()
Load UserForm1
UserForm1.show
Application.ScreenUpdating = False
Worksheets("Verbrauch").Activate
Selection.AutoFilter Field:=1
Selection.AutoFilter Field:=2
Selection.AutoFilter Field:=3
--------------------------------------
'Beenden UserForm per CommandButton:
...
Worksheets("Wareneingang").Activate
Selection.AutoFilter Field:=1
Selection.AutoFilter Field:=2
Selection.AutoFilter Field:=3
Worksheets("Übersicht").Select
Application.ScreenUpdating = True
Unload UserForm2
UserForm2.hide
Application.ScreenUpdating = False
MsgBox ("Test")
Worksheets("Übersicht").Activate
Application.ScreenUpdating = True
--------------------------------------