• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Tekstbestanden (Variabel) in excel tabel plaatsen

Status
Niet open voor verdere reacties.

Georgyboy

Terugkerende gebruiker
Lid geworden
6 jan 2007
Berichten
1.020
Besturingssysteem
Windows 11
Office versie
365
Hallo iedereen,

Vooreerst aan allen een zalige kerst !

Vraagje, binnenkort mag ik de verkoopsresultaten weer om zetten naar excel tabellen.
In de excel tabel gaan we deze dan analyseren met draaitabel,
al dan niet met een grafiek.

Deze tekstbestanden met resultaten zijn variabel in breedte en aantal rijen.
Is dit mogelijk op te lossen door middel van een macro in VBA ?

Zo ja , hoe kunnen we de macro opbouwen ?

Test gedaan via een macro opname :

Code:
Sub TekstInvoer()
'
' TekstInvoer Macro
'

'
    ChDir "D:\TEST\ANALYSES\2008"
    Workbooks.OpenText Filename:= _
        "D:\TEST\ANALYSES\2008\OMZET per deb van 1-01-2008 tm 31-12-2008.TXT" _
        , Origin:=xlWindows, StartRow:=1, DataType:=xlFixedWidth, FieldInfo:= _
        Array(Array(0, 1), Array(9, 1), Array(50, 1), Array(57, 1), Array(66, 1), Array(76, 1)), _
        TrailingMinusNumbers:=True
End Sub

Groeten,
Georgyboy
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan