VBA files collection problem ( also posted in ms.p.word.vba.general )

[fffcj]

I want to get hold of a particular file which is a member of a files
colleciton of a given folder .

IN the following code , i'm in trouble on the line :
Set fil = files(lngC)

Why don't this work ??


Thanks
Chris

******************************************************


Sub EraseFirstCharsFromFileNames()



Dim fldr As Folder
Dim files As files
Dim fil As File
Dim lngFileCount As Long
Dim lngC As Long



Set fldr = mfso.GetFolder("F:\000 Samples\String Textures Time&Space
Creative EssentialsSeries\03 Cello Tremolando")


lngFileCount = fldr.files.Count



For lngC = 1 To lngFileCount


Set files = fldr.files
Set fil = files(lngC)

' mess with the file name here


Next





Set mfso = Nothing



End Sub

************************************************************

 

[bangelastts5880]

The method of rapid weight loss

Hi
read your discussions here
but good tips on losing weight is not
find here a lot of interesting and recipes and diet I thank this website for 10 pounds
lost weight !

]wibb ru