Avatar billede mostcrazy Nybegynder
30. september 2007 - 00:36 Der er 6 kommentarer og
1 løsning

Import af txt fil vha. VBA

Hej,

Jeg har en tabulatorsepareret fil med pt. 4 kolonner, som jeg gerne vil have importeret til et eksisterende ekcel ark.

Jeg har prøvet med OpenText funktionen i VBA, men fandt hurtigt ud af, at den åbner en helt ny projektmappe til excel, hvilket ikke er ønskeligt for mig.

Mit spørgsmål er derfor om nogle af jer skulle have nogle guldkorn. Jeg har søgt efter forskellige metoder både her på siden og rundt om på nettet, men har haft svært ved at danne mig et overblik over hvad der var skidt og hvad der var godt.

Med OpenText metoden oplevede jeg også problemer med, at den ikke ville importere æøå korret.
Avatar billede kabbak Professor
30. september 2007 - 10:26 #1
prøv at tjekke her:
http://www.eksperten.dk/spm/409256
og her

http://www.eksperten.dk/spm/692276

kan du selv rette til ??
Avatar billede brynil Nybegynder
30. september 2007 - 10:46 #2
Kan du ikke løse problemet via 'Import External Data' fra Data menuen?

Fx:

Sub Macro1()
    With ActiveSheet.QueryTables.Add(Connection:="TEXT;E:\test.txt", Destination:=Range("C7"))
        .Refresh BackgroundQuery:=False
    End With
End Sub
Avatar billede mostcrazy Nybegynder
30. september 2007 - 12:23 #3
kabbak: jeg kan ikke umiddelbart gennemskue hvordan de forslag hænger sammen / er bygget op

brynil: Opdateringsfrekvensen er rimelig høj, så jeg vil gerne gøre det lettere for brugeren at importere de relevante data.

Hvordan sætter jeg Connection:= til en variabel?
Avatar billede brynil Nybegynder
30. september 2007 - 12:33 #4
Sub Macro1()
Dim var1 As String
var1 = "E:\test.txt"
   
    With ActiveSheet.QueryTables.Add(Connection:="TEXT;" & var1, Destination:=Range("C7"))
        .Refresh BackgroundQuery:=False
    End With

End Sub
Avatar billede brynil Nybegynder
30. september 2007 - 12:45 #5
Du kan ligeledes arbejde med destinationen.

...Destination:=Range(ActiveCell.Address)) - den aktive celle eller

...Destination:=Range(var2)) - via yderligere en stringvariabel
Avatar billede mostcrazy Nybegynder
30. september 2007 - 13:19 #6
super tak for hjælpen :-)

smid et svar og der er point på vej
Avatar billede brynil Nybegynder
30. september 2007 - 13:36 #7
Selv tak :))
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester