Gruppe
DatumZeit
Problem
Ich nehme Zeiteinträge in der Form "11:12 bis 16:15" vor. In einer anderen Zelle soll immer dann, wenn der Fixpunkt 12:00 im angegebenen Zeitraum enthalten ist, ein "X" angezeigt werden.
ClassModule: DieseArbeitsmappe
Private Sub Workbook_BeforeSave( _
ByVal SaveAsUI As Boolean, _
Cancel As Boolean)
Dim wks As Worksheet
For Each wks In Worksheets
If wks.FilterMode = True Then
wks.ShowAllData
End If
Next wks
End Sub