Open DropDownList Automatically

highrise955 · #1 04-02-2016, 04:39 AM

Anyone know how to open a dropdownlist automatically upon receiving focus? I tried using the following code options I found in a Google search...

Code:

Private Sub MethodInspect_GotFocus()
    MethodInspect.Dropdown
End Sub

Private Sub MethodInspect_GotFocus()
    Me.MethodInspect.Dropdown
End Sub

Private Sub MethodInspect_GotFocus()
    SendKeys "%{Down}"
End Sub

...but nothing happens. ("MethodInspect" is the Title of the dropdownlist)

Any help would be appreciated.

gmayor · #2 04-02-2016, 05:01 AM

What sort of dropdown list?

highrise955 · #3 04-02-2016, 05:04 AM

Quote:

Originally Posted by gmayor

What sort of dropdown list?

Hi Graham!

It's a Combo box content control in Word 2013.

gmaxey · #4 04-02-2016, 05:51 AM

hr955

SendKeys will display it briefly using the OnEnter event, but there doesn't seem to be (or I can't) a find a way to make it stick:

Code:

Private Sub Document_ContentControlOnEnter(ByVal oCC As ContentControl)
  If oCC.Type = wdContentControlDropdownList Then SendKeys "%{DOWN}"
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Can a Folder be set to automatically open all the Files within it?	Roughdiamond	Windows	1	03-12-2016 12:50 AM
Dropdownlist-Parsing values to various ContentControls	highrise955	Word VBA	9	03-08-2016 02:03 AM
Attachments do not open automatically in Outlook 2016	417144	Outlook	0	01-10-2016 12:32 PM
VBA ppt ComboBox behaivor: 1.OnFocus change value 2. get dropdownlist doesn't disappear after mousec	janism22	PowerPoint	2	03-26-2015 12:35 AM
Sending open mails automatically	Fackouch	Outlook	0	05-03-2012 10:47 AM