VBA: Make Indent New Paragraph

[Susanto3311]

hi all..

how to make indent for new paragraph using VBA/Macro e.g. 1 cm
please, see attached picture
thank in advance

[HansV]

Code: Select all

Sub Indent1Cm()
    Selection.ParagraphFormat.FirstLineIndent = CentimetersToPoints(1)
End Sub

[StuartR]

It would be much better to define a paragraph style for this, and then to apply that style to the relevant paragraphs. In your example if "AFTER RUN MACRO" is in a specific style then you could set that style to have a following paragraph in the 1cm indent style that you have defined.

[Susanto3311]

hi Hans, thank you!!!

[Susanto3311]

hi ..
the macro can't automatically in second paragraph.
i must select/block in 1st & 2nd paragraph then running code.
and how about this problem? i want not change for numbering list

[HansV]

The macro acts on the selected text only. If you don't want to change numbered paragraphs, don't select numbered paragraphs.

[ChrisGreaves]

... you could set that style to have a following paragraph in the 1cm indent style that you have defined.

... and set that style to have, as its following paragraph, the same style?
Cheers
Chris

[Susanto3311]

Hi Chris, my paragraph always same style.

[ChrisGreaves]

Hi Chris, my paragraph always same style.

Susan, please accept my apologies. I was being too lazy to explain in full.

Untitled.png

In this example I am using a paragraph style called "Body Text" (top left of the image).
I decide to Modify the style, and a second pane opens up (right-hand side).

The top-right of the image shows in that second pane that I am modifying the style "Body Text", and finally, when I tap the Enter key to start a new paragraph, then the new paragraph will continue to be in the same style - that of "Body Text".

You can create a paragraph style for the paragraph that begins "Skin Whitening products ...". let's suppose that you call this style "SusansIndent"
When you tap the Enter key after typing " ... Working Group (ZMWG) finds", the new paragraph will automatically be in the same style, that is "SusansIndent".

Even better, the paragraph style you use to type "After Run Macro" can have its following style set to "SusansIndent", so that after you have typed ""After Run Macro"" and tapped the Enter key, you will automatically be in the style "SusansIndent"

Cheers
Chris

[Susanto3311]

hi chris, thank you.. i will try.

[Charles Kenyon]

Note, if you are using automatic numbering, the indent for that is controlled, not in the style, but in the Define New MultiLevel List dialog.
See http://www.shaunakelly.com/word/numberi ... 72010.html.
The numbered items should be using a different paragraph style from your Body Text style, although it can be based on the Body Text style.

I would be handling this through your styles and not involving vba at all.