naar de top toe

[driverautoband]

hallo mensen ik heb een vraag
ik ben een soort rooster aan het maken e heb 12 maanden die staan onder elkaarnu is het zo dat januari die staat netjes bovenaan februari daar onder maart etc ik heb boven aan 12 selektie vinkjes gemaakt als ik op bv de erste keuze maakt dan komt hij netjes op januari helemaal bovenin kies ik de tweede dan komt februari in het midden van van het blad testaan en bij de derde ook in het midden ik heb waarschijnlijk iets vergeten in de code maar wat het is de bedoeling dat het blad dan netjes boven aan komt

Private Sub OptionButton2_Click()
Range("d53").Select
End Sub

in ieder geval bedankt rene

 

[Demeter]

Probeer deze eens:

Sub test()
    
    Application.GoTo Reference:=ActiveSheet.Range("D53"), Scroll:=True
    
End Sub

Groet,
Ferenc

 

[driverautoband]

bedankt Ferenc

het werkt :thumb:

groeten rene