search

navferty / NavfertyExcelAddIn

Common tools for MS Excel
MIT License
47 stars 6 forks source link

Add Application_SwitchReferenceStyle #74

Closed uom42 closed 3 years ago

uom42 commented 4 years ago

Для быстрого изменения стиля нумерации столбцов 1-2-3 / A-B-C и обратно

Public Sub Application_SwitchReferenceStyle()
If (ActiveWindow.Application.ReferenceStyle = xlA1) Then

    ActiveWindow.Application.ReferenceStyle = xlR1C1
Else
    ActiveWindow.Application.ReferenceStyle = xlA1
End If

End Sub