Every line with small letter

[Dimsok]

Please, give me an example of code, which makes evey firs letter of new paragraph in low case.

[gmayor]

Try the following

Sub Macro1()
Dim oPara As Paragraph
For Each oPara In ActiveDocument.Paragraphs
    oPara.Range.Characters(1).Case = wdLowerCase
Next oPara
End Sub

[Dimsok]

Thanks, it works.