Fehlermeldung bei DIM =???

Question

Hallo zusammen,

Beginn eines Codes (der nicht läuft!):

Sub Befehl10_Click()
Dim appXL As New Excel.Application
Dim wbLS As Workbook
Dim wsTabelle As Worksheet

Set wbLS = appXL.Workbooks.Open("C:\vb4\ZV Mustermann.xls")
Set wsTabelle = wbLS.Worksheets(1)
usw.

Wenn ich den Code starte, erhalte ich eine Fehlermeldung:

Fehler beim Kompilieren:
Benutzerdefinierter Typ nicht definiert

die erste Zeile des Codes ist blau hinterlegt.
Access 2002 SP3

Hier bitte ich um eure Hilfe und danke im Voraus
Grüße
Hans

Answer 1

statt

Dim appXL As New Excel.Application

schreibst du besser so (Late Binding):

Dim objXL As Object
Set objXL = CreateObject("Excel.Application")

Aber der Fehler müsste trotzdem an dem fehlenden Verweis liegen.

VBA Editor Extras->Verweise->MS Excel

Gruß marie