Userform werkt raar bij selecteren andere sheet

[Ralbers]

Hallo allemaal,

Ik ben begonnen met experimenteren met userforms.
Nu werkt dit opzich best eenvoudig en lukt het me aardig om een mooi iets in elkaar te zetten.
Ik heb echter een raar probleem:

Ik heb een bestand met op de eerste sheet een knop die het userform opent. Hierin zitten diverse knoppen om bepaalde acties uit te voeren.
Een van die acties is het zichtbaar maken en selecteren van een sheet met brongegevens.
Dit doe ik met de volgende code:

Private Sub CommandButton1_Click()
Unload Me
Sheets("sh2").Visible = True
Sheets("sh2").Select
Sheets("sh2").Range("A1").Select
End Sub

Dit lijkt redelijk vanzelfsprekend in mijn ogen
Maar als ik nu tekst wil typen of cellen wil selecteren blijkt op de achtergrond toch nog steeds de originele sheet actief te zijn. Tekst die ik typ komt op het tabblad start terecht ipv het nieuwe tabblad. en als ik met de pijltjes wil navigeren ben ik beperkt aan de zichtbare cellen in het startscherm.

Bekijk bijlage Voorbeeld 20150720.xlsm

In de bijlage een voorbeeld bestand met hetzelfde probleem
Ik gebruik office 2013. In office 2010 gaat dit wel helemaal goed
Ligt dit aan mijn systeem of doe ik iets in de code niet goed?

Alvast bedankt
Groeten Roel

 

[spaarie]

Roel,
Inderdaad werkt het naar behoren in 2010, want ik kan jouw verhaal niet beamen.
Wel zou ik de manier van benaderen wijzigen;

Unload Me
With Sheets("sh2")
    .Visible = True
    Application.Goto .Cells(1)
End With

Wellicht dat dit relaas biedt, maar ben er niet van overtuigd.

 

[Ralbers]

Helaas nog steeds hetzelfde probleem.

Ik hoop dalijk toegang te krijgen tot een andere machine met office 2013. Misschien dat ik dan kan uitsluiten dat het aan mijn pc ligt.