range

[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?

 

[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