Importer fra Excel regneark - automatisk

Dit link fungerer ikke.
Men der er ikke noget i vejen for at du evt. kan importere til en temporær tabel, og ved hjælp af kriterier / opdateringsforespørgsler kan slette det ønskede. Byg evt. en makro og brug handlingen OverFørRegneark,
Men er det kun een gang du skal gøre det, er det enmmeste vel nok manuelt at slette ikke ønskede rækker.

linket virker fint, sådan da: det er pga. der er mellemrum melle 010404 og bog.xls - det skal der være, men linket er hele den linie.

Det er en fil som ofte bliver opdateret og derfor er det nemmest hvis det hele kan ske automatisk.

/dsjk

Du skal oprette en importspecifikation, når du importerer data til Access. Heri kan du definere hvilke kolonner som de vil have importeret.

Herefter kan denne benyttes til import :

Function Import()
             
    DoCmd.RunSQL "DELETE * FROM tblPostNr"
       
    ImportFolder = DLookup("[ImportFil]", "tblFilplacering", "[JobID] = 1")
             
    'Behandler Importfil
    DoCmd.TransferText acImportDelim, "", "tblPostNr", ImportFolder & "fil.xls", False, ""

End Function

DoCmd.TransferText acImportDelim, ""

"Her indsætter du navnet på den importspecifikation du har oprettet"

Når du har importeret tabellen, kan du påbegynde datavask vha.

DELETE
UPDATE osv.

Mugs > linket er :

http://www.postdanmark.dk/iis/markedsfoering/Download_dokumenter/010404_bog.xls

Tak. Så er mit bud:

DoCmd.TransferSpreadsheet acImport, 8, "import", "C:\010404_bog", True, ""

Og herefter datavask.

Selvfølgelig TransferSpreadsheet og ikke TransferText ;)

Var lidt for hurtig med genbrugstasten ....

:o)

ok, jeg kigger lidt på det, og vender tilbage hvis jeg får problemer.

Men indtil videre: Tak fot hjælpen. :)

Velbekommen ;)

Tak for point.

Også tak herfra ...

Man kan da ikke lave en import specifikation for transferspreadsheet - kan man?

Hvad mener du med importspecifikation? Min kode importerer et regneark til Access i tabellen "import".