Fehlende Objektbibliothek
11.10.2002 11:49:25
Frederik Fuhrmann
Wenn ich folgenden Code auf meinem Rechner verwende geht alles glatt, auf einem anderen Rechner kriege ich allerdings die Fehlermeldung, dass die entsprechende Objektbibliothek fehlen würde! Wie gehe ich vor?
Application.ScreenUpdating = False Dr_Fuhrmann: End Sub
[Der Fehler tritt bei "With Error" auf]
Sub oeffn()
On Error GoTo Dr_Fuhrmann
Sheets("SAP_Download").Visible = True
Sheets("Alle Erzeugnisse").Visible = True
Monatsinventur.Show
Exit Sub
With Error(9)
MsgBox "Es wurden keine Daten eingelesen!", vbCritical
End With
Gruß
F.