Application.PicasToPoints (Word)
Convertit en picas une mesure en points (1 pica = 12 points).
PicasToPoints (Picas)
Picas: Valeur en picas à convertir en points.
With ActiveDocument.PageSetup.LineNumbering
.Active = True
.DistanceFromText = PicasToPoints(4)
End With