Excel - Access - Verknüpfung | HERBERS Excel Forum

Ich möchte in Excel die Daten einer Acces- Abfrage importieren. Da ich in der VBA-Programmierung nicht so bewandert bin, habe ich mir ein Makro aufgezeichnet, und das läuft auch alles gut.
Nun habe ich die Access-Abfrage leicht modifiziert, was zur Folge hat, daß ich einen "Laufzeitfehler 1004 - Allgemeiner ODBC-Fehler" erhalte, wenn ich das Makro ausführen möchte. Der Debugger markiert folgende Zeile: .Refresh BackgroundQuery:=False
Wenn ich nun versuche, die Daten neu manuell zu importieren, sprich über Daten - Externe Daten - Neue Abfrage erstellen, bekomme ich kurz vor Fertigstellung eine Meldung, daß MicrosoftQuery einen Parameter erwartet, aber zu wenig übergeben bekommt.
Die Änderung, die ich bei der Abfrage vorgenommen habe ist, daß ich bei den Kriterien den Wert aus einem Textfeld eines Fomulars auslese, und nicht mehr selber eingebe.
Wäre klasse, wenn mir jemand helfen könnte!
Danke im Voraus

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Moin,
zunächst mal Danke, daß Ihr Euch mit dem Problem beschäftigt habt.
Hier noch einmal ausführlich:

Der VBA-Code in Excel (mit Makro aufgezeichnet):

With ActiveSheet.QueryTables.Add(Connection:=Array(Array( _
"ODBC;DSN=Microsoft Access-Datenbank;DBQ=G:\Projekte\SMDB\smdb.mdb;DefaultDir=G:\Projekte\SMDB;DriverId=25;FIL=MS Access;MaxBufferSiz" _
), Array("e=2048;PageTimeout=5;")), Destination:=Range("A1"))
.CommandText = Array( _
"SELECT `Statistikdaten Datum`.SMNUMBER, `Statistikdaten Datum`.FIRED" & Chr(13) & "" & Chr(10) & "FROM `G:\Projekte\SMDB\smdb`.`Statistikdaten Datum` `Statistikdaten Datum`" _
)
.Name = "Abfrage von Microsoft Access-Datenbank"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlOverwriteCells
.SavePassword = True
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.Refresh BackgroundQuery:=False
End With

Das klappt auch soweit alles ganz gut, solange ich in der Access-Abfrage "Statistikdaten Datum" für "FIRED" (es handelt sich hierbei um Datumsangaben) als Suchkriterium ein Datum eingebe.
Ich möchte aber das Suchkriterium aus einem Formular entnehmen. Also schreibe ich bei Kriterium:
[Formulare]![Datum Eingabe]![Datum1]
Die Abfrage funktioniert gut, mir werden in Access die gewünschten Daten angezeigt.
Nur das Importieren nach Excel funktioniert dann nicht mehr!!!

Ich hoffe, das Problem ist klar geworden?!

Danke im Voraus,
Uwe

Beliebteste Forumthreads (12 Monate)

Excel - Access - Verknüpfung

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread