Application.LinesToPoints (Word)

Converts a measurement from lines to points (1 line = 12 points). Returns the converted measurement as a Single.

LinesToPoints (Lines)

Lines: The line value to be converted to points.

With Selection.ParagraphFormat 
 .LineSpacingRule = wdLineSpaceMultiple 
 .LineSpacing = LinesToPoints(3) 
End With