Eksport til txt-fil - med filnavn som felt

Alternativt kunne brugeren blive bedt om et filnavn, når han trykker på knappen!!!!!

Rene Andersen

Du kan lave en knap med denne kode:

docmd.OutputTo acOutputTable,"Din tabel",acFormatTXT

Så vil brugeren blive bedt om navn og sti via OpenFile-Dialogboksen

Dog er formatet med Docmd.OutputTo ikke alm. .txt-format.

Dertil skal man bruge:

docmd.TransferText acExportDelim,,"Din tabel","C:\test.txt",true

Hvis du på samme formular har dit feltnavn, som filnavnet skal baseres på, kan linien se således ud:
docmd.TransferText acExportDelim,,"Tblløn","C:\Startmappe\" & Me!Ditfeltnavn & ".txt" ,true

Kan jeg putte det ind i en Makro??? Kan jeg benytte den eksportspcifikation jeg har oprettet til formålet???
Jeg er faktisk mere til at benytte den met brugen får "Openfile-dialogboksen" !!!!

Undskyld stavefejlene....det gik vist lidt stærkt!!!!!

Du kan godt putte den ind i en makro (selvom jeg til hver en tid vil anbefale VBA).

Makro-handlingen hedder: Overførtekst
Her angiver du også specifikationsnavnet.
I Filnavn angiver du:
"C:\Startmappe\" & Form!Ditfeltnavn & ".txt"

Du kan ikke bruge OpenFile-dialogboksen til OverførTekst på samme måde som ved OutputTo.

Hvis du vil bruge OpenFile-dialogboksen sammen med OverførTekst, er du nødt til at lave det i VBA og så skal du have en masse ekstra kode for at åbne denne dialogboks. Kig evt her for at finde eks. på hvordan man benytter OpenFile (eller commondialog, som den også hedder): http://www.makeiteasy.dk/eksempler/Downloads.htm

fik du mine sidste kommentarer, ra1101?

Jep, jeg sidder og afprøver med får følgende fejl, når jeg prøvver at afspille min makro: ""C:\" er ikke en gyldig sti

Nogen gode ideer?????

Jeg har skrevet følgende i makroen:

"C:\" & Udtræk!Kontrahentkode & ".txt"

Hmm "C:\" & Udtræk!Kontrahentkode & ".txt" skal nok udskiftes med:
"C:\" & Form!Kontrahentkode & ".txt"

ordet Form er et reserveret ord, som referere til den aktuelle formular (og skal altså ikke erstattes med formularnavnet - hvilket selvfølglig var nærliggende at tro :o)

OK, jeg har endnu ikke oprettet en form. Det ville jeg først gøre til sidst, men det afprøver jeg selvfølgelig nu.

Jeg bliver desværre nødsaget til at køre hjem og "passe" kone og barn nu, så jeg håber det er ok at jeg vender tilbage til dig i morgen formiddag igen.

God aften!!!

Ja, det er man jo nødt til :o)

Jeg er her desværre ikke i morgen (før om aftenen), så jeg håber at du klare den. ellers kan det være, at der er andre venlige sjæle :o)

Takker foreløbig mange gange, og håber at jeg får det til at virke i morgen.

Men afslutningsvis vil jeg igen opfordre dig til at lave det i VBA. Det er lettere end man tror (nogle gange :o).

Fjern makroen fra knappen og højreklik på knappen (i design) og vælg "Generer hændelsesprocedure". I dialogboksen vælges "Kodegenerator".

Mellem de 2 indsatte linier, skriver du:
docmd.TransferText acExportDelim,,"Navn på din tabel","C:\Startmappe\" & Me![Ditfeltnavn] & ".txt" ,true

NB: Bemærk at "Form" er skiftet ud med "ME" i forhold til makrosproget (Access er desværre ikke altid helt konsistent på alle områder, så i VBA skal man bruge ME ;)

Hej thomasjepsen

Du er bare "gud". Jeg lavede det som du foreslog i VBA, og det var da ikke så svært.
Så nu kører det bare, præcis som jeg ønskede det, takker!!!!!!

Det er da dejligt at høre :o)