need macro to run on all files in folder

[srinivas.mj]

need macro to run on all files in folder

Sub BreakLines()
Application.ScreenUpdating = False
With ActiveDocument.Content.Paragraphs
.FirstLineIndent = 0
.LeftIndent = 0
End With
Selection.HomeKey Unit:=wdStory
Do
Selection.EndKey Unit:=wdLine
If Selection.End >= ActiveDocument.Content.End - 1 Then
Exit Do
End If
If Asc(Selection) <> 13 Then
Selection.InsertParagraphAfter
End If
Selection.MoveDown Unit:=wdLine
Loop


Application.ScreenUpdating = True
End Sub

[gmayor]

See http://www.gmayor.com/document_batch_processes.htm which will handle the folders'

Then change your macro to the following and run it as a custom process.

Function BreakLines(oDoc As Document) As Boolean
    On Error GoTo err_Handler
    Application.ScreenUpdating = False
    With ActiveDocument.Content.Paragraphs
        .FirstLineIndent = 0
        .LeftIndent = 0
    End With
    Selection.HomeKey Unit:=wdStory
    Do
        Selection.EndKey Unit:=wdLine
        If Selection.End >= ActiveDocument.Content.End - 1 Then
            Exit Do
        End If
        If Asc(Selection) <> 13 Then
            Selection.InsertParagraphAfter
        End If
        Selection.MoveDown Unit:=wdLine
    Loop
    Application.ScreenUpdating = True
    BreakLines = True
lbl_Exit:
    Exit Function
err_Handler:
    BreakLines = False
    Resume lbl_Exit
End Function