View Single Post
 
Old 07-04-2016, 11:36 PM
DougMVP DougMVP is offline Windows 7 32bit Office 2010 32bit
Advanced Beginner
 
Join Date: Nov 2013
Posts: 50
DougMVP will become famous soon enough
Default

Use an adaptation of the following

Dim i As Long
With Selection.Range.ContentControls(1)
For i = 2 To .DropdownListEntries.count
MsgBox .DropdownListEntries(i)
Next i
End With

DropdownListEntries(1) will return the place holder text, hence use For i = 2 to
Reply With Quote