Определить точные свойства, применяемые кнопкой

Question

Допустим, я нажимаю кнопку в Excel, например, форматирование запятых, есть ли способ определить точные стили, которые применяются к выделению?

Я пытаюсь избежать просмотра дерева вручную.

В качестве альтернативы, если я устанавливаю красный цвет шрифта, хотя это очевидно, есть ли способ сделать снимок свойств Excel до, а затем после?

Answer 1

Да, вам просто нужно запустить макрос со свойствами, которые вы хотите просмотреть:

Sub TellMeAboutIt()
    Dim testRange
    Set testRange = Range("A1")

    Debug.Print testRange.Interior.Color
    Debug.Print testRange.Font.Size
    Debug.Print testRange.Font.Bold
    Debug.Print testRange.Font.Italic
    Debug.Print testRange.Row
    Debug.Print testRange.Column
    Debug.Print testRange.Style

End Sub

Просто запустите его до и после того, как вы что-то сделаете. Или прикрепите его к событию. Или что угодно. Посмотрите на Range Object.

Answer 2

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal _
  bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_SNAPSHOT = &H2C
Private Const VK_MENU = &H12

Private Sub AltPrintScreen()
    keybd_event VK_MENU, 0, 0, 0
    keybd_event VK_SNAPSHOT, 0, 0, 0
    keybd_event VK_SNAPSHOT, 0, KEYEVENTF_KEYUP, 0
    keybd_event VK_MENU, 0, KEYEVENTF_KEYUP, 0
End Sub
Sub TakeSnapshot()
    Call AltPrintScreen
    SendKeys "^v"
End Sub

Answer 3

Что ж, меня это удивило, но вы можете начать запись макроса в меню « View -> « Macros -> « Record Macros .

Макрос затем сбрасывается в alt+f11 в модуле. Вот пример.

Sub Macro5()
'
' Macro5 Macro
'

'
    Range("B9").Select
    ActiveCell.FormulaR1C1 = "2"
    Range("B10").Select
End Sub