gelöst Export mit VBA von Excel nach Access

Mitglied: fcmfanswr

fcmfanswr (Level 1) - Jetzt verbinden

27.08.2007, aktualisiert 28.08.2007, 16838 Aufrufe, 2 Kommentare

Hallo,

Ich habe einen Excel-Sheet, den lasse ich automatisch formatieren, nach der formatierung soll er automatisch in eine access-Datenbank exportiert werden und dort als neue tabelle gespeichert werden.

kann mit jemand helfen und sagen, wie das geht?

ich hab schonmal rumprobiert, aber geht irgendwie nicht:


Dim dbsExport As Database
Dim rstImport As Recordset
Set dbsExport = OpenDatabase("c:\Documents and Settings\dkx\Desktop\db.mdb")
Set rstImport = dbsExport.CreateTableDef("TestTable") -> das klappt nicht!

(falls es wichtig ist: die Microsoft DAO Objekt Libery habe ich schon hinzugefügt)

Vielen Dank im Vorraus.
Mitglied: fcmfanswr
28.08.2007 um 15:53 Uhr
naja auch wenn keiner geantwortet hat, so hats bei mir geklappt:

'als Verweis: -> MS DAO 3.6. xxx
' -> MS Access xxx

Dim db As Access.Application

Set db = CreateObject("Access.Application") ' Objekt erstellen
db.OpenCurrentDatabase (TextBox2.Value) ' Datenbank öffnen

DoCmd.TransferSpreadsheet , acSpreadsheetTypeExcel9, tablename:="Tabellenname", Filename:="Pfad der Datenbank", Hasfieldnames:=True

DoCmd.Close
Bitte warten ..
Mitglied: Biber
28.08.2007 um 21:22 Uhr
Moin fcmfanswr,

Danke für das Posten Deiner selbst gefundenen Lösung.

Es war auch mit Sicherheit nicht persönlich gemeint, dass niemand anderes geantwortet hat und es lag auch nicht an einer unklaren Frageformulierung oder so ... Du warst einfach schneller als der Rest des Forums.

Und das Veröffentlichen der Lösung kann auch für andere von Nutzen sein.

Also nochmal vielen Dank für
  • die saubere und verständlich Frageformulierung,
  • das Posten der Lösung
  • und das Setzen des "Grünen Hakens"
- vorbildlich!!.
Okay, meckern könnte ich noch mit dem "Vielen Dank im Vorraus.", aber was solls...

Schönen Abend und ich schließe den Thread
Biber
Bitte warten ..
Heiß diskutierte Inhalte
Windows Server
Veeam - DCs restore - 0xc00002e2
gelöst Freak-On-SiliconFrageWindows Server22 Kommentare

Servus; Ich hab hier zwei Server 2012R2 DCs auf jeweils einem Hyper-V sitzen. Gesichert wird mit Veeam B&R. JA, ...

CPU, RAM, Mainboards
Hardwareanforderung für Remote Desktop
gelöst Diddi-tbFrageCPU, RAM, Mainboards12 Kommentare

Hallo zusammen, ich brauche mal wieder einen Rat von euch. Mein Chef möchte gerne öfter von zu Hause aus ...

Multimedia & Zubehör
Anforderungen an Telefonanlage
jensgebkenFrageMultimedia & Zubehör10 Kommentare

Hallo Gemeinschaft, bin auf der Suche nach einer Telefonanlage die folgendes können muss: - unterschiedliche Ansagen (z.b. während der ...

LAN, WAN, Wireless
Studentenwohnheim LAN Anschluss mit Router verbinden
SchweisserFrageLAN, WAN, Wireless8 Kommentare

Hallo Leute, ich habe zu dem Thema schon einige Beiträge gelesen, konnte aber für meinen Fall bisher keine funktionierende ...

Humor (lol)
Wir werden alt
Dilbert-MDFrageHumor (lol)7 Kommentare

Themenbereich OT Neulich bei einem IT-Problem: Ein IT-Problem ist kein Problem, wenn man die richtigen Suchbegriffe und Fachwörter in ...

DNS
DNS in AD und pfSense - pfBlockerNG Listen werden nicht beruecksichtigt
DerDummePeterFrageDNS7 Kommentare

Moin, ich bin der Peter und hab mich hier nun doch angemeldet. Ich habe mit IT ueberhaupt nix zu ...

Ähnliche Inhalte
VB for Applications
Excel VBA Code
gelöst specialuserFrageVB for Applications2 Kommentare

Hallo zusammen, Hab hier einen Button in einer Excel mit Makros erstellt. Der Button hat die Funktion aus der ...

Microsoft Office
Excel VBA - PDF
SabineTFrageMicrosoft Office3 Kommentare

Hallo Zusammen, ich habe ein pdf, über welches ich bereits die OCR Texterkennung laufen lassen habe. Jetzt möchte ich ...

VB for Applications
Excel VBA Programmierung
gelöst specialuserFrageVB for Applications7 Kommentare

Hallo zusammen, ich suche auf diesem Weg Hilfe bei einer VBA Programmierung. Und zwar geht es darum 2 Dropdownlisten ...

VB for Applications
Excel VBA Programmierung2
gelöst specialuserFrageVB for Applications17 Kommentare

Hallo allerseits, Habe hier ein VBA Projekt, bei welchem eine Schleife Prüft ob in bestimmten Zellen Werte stehen und ...

Microsoft Office
Unterordner durchsuchen Excel VBA
schwalbepilotFrageMicrosoft Office1 Kommentar

Hi, ich habe mir ein Makro gebastelt, mit dem ich Daten aus mehreren Word Tabellen auslesen kann. Das Makro ...

VB for Applications
Excel VBA DLL Verweise
Jan1986FrageVB for Applications1 Kommentar

Hallo zusammen, ich benötige für ein Excel VBA Project die msado15.dll (Microsoft Active X Data Objects 6.1 Library). für ...

Berechtigungs- und IdentitätsmanagementBerechtigungs- und IdentitätsmanagementWebdienste und -serverWebdienste und -serverDatenbankenDatenbankenMonitoring & SupportMonitoring & SupportHybrid CloudHybrid CloudSmall Business ITSmall Business IT