Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
804to808
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
804to808
804to808
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Access-Abfrage per VBA in Excel importieren

Access-Abfrage per VBA in Excel importieren
25.09.2006 10:23:08
TOM
Guten Morgen zusammen
Ich möchte gerne eine Access-Abfrage in Excel importieren per VBA.
Wäre froh um einen Code ansatz.
Besten Dank und Gruss
TOM

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Access-Abfrage per VBA in Excel importieren
25.09.2006 11:34:21
Ingo
Hallo Tom, hier ein Beispiel wie ich dass mache. Dazu vorher im VBA-Editor unterbExtras-Verweise verweis auf die Microsoft DAO3.6 setzen.

Sub import()
Dim db As Database
Dim rs As Recordset
Dim rng As Range
Dim abfrage As String
Dim colpointer As Integer, rpwpointer As Integer
'Datenbankconnect
'Hier haben .xls und .mdb Datei  gleiche Pfadangabe:evt. anpassen
Set db = OpenDatabase(ThisWorkbook.Path & "\SDQArchiv.mdb")
'Abfrage
abfrage = "SELECT xyz,abc FROM Tabellexyz WHERE ..."
Set rs = db.OpenRecordset(abfarge, dbOpenSnapshot)
'Zielbereich
Set rng = Sheets("Deinsheet").[B2]
rs.MoveFirst
rowPointer = 0
Do While Not rs.EOF
For colpointer = o To rs.Fields.Count - 1
rng.Offset(rowPointer, colpointer) = rs.Fields(colpointer)
Next colpointer
rs.MoveNext
rowPointer = rowPointer + 1
Loop
rs.Close
db.Close
End Sub

mfG Ingo Christiansen
Anzeige
AW: Access-Abfrage per VBA in Excel importieren
25.09.2006 12:57:17
TOM
Hallo Ingo
Besten Dank für Deinen Codeansatz.
Wie muss ich den Code ändern bei abfrage="SELECT xyz,abc FROM..... für meine Abfrage?
So mit SQL-Code bin ich nicht so Sattelfest!
Besten Dank und Gruss
TOM
AW: Access-Abfrage per VBA in Excel importieren
25.09.2006 13:09:30
Ingo
Hi, Tom,
Du kannst Dir in Access den SQL-Code Deiner Abfrage ansehen und zwar in der Entwurfsansicht der Abfrage unter Ansicht / SQL-Ansicht
mfG
Ingo Christiansen
AW: Access-Abfrage per VBA in Excel importieren
25.09.2006 13:37:14
TOM
Hallo Ingo
Wenn ich das so mache wie Du beshrieben hast wir der Code rot und es kommt eine Fehlermeldung!!?
Gruss
TOM
AW: Access-Abfrage per VBA in Excel importieren
25.09.2006 17:34:00
apollo303
VBA kann denn SQL-Code nicht 1:1 verarbeiten. Du musst z.b. sämtliche Hochkommatas abändern...aus "" wird """" und aus "abc" wird ""abc""....und so weiter...musst einfach ein bisschen probieren
gruss
apollo303
Anzeige

301 Forumthreads zu ähnlichen Themen

Makro zum .CSV Daten Import
Hugo

Hallo,
viele .CSV Daten müssen in Excel importiert werden. Ein funktionierendes Makro würde die Sache für immer sehr erleichtern. Kann man das Folgende mit einem Makro lösen?
Folgende Attribute gelten für den Datei Import:


Datenformat der Spalten ist Standard
-Start in...
17.08.2008 12:48:56
Thread-ID: 1002397
10 Beiträge
Anzeige
VBA ExcelDateinamen und Arbeitsblattnamen einlesen
MarkusL

Hallo,
gibt es per VBA eine Möglichkeit alle Excel Dateien eines Verzeichnisses inkl. der jeweils enthaltenen Arbeitsblattnamen einzulesen (der Name der Exceldatei sollte ohne .xls ausgegeben werden), so dass nachfolgendes Ergebnis erzeugt wird:
Dateiname.......Arbeitsblattname
Date...
16.11.2008 15:07:00
Thread-ID: 1024906
5 Beiträge
charset=UTF-8 in ANSII-Codierung umwandeln ?
Dino

Hallo Excel-Experten,
ich habe in Ordner c:\datenbank\ ca. 20000 Dateien - ohne Dateiendung (je 6-7 KB groß) die mit charset=UTF-8 erstellt worden sind.
Gibt es die Möglichkeit alle Dateien diesen Ordner in charset=iso-8859-2 bzw. ANSII-Codierung zu speichen / zu konvertieren ?
Ich...
04.01.2009 17:03:43
Thread-ID: 1036768
7 Beiträge
Anzeige
CSV-Datei gesplittet in Excel importieren
Lennart

Hallo zusammen,
ich bin auf ein (für mich ;-)) größeres Problem gestoßen und konnte dies auch nicht durch Googeln etc. lösen. Folgendes: Ich exportiere aus einem Programm eine Liste mit Namen als CSV-Datei. Diese Namen stehen komplett in einer Spalte. Wenn ich nun meine Excel-Datei mit dies...
06.07.2009 23:23:38
Thread-ID: 1086804
7 Beiträge
VBA Probelm bei Datei einlesen und kopieren
Roland

Moin,
ich ahbe mal wieder ein VBA Problem.
Ich möchte eine Datei öffnen, die Daten daraus in eine andere Datei(Tabellenblatt) kopieren.
Jetzt meldet Excel mir:
Laufzeitfelher '1004': Für diese Aktion müssen alle verbundene Zellen dieselbe Grö0ße haben.
War eigentlich der Mei...
02.02.2010 10:57:34
Thread-ID: 1134995
2 Beiträge
csv - Datei einlesen
Karen

Hallo Forum,
ich möchte gerne in eine Excel Datei Daten per VBA Copy & Paste aus einer *csv Datei einlesen. Leider wandelt er die Zahlen in einen geschriebenen Test um.
Hat jemand einen Tip für mich, wie die Zahlen korrekt eingelesen werden?
Grüße
Karen
23.03.2010 09:02:24
Thread-ID: 1147748
6 Beiträge
CSV-Dateien mit VBA einlesen
Stefan741

Hallo VBA-Freunde,
gestern habe ich fast den ganzen Tag gesucht und ausprobiert, aber keine Lösung für meine Problemstellung gefunden (bzw. war ich nicht in der Lage, eine vorhandene Lösung umzubauen, dass sie lief):
In einem Verzeichnis stehen viele CSV-Dateien. Die Daten sind mit Komm...
24.03.2010 08:00:54
Thread-ID: 1148031
2 Beiträge
CSV-Dateien mit VBA einlesen
Stefan741

Hallo VBA-Freunde,
gestern habe ich fast den ganzen Tag gesucht und ausprobiert, aber keine Lösung für meine Problemstellung gefunden (bzw. war ich nicht in der Lage, eine vorhandene Lösung umzubauen, dass sie lief):
In einem Verzeichnis stehen viele CSV-Dateien. Die Daten sind mit Komm...
24.03.2010 08:02:11
Thread-ID: 1148032
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
9
4
4
6
14
6
1
5
1
7
3
3
4
1
5
1
2
13
7
1
1
3
8
5
19