Blad openen, automatisch naar laaste rij

[zwinmi]

Beste Forumleden,

ik roep een blad op mbv een formulier. In dit blad zitten inmiddels meer dan 1000 volle rijen. maar de meest recente staan onderaan (en dat moet zo blijven), waardoor ik dus veel moet scrollen of pagedownen.. Nu wil dat als ik op het formulier op de knop druk om het blad te openen, deze dan automatische naar de laatst ingevulde rij gaat.

Alvast bedankt!

 

[HSV]

Bv. met.

Private Sub CommandButton1_Click()
 Workbooks.Open "D:\08-01-2012.xls"
   Application.Goto Sheets(1).Cells.SpecialCells(xlCellTypeLastCell)
End Sub

 

[zwinmi]

Beste HSV

Dank je voor je reactie. Ik ben hiermee geholpen!