newbie in trouble

[ibaia]

Hello everyone
I'm new at vb, but I need to do something for my boss
arggggg

I need to grab in a bunch of word files and make a TOC with date, name and date modified, and each time I add a file to the directory it adds the same file to the TOC

Thks

Isabel

[WorkHorse]

I don't understand. Where do ou get the "bunch of names"? Every doc in a certain directory? Also sounds like you want a list f document properties, not a Table Of Contents of those files. The first item you listed is "date". What date is that?

This will return name and last updated for all doc files in a diectory.

Sub GetFileStuff()
 
    Dim strMyPath, objFSO, objFiles, objFile, strOutput
 
    strMyPath = "C:\My Documents\"
    
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFiles = objFSO.GetFolder(strMyPath).Files
    
    For Each objFile In objFiles
        If Right$(objFile.Name, 4) = ".doc" Then
            strOutput = strOutput & objFile.Name & vbTab & objFile.DateLastModified & vbCrLf
        End If
    Next
    
    Msgbox strOutput
 
    Set objFiles = Nothing
    Set objFSO = Nothing
 
End Sub