Office: 2. Anfrage wg. Problem mit Ausführung v. Format$ HILFE!

Meine erste Anfrage wurde leider nicht beantwortet, darum starte ich den Versuch ein 2. Mal.
Wäre froh, eine Lösung zu bekommen.


Hallo an alle!

Habe ein Problem mit meinem Excelchen!

Seit zwei bis drei Tagen kann mein Excelchen mit den Bezeichnungen:

'Label"Datum" = Datum(Tag + Datum)
Datum.Caption = Format$(Now, "dddd, dd. mmmm yyyy")

sowie mit:

TextBox18 = Format(Sheets("Daten1").Cells(AuswahlBoxKlient1.ListIndex + 2, 50), "dddd,dd.mmmm yyyy")

und mit:

TextBox18.Value = Format$(Now, "dddd, dd. mmmm yyyy")

und mit:

Public Intervall As Date

Sub Start()
Intervall = Now + TimeValue("00:00:01")
T = "Uhrzeit: " & Format(Time, "hh:mm:ss")

'Statuszeile
Application.StatusBar = Format(Time, "hh:mm:ss")
'Zelle A1
Cells(1, 1) = T
'UserForm
Startseite.Uhrzeit.Caption = T

Application.OnTime Intervall, "Start"
End Sub

Sub Stopp()
On Error Resume Next
Application.OnTime Intervall, "Start", , False
Application.StatusBar = False
End Sub


u.s.w. nichts mehr anfangen!

Die ganze Zeit lief das kleine Programm, welches ich geschrieben habe einwandfrei. Erst vor paar Tagen spinnt Excelchen sich hier was zurecht, was ich nicht mehr nachvollziehen kann.

Es zeigt mir ständig:

Fehler beim Kompilieren und Project oder Bibliothek nicht gefunden.

Kann mir jemand weiterhelfen? Hab' doch nichts daran verändert!
Rufe es wie gewohnt auf und nichts ist mehr wie das ganze Jahr zuvor!
Vielen Dank im Voraus! Wäre sehr wichtig für mich, da es mein WaWi-Programm ist!

Gruß timi

 

Hallo,

hast du im VBA-Editor schon mal unter Extras - Verweise in die Liste der Verweise gesehen?

Findet sich dort ein Punkt der so ähnlich lautet wie '[x] nicht gefunden'?

Wenn ja, dann musst du, wenn dieser Verweis auf eine Bibliothek benötigt wird diese suchen und neu einbinden oder du entfernst das Kreuz in der Markierung und schaust was passiert.