Eksport af notatfelt

A "notat" field can be VERY LARGE therefore it isnt possible (i dont think) using Access's buildt in export functions. You should be able to do it using VBA code to make your own export function.

And how do I do that?

Undskyld, menjeg har lige (manuelt) eksporteret et tabel med et notatfelt, indeholdende 3500 tegn til en .txt-fil uden problemer.....

Jeg har heller aldrig hørt om, at der skulle være problemer med dette.

Prøv selv:
-Højreklik på tabellen
-vælg tekstfiler (*.txt, *.csv, *.tab, *.asc)
-Angiv placering og filnavn
-følg guiden (gerne med default-indstillingerne)

thomasjepsen> Korrekt med manuel eksport - mit problem skyldes åbenbart at jeg bruger en eksportspecifikation i en macro.

Så lav en manuel eksport og gem specifikationen undervejs. Benyt derefter den nye specifikation i makroen....

Jeg tror desværre problemet skyldes specifikationen i sig selv. Eksempelvis kan jeg ikke lave eksport til tekstfil uden overskrifter, når jeg anvender en specifikation (løst v.h.a. VBA).

Det kan du nu sagtens, denne oplysning gemmes så vidt jeg husker bare ikke i specifikationen, men i én af de andre parametre i kommandoen (den 5. parameter, så vidt jeg husker).
Benytter du Docmd.TransferText?

Du kan i stedet lave en rapport med dit notatfelt. Rapporten kan du overføre til txt, rtf, doc osv med

DoCmd.OutputTo acReport, "minrapport", acFormatTXT, "minfil.txt"
eller
DoCmd.OutputTo acReport, "minrapport", acFormatRTF, "minfil.rtf"
osv.

Mulighederne er beskrevet i VBA hjælpefilen under "OutputTo Method"

thomasjepsen> Hvad mener du med "de andre parametre i kommandoen"? Jeg har blot valgt Overfør tekst i en macro.......

Du kan sagtens gemme Notatfeltet helt uden om de indbyggede rutiner.
Lav en formular med de 2 felter [TEXT]=Notatfeltet og [ID] = Autonummerering.
VedÅbning[Hændelsesprocedure] indsætter du følgende:

Private Sub Form_Open(Cancel As Integer)
            Dim SidsteNr As Long
            Dim AText As String
            Dim Filnr As Integer
            Dim Filnavn As String
           
            Filnr = FreeFile
            Filnavn = "c:\dokumenter\MinText.txt"
            Open Filnavn For Binary Access Write As Filnr

            DoCmd.GoToRecord , , acLast
            SidsteNr = [ID]
            DoCmd.GoToRecord , , acFirst
           
            Do
                AText = [TEXT]
                Put Filnr, , AText & vbCrLf
                ' indsætter linjeskift efter hver post
               
                If [ID] = SidsteNr Then Exit Do
                DoCmd.GoToRecord , , acNext
            Loop
           
            Close Filnr
            DoCmd.Close
End Sub

Efter at du har valgt dit eget filnavn åbner du formularen og du er færdig!

Jeg sidder pt. med samme problem, men hvor jeg har en forespørgsel til at selektere de data der skal eksporteres. I VBA bruger jeg:

    DoCmd.OutputTo acOutputQuery, "Definitioner_til_Excel", acFormatXLS, DefMappe & FilNavn

"Definitioner_til_Excel" er forespørgslens navn
Defmappe & Filnavn angiver drev og filnavn, der skal eksporteres til.

Kan man evt. styre det i feltets egenskaber i forespørgslen ?
Bemærk, at jeg skal eksportere til EXCEL