How to set Left, Right indents of a word document

[kcvinu]

Hi all,

I need to set a word document's left, right indents programatically. Say, when i press Alt+L, then left indent should go to a specific location. And when i press Alt+R, then right indent should go to a specific location. I have searched a lot in the members of Range object. But couldn't find anything related to indents. My assumption is that, there is a property in range object like this- "$Range.LeftIndent = 3.5" and "$Range.RightIndent = 5.5"  I need help. I am struggling.

[kcvinu]

Um, got a hint. "Range.ParagraphFormat.Tabstops" Let me check it.

Edit. I have got ParagraphFormat.TabIndent() for left indent. But what is for right indent ?

Edit2 - How can i use "InchesToPoints" in AutoIt ?

Edited October 29, 2015 by kcvinu

[water]

I'm not sure but I think it's a method of the application or document object. 

[kcvinu]

@water , Now, left side indent is ok. I need to find out how to set the right side indent .  

[PACaleala]

News flash: there is no right indent !

Most likely you are thinking in terms of left and right margins (page setup).

Re-read second half of post #3.

[kcvinu]

Atlast i got it. 

$wRange.ParagraphFormat.RightIndent = 230

So simple

Edit. Only drawback of this method is that, it uses point instead of inches. 

Edited October 30, 2015 by kcvinu

[water]

You might want to use the methods of the Word application object or the following functions to translate from/to points:

Func CentimetersToPoints($iValue)
    Return ($iValue * 28.35)
EndFunc   ;==>CentimetersToPoints

Func InchesToPoints($iValue)
    Return ($iValue * 72)
EndFunc   ;==>InchesToPoints

Func LinesToPoints($iValue)
    Return ($iValue * 12)
EndFunc   ;==>LinesToPoints

Func PicasToPoints($iValue)
    Return ($iValue * 12)
EndFunc   ;==>PicasToPoints

Func PointsToCentimeters($iValue)
    Return ($iValue / 28.35)
EndFunc   ;==>CentimetersToPoints

Func PointsToInches($iValue)
    Return ($iValue / 72)
EndFunc   ;==>InchesToPoints

Func PointsToLines($iValue)
    Return ($iValue / 12)
EndFunc   ;==>LinesToPoints

Func PointsToPicas($iValue)
    Return ($iValue / 12)
EndFunc   ;==>PicasToPoints

 

Edited October 31, 2015 by water

[kcvinu]

@water , Wow !. Great. I don't know how to say thanks for this. Anyway Thank you.

[water]

Glad to be of service