online 1
gast (50)

/ Forum / Datenbanken

DatenbankenDatenbanken

Fragevon Hans_83 vom 23.07.2022, 19:26 Options

Lösung

Fehlermeldung bei DIM =???

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


Antwort schreiben

Antwort 1 von Marie vom 27.07.2022, 02:39 OptionsLösung

Lösung
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

Ähnliche Themen

Datensätze bei m:n Beziehung automatisch erzeugen
Jonk  28.01.2009 - 103 Hits - 4 Antworten

Netzwerkfähige Adressverwaltung
Skatan  14.01.2009 - 93 Hits - 4 Antworten

mysql query browser - unique
meiesquel  13.03.2009 - 187 Hits - 1 Antwort

Access Fehlermeldung bei Filteranwendung
beata_f  25.03.2009 - 224 Hits - 5 Antworten

Fehlermeldung: Word konnte keine DDE Verbindung zu Microsoft Exel herstellen.
lighthouse  07.04.2009 - 475 Hits - 2 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Thu Jan 8 21:07:44 2026