Wohl mit
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
End Sub
Aber wie muss ich es anstellen, dassder bei der Aktivierung der Datei der
Befehl Sheets("Übersicht").Calculate
ausgeführt wird?
Danke für eine Antwort.
Gruss, Peter
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
End Sub
Aber wie muss ich es anstellen, dassPrivate Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name = "Übersicht" Then Sh.Calculate
End Sub
mfg KurtPrivate Sub Workbook_Activate()
Calculate
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name = "Übersicht" Then Sh.Calculate
Calculate
End Sub
So wird die Tabelle "Übersicht" immer aktiviert.