Jahr = Jahr
11.01.2005 13:52:59
Franz
ich steh am Schlauch und komm nicht auf den Fehler: ohne die ganze Datei bzw. den gesamten Code psoten zu wollen (ist ein bissl groß), versuch ich's mal so, vielleicht hat einer eine Idee. Es geht um folgenden Code-Teil:
Sub Test
If Format(Cells(6, m), "yyyy") = Year(Date) Then
MsgBox Format(Cells(6, m), "yyyy") & " = " & Year(Date)
ElseIf Format(Cells(6, m), "yyyy") > Year(Date) Then
MsgBox Format(Cells(6, m), "yyyy") & " > " & Year(Date)
End If
End Sub
Obwohl "Format(Cells(6, m), "yyyy")" 2005 ergibt ebenso wie "Year(Date)", zeigt die MsgBox " 2005 > 2005 " an.
Ich bitte um eure geschätzte Hilfe und bedanke mich im Voraus
Franz
Anzeige