Drop Down List Widths

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Ed - 16 Nov 2007 15:35 GMT

Word 2003 allows me to control the width of a dropdown list. For example:

Set newlist = CommandBars(listnameis).Controls.Add(Type:=msoControlDropdown)
newlist.Width = 175

This command does not appear to function when the macro is run in Word2007.
Is there a command in Word2007 that approximates the dropdown list width
controls of Word2003?

Ed in Virginia

Reply to this Message

Doug Robbins - Word MVP - 17 Nov 2007 20:24 GMT

Dim i As Long
Set myOB = ActiveDocument.Shapes _
.AddOLEControl(ClassType:="Forms.ComboBox.1")
With myOB.OLEFormat
.Activate
Set myObj = .Object
End With
With myObj
For i = 1 To 3
.AddItem "Item" & i
Next i
.Width = 175
End With

Signature

Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

> Word 2003 allows me to control the width of a dropdown list. For example:
>
[quoted text clipped - 7 lines]
>
> Ed in Virginia

Reply to this Message

Ed - 22 Nov 2007 11:19 GMT

Doug (or others),

The list I was referring to is a drop down list in the command bar area
of the Word 2007 screen. Yours works great for adding a DDL in a document,
but I need the more 'permanent' type of list that is independant of the
active document. Any thoughts? Thanks.

Roy

> Dim i As Long
> Set myOB = ActiveDocument.Shapes _
[quoted text clipped - 21 lines]
>>
>> Ed in Virginia

Reply to this Message

Doug Robbins - Word MVP - 22 Nov 2007 19:20 GMT

The whole user interface has changed in Word 2007 and the ability of the
user to modify it is drastically limited.

Signature

Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

> Doug (or others),
>
[quoted text clipped - 31 lines]
>>>
>>> Ed in Virginia

Reply to this Message

Rate this thread: