import an excel list into a word drop-down form

[Guest]

I would like to convert a column in excel into a drop-down list in a word
form. The column is over 400 rows long. How do I do this?

 

[Suzanne S. Barnhill]

Dropdown lists can contain only 25 entries, which in your case is probably a
good thing. Do you really expect users to scroll through a dropdown list of
400 items?

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA

Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

 

[Guest]

Thanks,
How do I import a 25-item list? All I know how to do is enter each entry
individually.

 

[Suzanne S. Barnhill]

I don't know of any other way, either, but if you post in one of the
programming NGs, someone may be able to tell you how to populate a list
using VBA.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA

Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

 

[Tony Jollans]

Here is some basic code which will do it:

Set xlApp = CreateObject("Excel.Application")
xlApp.Workbooks.Open "C:/Path To/Workbook.xls"
With Selection.FormFields("Dropdown1").DropDown.ListEntries
.Clear
For i = 1 To 25 ' Rows wanted
.Add Name:=xlApp.activesheet.Cells(i, "A") ' in column "A"
Next
End With
xlApp.Quit
Set xlApp = Nothing

 

[Guest]

Thank you.
What is the procedure for entering a code?

 

[Tony Jollans]

Wrap the code I posted with this line in front:

Sub FillDropDown()

and this line behind:

End Sub

and see: http://www.gmayor.com/installing_macro.htm