Private Sub Workbook_Open() Sheets("Sheet List").Activate ActiveWindow.ScrollRow = 1 End Sub
Zpět do poradny