range

M

MarcoPolo

I have a file txt that i need to import into an array
I know i can do it in excel setting a rng and stroing into a variant

But in word?
 
J

Jezebel

Dim pFileNum as long
Dim pArray as string

pFileNum = freefile
Open "C:\asdasdasd.txt" for input as pFileNum
pArray = Split(input(LOF(pFileNum),pFileNum),vbCr)
close pFileNum
 
Top