Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
how do i print a list of files in ms word 2007
how do i print a list of files in ms word 2007
|
#2
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
how do i print a list of files in ms word 2007
Do you mean all of your Word documents or do you mean the names of the files
that comprise the program? -- JoAnn Paules MVP Microsoft [Publisher] Tech Editor for "Microsoft Publisher 2007 For Dummies" "big joe" wrote in message ... how do i print a list of files in ms word 2007 |
#3
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
how do i print a list of files in ms word 2007
|
#4
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
how do i print a list of files in ms word 2007
Either use the following macro, or download the Printfolders tool from my
web site Sub FolderContents() On Error GoTo err_FolderContents Set NewDoc = Documents.Add Dim DocList As String Dim DocDir As String Dim fDialog As FileDialog Set fDialog = Application.FileDialog(msoFileDialogFolderPicker) Application.ScreenUpdating = False With fDialog .Title = "Select folder to save the copy and click OK" .AllowMultiSelect = False .InitialView = msoFileDialogViewList If .Show -1 Then MsgBox "Cancelled By User", , "List Folder Contents" Exit Sub End If DocDir = fDialog.SelectedItems.Item(1) If Right(DocDir, 1) "\" Then DocDir = DocDir + "\" End With DocList = Dir(DocDir & "*.doc", vbNormal) Do While DocList "" With Selection .Style = "Normal" .Font.name = "Times New Roman" .Font.Size = "10" .TypeText DocList & vbCr End With DocList = Dir Loop If NewDoc.Characters.Count = 1 Then MsgBox "No documents found in selected folder", _ vbInformation, "No Data " Exit Sub End If 'Remove the next line if you do not want a two column layout ActiveDocument.PageSetup.TextColumns.Add Width:=InchesToPoints(3) ActiveWindow.ActivePane.View.Type = wdPageView Application.ScreenUpdating = True Exit Sub err_FolderContents: MsgBox Err.Description Exit Sub End Sub http://www.gmayor.com/installing_macro.htm -- Graham Mayor - Word MVP My web site www.gmayor.com Word MVP web site http://word.mvps.org big joe wrote: how do i print a list of files in ms word 2007 |
#5
Posted to microsoft.public.word.docmanagement
|
|||
|
|||
how do i print a list of files in ms word 2007
I have used a 3d party freeware product "DirPrint" to occasionally print a
list of files in a single directory. It worked well enough for the very limited purpose I had in mind. There are some more advanced (and generally free) products to print out more than a single directory or folder's contents, such as showing the information in a "tree" structure, and you can search for them. "big joe" wrote in message ... how do i print a list of files in ms word 2007 |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How can I print a list of files within a folder in Word? | Microsoft Word Help | |||
How can I print a list of files within a folder? | Microsoft Word Help | |||
How do I print a list of all my files on my C drive? | Microsoft Word Help | |||
How do I print out a given list of files? | Microsoft Word Help | |||
Print a list of files within a folder | Microsoft Word Help |