Hello, I wont to change ruler units from inches to millimeters and use this code:
Sub UnitChange()Application.Unit = cdrMillimeterApplication.RefreshEnd Sub
Sub UnitChange1()ActiveDocument.Unit = cdrMillimeterApplication.RefreshEnd Sub
But this code not work. No error returned, but unit not changed.Any suggestion will be accepted gratefully.
Greetings!
Hello,Correct answer is:
Sub UnitChangeMm()Application.ActiveDocument.Rulers.HUnits = cdrMillimeterApplication.ActiveDocument.Rulers.VUnits = cdrMillimeterApplication.RefreshEnd Sub