MsgBox
07.12.2004 22:16:25
Manuel
Wer kann mir helfe?
Dieser Button befinde sie in Tabelle9
Private Sub CommandButton2_Click()
Application.ScreenUpdating = False
Sheets("Januar").Visible = True
Sheets("Januar").Select
ActiveSheet.Range("A58").End(xlUp).Offset(1, 0).Select
MsgBox "Test"
Application.ScreenUpdating = True
End Sub
MsgBox "Test" wen Tabelle Januar Visible ist und nicht in Tabelle9
Danke in Voraus
Gruß Manuel
Anzeige