EDIT:

Found a better way...

It seems the width can be manipulated by changing the width an entry, so I modified the first entry to act as a placeholder.

[VBA]activedocument.SelectContentControlsByTag("panel").Item(1).DropdownListEntr ies.Item(1).Text = "Pick a Panel >"[/VBA]