A
ArcticWolf
Hi,
I have a word doc where I've managed to use the 'VB' where I can add more
than 25 drop down items, I've managed to add around 70 with no probs so all
is good there.
However, when I try and add more items to the list it gives me an error,
"Compile Error: Expected: list separator or )" It won't let me complete my
next entry as it looks as though I've run out of room in the VB window. In
the toolbar at the top it says, "Ln7, Col 1024" and I can't add any more text
to that line. When I press enter (to continue the list on a new row) all my
entries go red and errors again.
How can I continue adding to my list or am I max'd out at Col 1024?
The VB code I'm trying to use is below, and I have another 150+ to add. My
list is basically a listing of all countries so the end user can select the
most appropiate one from a drop down list.
TIA,
AW
Private Sub UserForm_Initialize()
ComboBox1.ColumnCount = 1
'Load data into ComboBox
ComboBox1.List() = Array("Afghan", "Albanian", "Algerian", "American",
"American Samoan", "Andorran", "Angolan", "Anguillan", "Antiguan",
"Argentine", "Armenian", "Aruban", "Australian", "Austrian", "Azerbaijani",
"Bahamian", "Bahraini", "Bangladeshi", "Barbadian", "Barbudan", "Basotho",
"Belarusian", "Belgian", "Belizean", "Beninese", "Bermudian", "Bhutanese",
"Bolivian", "Bosnian", "Brazilian", "British", "British Virgin Islander",
"Bruneian", "Bulgarian", "Burkinabe", "Burmese", "Burundi", "Cambodian",
"Cameroonian", "Canadian", "Cape Verdean", "Caymanian", "Central African",
"Chadian", "Channel Islander", "Chilean", "Chinese", "Christmas Islander",
"Chuukese", "Cocos Islander", "Colombian", "Comoran", "Congolese", "Cook
Islander", "Costa Rican", "Croatian", "Cuban", "Cypriot", "Czech", "Danish",
"Djiboutian", "Dominican", "Dutch", "Dutch Antillean", "Ecuadorian",
"Egyptian", "Emirati", "Equatorial Guinean", "Eritrean", "Estonian",
"Ethiopian", "Falkland Islander", "Faroese", "Fijian", "Finnish")
End Sub
I have a word doc where I've managed to use the 'VB' where I can add more
than 25 drop down items, I've managed to add around 70 with no probs so all
is good there.
However, when I try and add more items to the list it gives me an error,
"Compile Error: Expected: list separator or )" It won't let me complete my
next entry as it looks as though I've run out of room in the VB window. In
the toolbar at the top it says, "Ln7, Col 1024" and I can't add any more text
to that line. When I press enter (to continue the list on a new row) all my
entries go red and errors again.
How can I continue adding to my list or am I max'd out at Col 1024?
The VB code I'm trying to use is below, and I have another 150+ to add. My
list is basically a listing of all countries so the end user can select the
most appropiate one from a drop down list.
TIA,
AW
Private Sub UserForm_Initialize()
ComboBox1.ColumnCount = 1
'Load data into ComboBox
ComboBox1.List() = Array("Afghan", "Albanian", "Algerian", "American",
"American Samoan", "Andorran", "Angolan", "Anguillan", "Antiguan",
"Argentine", "Armenian", "Aruban", "Australian", "Austrian", "Azerbaijani",
"Bahamian", "Bahraini", "Bangladeshi", "Barbadian", "Barbudan", "Basotho",
"Belarusian", "Belgian", "Belizean", "Beninese", "Bermudian", "Bhutanese",
"Bolivian", "Bosnian", "Brazilian", "British", "British Virgin Islander",
"Bruneian", "Bulgarian", "Burkinabe", "Burmese", "Burundi", "Cambodian",
"Cameroonian", "Canadian", "Cape Verdean", "Caymanian", "Central African",
"Chadian", "Channel Islander", "Chilean", "Chinese", "Christmas Islander",
"Chuukese", "Cocos Islander", "Colombian", "Comoran", "Congolese", "Cook
Islander", "Costa Rican", "Croatian", "Cuban", "Cypriot", "Czech", "Danish",
"Djiboutian", "Dominican", "Dutch", "Dutch Antillean", "Ecuadorian",
"Egyptian", "Emirati", "Equatorial Guinean", "Eritrean", "Estonian",
"Ethiopian", "Falkland Islander", "Faroese", "Fijian", "Finnish")
End Sub