{"id":55000887,"date":"2013-06-01T00:00:00","date_gmt":"2020-05-22T21:35:59","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=887"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"VBATextexport_unter_Access_2007_und_juenger","status":"publish","type":"post","link":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/","title":{"rendered":"VBA-Textexport unter Access 2007 und jünger"},"content":{"rendered":"

\"\"<\/p>\n

Normalerweise ist das Exportieren von Tabellen oder Abfragen als Text- oder CSV-Datei kein Problem – Sie nutzen entweder den Assistenten dazu oder verwenden die Methode TransferText des DoCmd-Objekts. Dummerweise führt dies, auch wenn es in Anwendungen bis Access 2003 funktionierte, unter neueren Versionen von Access zu einem Fehler. Warum dies geschieht und wie Sie TransferText weiter nutzen können, erläutert dieser Beitrag.<\/b><\/p>\n

Wenn Sie einen Export der Daten einer Tabelle oder Abfrage in eine Textdatei per VBA automatisieren möchten, verwenden Sie normalerweise die TransferText<\/b>-Methode des DoCmd<\/b>-Objekts wie in folgendem Beispiel:<\/p>\n

DoCmd.TransferText acExportDelim, , "tblArtikel", CurrentProject.Path & "\\tblArtikel.txt"<\/pre>\n
Dies löst unter Access 2007 und jünger den Fehler aus Bild 1 aus. Anscheinend verwendet Access, wenn nichts anderes angegeben wird, entweder das Dezimaltrennzeichen oder das Texttrennzeichen als Feldtrennzeichen. Früher verwendete Access standardmäßig das Semikolon, aber Microsoft scheint hier etwas geändert zu haben. Welches Trennzeichen wird aber nun tatsächlich verwendet<\/p>\n
\"pic001.png\"<\/p>\n
Bild 1: Fehlermeldung beim Versuch, eine Tabelle mit DoCmd.TransferText ohne Angabe einer Export-Spezifikation zu exportieren<\/span><\/b><\/p>\n
Um dies herauszufinden, habe ich probehalber das Trennzeichen in der Systemsteuerung von Windows verändert – am Fehler ändert sich dadurch jedoch nichts.<\/p>\n
Fehlerfrei mit Export-Spezifikation<\/b><\/p>\n
Es gibt nur eine Lösung für das Problem: Sie müssen eine Export-Spezifikation angeben. Diese ist natürlich zuvor noch zu erstellen, was sich aber durch einmaliges Durchlaufen des Export-Assistenten erledigen lässt. Dazu rufen Sie den entsprechenden Assistenten auf (unter Access 2010 etwa mit dem Ribbon-Eintrag Externe Daten|Exportieren|Textdatei<\/b>) und klicken dort auf OK <\/b>(nicht die Option Exportieren von Daten mit Formatierung und Layout <\/b>aktivieren!). Nun klicken Sie auf die Schaltfläche Erweitert <\/b>und dann auf Speichern unter<\/b>. Geben Sie den gewünschten Namen für die Spezifikation an und speichern Sie die Spezifikation (s. Bild 2).<\/p>\n
\"pic002.png\"<\/p>\n
Bild 2: Speichern einer Export-Spezifikation<\/span><\/b><\/p>\n
Den Assistenten können Sie nun abbrechen, ohne den Export durchzuführen – wir wollten nur eine beliebige Spezifikation anlegen, um diese für den Export per VBA nutzen zu können. Natürlich können Sie hier noch weitere Eigenschaften festlegen, wenn Sie diese benötigen – dies ist aber nicht Thema dieses Beitrags.<\/p>\n
Nach dem Anlegen der Spezifikation und dem erneuten Aufruf der TransferText<\/b>-Methode – diesmal unter Berücksichtigung der gespeicherten Spezifikation – gelingt auch der Export ohne Fehler:<\/p>\n
DoCmd.TransferText acExportDelim, Spec_tblArtikel", "tblArtikel", CurrentProject.Path & "\\tblArtikel.txt"<\/pre>\n
Problem: Viele Exporte<\/b><\/p>\n
Was aber, wenn eine Anwendung sehr viele Aufrufe der TransferText<\/b>-Methode enthält Sollten Sie diese in einer älteren Access-Version verwendet haben, klappte dies reibungslos. Unter Access 2007 und neuer löst jedoch jeder Text-Export ohne Spezifikation einen Fehler aus.<\/p>\n
Wenn Sie keine Lust haben, für jede zu exportierende Tabelle oder Abfrage von Hand eine Export-Spezifikation zu erstellen, gibt es gute Nachrichten: Diese Aufgabe lässt sich auch per Code erledigen. Die Spezifikationen werden nämlich in Systemtabellen gespeichert: Die Basisinformationen landen in der Tabelle MSysIMEXSpecs <\/b>und die Informationen zu den einzelnen Feldern in mehreren Datensätzen der Tabelle MSysIMEXColumns<\/b>.<\/p>\n
<\/p>\n
Im Gegensatz zu den übrigen Systemtabellen sind diese nicht geschützt und Sie können die Daten leicht per VBA hinzufügen. Es geht sogar noch weiter: Die Tabellen sind standardmäßig nicht angelegt und werden erst von Access erzeugt, wenn der Benutzer die erste Spezifikation speichert.<\/p>\n
Sie können also den kompletten Prozess der Spezifikationserstellung per VBA abwickeln. Dabei hilft die Prozedur SpezifikationAnlegen <\/b>aus Listing 1<\/a><\/span>. Die Prozedur erwartet den Namen der Tabelle oder Abfrage, für welche die Export-Spezifikation erzeugt werden soll. Sie erstellt die beiden benötigten Tabellen mit entsprechenden CREATE TABLE<\/b>-Abfragen und fügt auch die Primärschüssel und Indizes hinzu. Mit dem Wert 2 <\/b>für die Attributes<\/b>-Eigenschaft werden die hinzugefügten Tabellen auch noch als Systemtabellen gekennzeichnet.<\/p>\n
Listing 1: Spezifikation per VBA anlegen<\/p>\n
Public Sub SpezifikationAnlegen(strHerkunft As String)\r\n    Dim db As DAO.Database\r\n    Dim rst As DAO.Recordset\r\n    Dim fld As DAO.Field\r\n    Dim lngID As Long\r\n    Dim strMSysIMEXSpecs As String\r\n    Dim strMSysIMEXColumns As String\r\n    Set db = CurrentDb\r\n    On Error Resume Next\r\n    strMSysIMEXSpecs = "CREATE TABLE MSysIMEXSpecs([DateDelim] TEXT(2), [DateFourDigitYear] BIT, " _\r\n        & "[DateLeadingZeros] BIT, [DateOrder] SMALLINT, [DecimalPoint] TEXT(2), [FieldSeparator] " _\r\n        & "TEXT(2), [FileType] SMALLINT, [SpecID] COUNTER, [SpecName] TEXT(64), [SpecType] BYTE, " _\r\n        & "[StartRow] INTEGER, [TextDelim] TEXT(2), [TimeDelim] TEXT(2));"\r\n    db.Execute strMSysIMEXSpecs, dbFailOnError\r\n    strMSysIMEXSpecs = "CREATE UNIQUE INDEX [PrimaryKey] ON [MSysIMEXSpecs]([SpecName]) WITH PRIMARY DISALLOW NULL;"\r\n    db.Execute strMSysIMEXSpecs, dbFailOnError\r\n    db.TableDefs("MSysIMEXSpecs").Attributes = 2\r\n    strMSysIMEXColumns = "CREATE TABLE MSysIMEXColumns([Attributes] INTEGER, [DataType] SMALLINT, " _\r\n        & "[FieldName] TEXT(64), [IndexType] BYTE, [SkipColumn] BIT, [SpecID] INTEGER, " _\r\n        & "[Start] SMALLINT, [Width] SMALLINT);"\r\n    db.Execute strMSysIMEXColumns, dbFailOnError\r\n    strMSysIMEXColumns = "CREATE INDEX [Index1] ON [MSysIMEXColumns]([SpecID], [Start]);"\r\n    db.Execute strMSysIMEXColumns, dbFailOnError\r\n    strMSysIMEXColumns = "CREATE UNIQUE INDEX [PrimaryKey] ON [MSysIMEXColumns]([SpecID], " _\r\n        & [FieldName]) WITH PRIMARY DISALLOW NULL;"\r\n    db.Execute strMSysIMEXColumns, dbFailOnError\r\n    db.TableDefs("MSysIMEXColumns").Attributes = 2\r\n    On Error GoTo 0\r\n    Set rst = db.OpenRecordset(strHerkunft, dbOpenDynaset)\r\n    db.Execute "DELETE FROM MSysIMEXSpecs WHERE Specname = ''Spec_" & strHerkunft & "''", dbFailOnError\r\n    db.Execute "INSERT INTO MSysIMEXSpecs(Specname, SpecType, DecimalPoint, TextDelim, " _\r\n        & "FieldSeparator) VALUES(''Spec_" & strHerkunft & "'', 1, '','', ''""'', '';'')", dbFailOnError\r\n    lngID = db.OpenRecordset("SELECT @@IDENTITY").Fields(0)\r\n    For Each fld In rst.Fields\r\n         db.Execute "INSERT INTO MSysIMEXColumns(Fieldname, Datatype, SpecID) VALUES(''" & fld.Name _\r\n            & "'', " & fld.Type & ", " & lngID & ")", dbFailOnError\r\n    Next fld\r\nEnd Sub<\/pre>\n
Während dieses Vorgangs wird die Fehlerbehandlung von VBA deaktiviert, damit die Anweisungen keinen Fehler auslösen, wenn die Tabellen bereits vorhanden sind.<\/p>\n
Nach dem Erstellen der Systemtabellen löscht die Prozedur zunächst einen eventuell bereits vorhandenen Eintrag für die gewünschte Spezifikation. Die Spezifikationen werden dabei nach dem Schema Specs_<Tabellenname> <\/b>betitelt.<\/p>\n
Dann fügt die Prozedur zunächst einen Eintrag zur Tabelle MSysIMEXSpecs <\/b>hinzu – dieser enthält die grundlegenden Einstellungen. Im Falle der Spezifikation, die zur Umgehung des oben beschriebenen Fehlers 3441 <\/b>erzeugt werden soll, reichen einige wenige Eigenschaften aus – der Name der Spezifikation, der Typ, das Dezimaltrennzeichen sowie das Texttrennzeichen und das Feldtrennzeichen.<\/p>\n
Danach durchläuft die Prozedur alle Felder der angegebenen Datenherkunft und legt für jedes Feld einen Eintrag in der Tabelle MSysIMEXColumns <\/b>an.<\/p>\n
Auch hier geben wir uns mit wenigen Feldern zufrieden: Der Feldname, der Datentyp sowie der Wert des Fremdschlüsselfeldes zur Zuordnung zum entsprechenden Datensatz der Tabelle MSysIMEXSpecs <\/b>reichen aus.<\/p>\n
Spezifikationen für alle Tabellen<\/b><\/p>\n
Wenn Sie auf die Schnelle Export-Spezifikationen für alle Tabellen der Anwendung erstellen möchten, verwenden Sie beispielsweise die folgende Prozedur, um die Routine SpezifikationAnlegen<\/b> für jede Tabelle einmal aufzurufen:<\/p>\n
Public Sub SpezifikationenFuerAlleTabellen()\r\n    Dim db As DAO.Database\r\n    Dim tdf As DAO.TableDef\r\n    Set db = CurrentDb\r\n    For Each tdf In db.TableDefs\r\n         If tdf.Name Like "MSys*" Then\r\n        Else\r\n             SpezifikationAnlegen tdf.Name\r\n        End If\r\n    Next tdf\r\n    Set db = Nothing\r\nEnd Sub<\/pre>\n
Für Abfragen gelingt dies analog mit der folgenden Prozedur:<\/p>\n
Public Sub SpezifikationenFuerAlleAbfragen()\r\n    Dim db As DAO.Database\r\n    Dim qdf As DAO.QueryDef\r\n    Set db = CurrentDb\r\n    For Each qdf In db.QueryDefs\r\n        If qdf.Name Like "~*" Then\r\n        Else\r\n            SpezifikationAnlegen qdf.Name\r\n        End If\r\n    Next qdf\r\n    Set db = Nothing\r\nEnd Sub<\/pre>\n
Diese beiden Prozeduren spülen schnell die benötigten Export-Spezifikationen in die beiden Tabellen MSysIMEXSpecs <\/b>und MSysIMEXColumns <\/b>(s. Bild 3).<\/p>\n
\"pic003.png\"<\/p>\n
Bild 3: Tabellen mit per VBA hinzugefügten Export-Spezifikationen<\/span><\/b><\/p>\n
Zusammenfassung und Ausblick<\/b><\/p>\n
Mit den hier vorgestellten Techniken fügen Sie einer Anwendung blitzschnell Export-Spezifikationen für alle Tabellen und Abfragen hinzu. Damit können Sie problemlos Exporte mit der VBA-Methode TransferText <\/b>des DoCmd<\/b>-Objekts durchführen. Dieser Befehl funktioniert seit Access 2007 nicht mehr fehlerfrei, wenn Sie keine Export-Spezifikation angeben.<\/p>\n
Downloads zu diesem Beitrag<\/h3>\n
Enthaltene Beispieldateien:<\/p>\n
Textexport.mdb<\/p>\n
Download<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"
Normalerweise ist das Exportieren von Tabellen oder Abfragen als Text- oder CSV-Datei kein Problem – Sie nutzen entweder den Assistenten dazu oder verwenden die Methode TransferText des DoCmd-Objekts. Dummerweise führt dies, auch wenn es in Anwendungen bis Access 2003 funktionierte, unter neueren Versionen von Access zu einem Fehler. Warum dies geschieht und wie Sie TransferText weiter nutzen können, erläutert dieser Beitrag.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[662013,66032013,44000026],"tags":[],"class_list":["post-55000887","post","type-post","status-publish","format-standard","hentry","category-662013","category-66032013","category-Interaktiv"],"yoast_head":"\nVBA-Textexport unter Access 2007 und jünger - Access im Unternehmen<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/\" \/>\n<meta property=\"og:locale\" content=\"de_DE\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"VBA-Textexport unter Access 2007 und jünger\" \/>\n<meta property=\"og:description\" content=\"Normalerweise ist das Exportieren von Tabellen oder Abfragen als Text- oder CSV-Datei kein Problem - Sie nutzen entweder den Assistenten dazu oder verwenden die Methode TransferText des DoCmd-Objekts. Dummerweise führt dies, auch wenn es in Anwendungen bis Access 2003 funktionierte, unter neueren Versionen von Access zu einem Fehler. Warum dies geschieht und wie Sie TransferText weiter nutzen können, erläutert dieser Beitrag.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/\" \/>\n<meta property=\"og:site_name\" content=\"Access im Unternehmen\" \/>\n<meta property=\"article:published_time\" content=\"2020-05-22T21:35:59+00:00\" \/>\n<meta property=\"og:image\" content=\"http:\/\/vg05.met.vgwort.de\/na\/f08c693b4a3c47c8965805273f37972f\" \/>\n<meta name=\"author\" content=\"Andr\u00e9 Minhorst\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Verfasst von\" \/>\n\t<meta name=\"twitter:data1\" content=\"Andr\u00e9 Minhorst\" \/>\n\t<meta name=\"twitter:label2\" content=\"Gesch\u00e4tzte Lesezeit\" \/>\n\t<meta name=\"twitter:data2\" content=\"7\u00a0Minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\\\/\\\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/#article\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/\"},\"author\":{\"name\":\"Andr\u00e9 Minhorst\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\"},\"headline\":\"VBA-Textexport unter Access 2007 und jünger\",\"datePublished\":\"2020-05-22T21:35:59+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/\"},\"wordCount\":975,\"commentCount\":0,\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg05.met.vgwort.de\\\/na\\\/f08c693b4a3c47c8965805273f37972f\",\"articleSection\":[\"2013\",\"3\\\/2013\",\"Interaktiv\"],\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/\",\"name\":\"VBA-Textexport unter Access 2007 und jünger - Access im Unternehmen\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/#primaryimage\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg05.met.vgwort.de\\\/na\\\/f08c693b4a3c47c8965805273f37972f\",\"datePublished\":\"2020-05-22T21:35:59+00:00\",\"breadcrumb\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/#breadcrumb\"},\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/#primaryimage\",\"url\":\"http:\\\/\\\/vg05.met.vgwort.de\\\/na\\\/f08c693b4a3c47c8965805273f37972f\",\"contentUrl\":\"http:\\\/\\\/vg05.met.vgwort.de\\\/na\\\/f08c693b4a3c47c8965805273f37972f\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/VBATextexport_unter_Access_2007_und_juenger\\\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"VBA-Textexport unter Access 2007 und jünger\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"name\":\"Access im Unternehmen\",\"description\":\"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access\",\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\\\/\\\/access-im-unternehmen.de\\\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"de\"},{\"@type\":\"Organization\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\",\"name\":\"Andr\u00e9 Minhorst Verlag\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"contentUrl\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"width\":370,\"height\":111,\"caption\":\"Andr\u00e9 Minhorst Verlag\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\",\"name\":\"Andr\u00e9 Minhorst\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"url\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"contentUrl\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"caption\":\"Andr\u00e9 Minhorst\"}}]}<\/script>\n<!-- \/ Yoast SEO Premium plugin. -->","yoast_head_json":{"title":"VBA-Textexport unter Access 2007 und jünger - Access im Unternehmen","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/","og_locale":"de_DE","og_type":"article","og_title":"VBA-Textexport unter Access 2007 und jünger","og_description":"Normalerweise ist das Exportieren von Tabellen oder Abfragen als Text- oder CSV-Datei kein Problem - Sie nutzen entweder den Assistenten dazu oder verwenden die Methode TransferText des DoCmd-Objekts. Dummerweise führt dies, auch wenn es in Anwendungen bis Access 2003 funktionierte, unter neueren Versionen von Access zu einem Fehler. Warum dies geschieht und wie Sie TransferText weiter nutzen können, erläutert dieser Beitrag.","og_url":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/","og_site_name":"Access im Unternehmen","article_published_time":"2020-05-22T21:35:59+00:00","og_image":[{"url":"http:\/\/vg05.met.vgwort.de\/na\/f08c693b4a3c47c8965805273f37972f","type":"","width":"","height":""}],"author":"Andr\u00e9 Minhorst","twitter_card":"summary_large_image","twitter_misc":{"Verfasst von":"Andr\u00e9 Minhorst","Gesch\u00e4tzte Lesezeit":"7\u00a0Minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/#article","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/"},"author":{"name":"Andr\u00e9 Minhorst","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f"},"headline":"VBA-Textexport unter Access 2007 und jünger","datePublished":"2020-05-22T21:35:59+00:00","mainEntityOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/"},"wordCount":975,"commentCount":0,"publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/#primaryimage"},"thumbnailUrl":"http:\/\/vg05.met.vgwort.de\/na\/f08c693b4a3c47c8965805273f37972f","articleSection":["2013","3\/2013","Interaktiv"],"inLanguage":"de","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/","url":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/","name":"VBA-Textexport unter Access 2007 und jünger - Access im Unternehmen","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/#website"},"primaryImageOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/#primaryimage"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/#primaryimage"},"thumbnailUrl":"http:\/\/vg05.met.vgwort.de\/na\/f08c693b4a3c47c8965805273f37972f","datePublished":"2020-05-22T21:35:59+00:00","breadcrumb":{"@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/#breadcrumb"},"inLanguage":"de","potentialAction":[{"@type":"ReadAction","target":["https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/"]}]},{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/#primaryimage","url":"http:\/\/vg05.met.vgwort.de\/na\/f08c693b4a3c47c8965805273f37972f","contentUrl":"http:\/\/vg05.met.vgwort.de\/na\/f08c693b4a3c47c8965805273f37972f"},{"@type":"BreadcrumbList","@id":"https:\/\/access-im-unternehmen.de\/VBATextexport_unter_Access_2007_und_juenger\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/access-im-unternehmen.de\/"},{"@type":"ListItem","position":2,"name":"VBA-Textexport unter Access 2007 und jünger"}]},{"@type":"WebSite","@id":"https:\/\/access-im-unternehmen.de\/#website","url":"https:\/\/access-im-unternehmen.de\/","name":"Access im Unternehmen","description":"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access","publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/access-im-unternehmen.de\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"de"},{"@type":"Organization","@id":"https:\/\/access-im-unternehmen.de\/#organization","name":"Andr\u00e9 Minhorst Verlag","url":"https:\/\/access-im-unternehmen.de\/","logo":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/","url":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","contentUrl":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","width":370,"height":111,"caption":"Andr\u00e9 Minhorst Verlag"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f","name":"Andr\u00e9 Minhorst","image":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","url":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","caption":"Andr\u00e9 Minhorst"}}]}},"_links":{"self":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55000887","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/comments?post=55000887"}],"version-history":[{"count":0,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55000887\/revisions"}],"wp:attachment":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/media?parent=55000887"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/categories?post=55000887"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/tags?post=55000887"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}