[Iska]

(например по левому краю, чтобы был отступ 3) »

«3» — чего? Отступ в VBA в пунктах задаётся. Не маловато 3 пункта будет?

If ActiveDocument.PageSetup.LeftMargin = f Then »

Вы пытаетесь сравнивать значение типа «single» с объектной переменной типа «PageSetup». К тому же — неинициализированной.

Я вообще не пойму смысла в:

в переменную хочу »

когда достаточно простого:

Код:

Private Sub CommandButton1_Click()
    If ActiveDocument.PageSetup.LeftMargin = 3 Then
        MsgBox "Верные поля"
    Else
        MsgBox "Неверные поля"
    End If
End Sub