was muss ich machen das wenn ich auf Tabelle1 klicke Tabelle2 ausgeblendet wird?
mfg Jupp
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If ActiveSheet.Name = "Tabelle1" Then Tabelle2.Visible = False
End Sub
Gruß Matthias
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh Is Tabelle1 Then Tabelle2.Visible = False
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Index Mod 2 Then
If Not Sh.Next Is Nothing Then Sh.Next.Visible = False
End If
End Sub