Macro to change paragraph linespacing to 1.3 in outlook 2010

Catty · #1 02-14-2014, 07:03 AM

Hi,

I'm trying to create a macro in outlook that will change the paragraph line spacing (and font name and size of text if possible). Below is the code I've been playing around with, but it's not working 100% and/or it fails @ this line of code "Paragraph.LineSpacing = LinesToPoints(1.3)".

Don't know what I'm doing wrong. Any help would be much appreciated.

Code:

Sub LineSpacing()


    Dim objOL As Outlook.Application
    Dim sel As Object

    Set objOL = Outlook.Application
    Set sel = objOL.ActiveInspector().WordEditor.Application.Selection

    For Each Paragraph In sel.Paragraphs
        Paragraph.LineSpacingRule = wdLineSpaceMultiple
        Paragraph.LineSpacing = LinesToPoints(1.3)
        
    Next

End Sub

Dexter_morgan 158 · #2 02-14-2014, 10:49 PM

Hi Catty ,
Well i surfed the net for the solution to your problem , then tried the following code and it worked. I hope it works for you as well.

Sub LineSpacing()
With Selection.ParagraphFormat
.LineSpacingRule = wdLineSpaceExactly
.LineSpacing = 1.3 * Selection.Characters(1).Font.Size
End With
End Sub

Please revert back if it works.
Thanks
~Dex

Catty · #3 02-27-2014, 01:14 AM

Hi Dexter,

Thanks for your response. I have tried the macro and unfortunately its not working for me, instead I get a "Run-time error '429'. ActiveX component can't create object.

I researched how the above error could be resolved but alas, everything I've tried so far hasn't worked.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Need help on Outlook 2010 Macro	rainpuppy	Outlook	4	02-04-2013 12:44 AM
Word 2010 will not let me change alignment on specific paragraph	garrisonsdad	Word	6	12-19-2012 09:23 PM
Macro help outlook 2010	seanchad	Outlook	0	06-28-2012 02:49 AM
Don't indent the fist line of the first paragraph after a style change	Inspirement	Word	1	04-08-2012 05:30 AM
Outlook 2010 - Change default data file.	siouxnami	Outlook	4	01-26-2012 12:24 PM