Исходя из моего опыта работы с Excel 2013, я считаю, что эта функция недоступна через VBA. Тем не менее, вы можете достичь этого AutoHotKey макрос, с которым я связан Ctrl + сдвиг + С как часть примера:
;--------------------------------- header with some global settings
SendMode Input
SetTitleMatchMode, RegEx
;--------------------------------- Hotkeys/Excel only
#IfWinActive - Excel$ ; only in windows contatining "- Excel" in title
^+c::Send !od{Down 2}{Enter}+{Tab 3}
#IfWinActive
Это в основном посылает серию нажатий клавиш для достижения ожидаемого эффекта. Если у вас что-то не работает (например, если у вас есть версия Excel, отличная от английской, Alt + О , D не открывается Условное форматирование Повторите приведенную выше последовательность клавиш вручную, и вы легко сможете найти, что нужно исправить. Если вы не знакомы с AHK, последовательность: Alt + О , D , ↓ , ↓ , Войти , 3 × ( сдвиг + табуляция )
AutoHotKey - ваш друг во многих ситуациях, когда авторы приложений что-то не реализовали.
Редактировать:
Я изменил сочетание клавиш на неиспользуемое.
Я тоже пропустил функциональность, так что спасибо, что побудили меня решить эту проблему. Кроме того, более удобно иметь диалоговое окно с одним сочетанием клавиш вместо последовательного по умолчанию.