Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Datenexport in txt-Datei mit Zusatzzeile (Information)
zurück: 2 Abfragen / Tabellen abgleichen + Daten übernehmen weiter: Formular friert ein Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Azraelevilgod
Neuling


Verfasst am:
19. Nov 2007, 09:35
Rufname:
Wohnort: Lübbecke

Datenexport in txt-Datei mit Zusatzzeile (Information) - Datenexport in txt-Datei mit Zusatzzeile (Information)

Nach oben
       Version: Office 2007

Hallo Leute!

Bin ein absoluter Noob auf dem Gebiet der VBA-Programmierung. Ich erkläre mal kurz worum es geht.

Für eine Warenwirtschaftssoftware, die wir einsetzen ist es notwendig, bestimmte Daten zu exportieren, diese in Access(2007) zu importieren, dort zu bearbeiten und dann wieder als txt-Datei zu exportieren.
Bis hierhin kein Problem.

Jedoch benötigt die exportierte txt-Datei in der ersten Zeile die Information "format=2" damit die Importsoftware auf Wirtschaftssystemseite die Datei erkennt.
Mal in nichtprogrammierdenke gedacht:
Code:
prüfe ob datei vorhanden,
wenn nicht vorhanden erstelle txt-Datei,
öffne datei(name immer gleich),
prüfe ob erste Zeile = "format=2",
wenn ja, schließen - wenn nicht weiter
Zeilenvorschub
erste Zeile "format=2"
speichern
end
Irgendwie so...
Kann man das in VBA abbilden? Oder er Makro?

Wäre toll wenn mir einer helfen könnte, sowas zu basteln.

Lieben Dank

Marc
Nachtrag: Azraelevilgod am 19. Nov 2007 um 12:56 hat folgendes geschrieben:
Kleines Update:

Das hier reicht mir eigentlich schon:
Code:
Sub Format()
    Dim txt As String

    txt = "format=2"
    Open ".\DatenexportMEDI.txt" For Append As #1
    Print #1, txt
    Close #1
End Sub
Allerdings habe ich das Problem, dass die Datei nach dem Export eigentlich ein "Prepend" bräuchte.

Ergo: Gespeicherter Export wird durchgeführt, dadurch wird die Textdatei geschrieben. Danach muss in die erste Zeile "format=2" und nicht unten dran, wie hier.

Ausserdem geht der relative Pfad dort oben *zeig* nicht. Der ändert mir die Textdatei erst, wenn ich den absoluten Pfad eingebe. Sad

Bitte greift mir einmal unter die Arme... ist ganz easy stuff Wink (Für die begabten VBA-ler.... ) LG

Marc
SGast
Gast


Verfasst am:
19. Nov 2007, 14:24
Rufname:

AW: Datenexport in txt-Datei mit Zusatzzeile (Information) - AW: Datenexport in txt-Datei mit Zusatzzeile (Information)

Nach oben
       Version: Office 2007

Hallo,
Textdateien am Anfang schreiben ist so nicht möglich.
Deshalb folgende Variante:
Zeile in Zieldatei schreiben - Quelldatei an Zieldatei anhängen
Code:
Sub DateiNeuSchreiben()
    Dim Quelle As String, Ziel As String
    Dim GrundPfad As String
    Dim Zeile As String, iDatNum As Integer, oDatNum As Integer
   
    GrundPfad = CurrentProject.Path & "\"
    Quelle = GrundPfad & "q.txt"
    Ziel = GrundPfad & "z.txt"
    iDatNum = FreeFile
    Open Quelle For Input As iDatNum
    oDatNum = FreeFile
    Open Ziel For Output As oDatNum
    Print #oDatNum, "format=2"
    Do While Not EOF(iDatNum)
        Line Input #iDatNum, Zeile
        Print #oDatNum, Zeile
    Loop
    Close #iDatNum
    Close #oDatNum
' kill quelle
End Sub


Gruß Steffen
Azraelevilgod
Neuling


Verfasst am:
19. Nov 2007, 15:49
Rufname:
Wohnort: Lübbecke


AW: Datenexport in txt-Datei mit Zusatzzeile (Information) - AW: Datenexport in txt-Datei mit Zusatzzeile (Information)

Nach oben
       Version: Office 2007

Azraelevilgod am 19. Nov 2007 um 14:21 hat folgendes geschrieben:
Super, danke!

Werde ich gleich einmal austesten! *freu*

LG

Marc

Hat super geklappt! Vielen Dank! Very Happy

Da wäre ich als Laie völlig dran verzweifelt! Vielen vielen Dank!

LG

Marc
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Hinzufügen einer Information 4 MajorD 188 21. Okt 2011, 12:15
MajorD Hinzufügen einer Information
Keine neuen Beiträge Access Tabellen & Abfragen: Information auf Tabellen verteilen oder mehrere Abfragen 5 pianopatent 203 08. Sep 2011, 17:08
pianopatent Information auf Tabellen verteilen oder mehrere Abfragen
Keine neuen Beiträge Access Programmierung / VBA: 2. txt-Datei automatisch import., vorhandener Code v. derArb 1 Anna91 289 30. Aug 2011, 08:55
Anna91 2. txt-Datei automatisch import., vorhandener Code v. derArb
Keine neuen Beiträge Access Programmierung / VBA: Problem Datenexport nach excel 6 Gordonsky 590 24. Feb 2011, 07:15
Gordonsky Problem Datenexport nach excel
Keine neuen Beiträge Access Tabellen & Abfragen: Problem mit Datenexport aus Access 5 webrus 1727 02. Jan 2010, 15:43
steffen0815 Problem mit Datenexport aus Access
Keine neuen Beiträge Access Programmierung / VBA: TXT-Datei mit Word aus Access per VBA öffnen 1 Gast 496 21. Okt 2009, 12:45
lleopard TXT-Datei mit Word aus Access per VBA öffnen
Keine neuen Beiträge Access Programmierung / VBA: import txt-Datei nicht vollständig 7 Gast 398 17. Sep 2009, 12:42
Gast import txt-Datei nicht vollständig
Keine neuen Beiträge Access Programmierung / VBA: Chinesische Zeichen beim Import einer txt-Datei nach Access 3 Laserjet100 1195 01. Jun 2009, 20:38
Gast Chinesische Zeichen beim Import einer txt-Datei nach Access
Keine neuen Beiträge Access Programmierung / VBA: Export als TXT-Datei mit festen Feldlängen ohne Trennzeichen 12 thoka26 2117 22. Dez 2008, 16:04
thoka26 Export als TXT-Datei mit festen Feldlängen ohne Trennzeichen
Keine neuen Beiträge Access Programmierung / VBA: Datenexport Access in Excel 3 sennah 784 25. Sep 2007, 22:28
JörgG Datenexport Access in Excel
Keine neuen Beiträge Access Programmierung / VBA: Txt-Datei mittels VBA aus Access drucken 1 thingol 706 28. Aug 2007, 13:21
SGast Txt-Datei mittels VBA aus Access drucken
Keine neuen Beiträge Access Tabellen & Abfragen: Information aus 2 Tabellen vereinen 2 Verena84 800 25. Apr 2007, 09:35
Verena84 Information aus 2 Tabellen vereinen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel Tricks