VBA Excel установить фокус на раскрывающемся списке

Question

Я пытаюсь установить фокус в Excel через код VBA в раскрывающемся списке.Я пробовал разные вещи, которые приносят нежелательные результаты.Элемент ниже - единственный, который я должен сосредоточить на раскрывающемся списке, но он выбирает раскрывающийся список, как если бы он был выбран в разделе разработчика (с точками изменения размера), тогда как я просто хочу, чтобы он указывал на ячейку, если это возможно,Я не хочу, чтобы пользователь мог изменить размер выпадающего меню или чего-то другого, и он заблокирован, так что это странно, что он это сделает.

ActiveSheet.Shapes("DropDown1").Select

Answer 1

Попробуйте это

Sub TestFocus()
    Dim ws As Worksheet
    Dim dd As DropDown

    Set ws = ActiveSheet
    Set dd = ws.Shapes("DropDown1").OLEFormat.Object

    dd.TopLeftCell.Select
End Sub