INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Jobs

VBA Visual Basic for Applications (Microsoft) FAQ

Office / VBA General

A useful class property for International IS0 country codes by Chance1234
Posted: 29 Sep 07

Correct as of 29/09/2007

To demonstrate,

set up a class called countryexample

Copy paste the following

CODE

Public Property Get COUNTRY_LIST() As Variant
Dim arr_country(243, 1) As Variant

    arr_country(0, 0) = "AF"
    arr_country(0, 1) = "AFGHANISTAN"
    arr_country(1, 0) = "AX"
    arr_country(1, 1) = "+LAND ISLANDS"
    arr_country(2, 0) = "AL"
    arr_country(2, 1) = "ALBANIA"
    arr_country(3, 0) = "DZ"
    arr_country(3, 1) = "ALGERIA"
    arr_country(4, 0) = "AS"
    arr_country(4, 1) = "AMERICAN SAMOA"
    arr_country(5, 0) = "AD"
    arr_country(5, 1) = "ANDORRA"
    arr_country(6, 0) = "AO"
    arr_country(6, 1) = "ANGOLA"
    arr_country(7, 0) = "AI"
    arr_country(7, 1) = "ANGUILLA"
    arr_country(8, 0) = "AQ"
    arr_country(8, 1) = "ANTARCTICA"
    arr_country(9, 0) = "AG"
    arr_country(9, 1) = "ANTIGUA AND BARBUDA"
    arr_country(10, 0) = "AR"
    arr_country(10, 1) = "ARGENTINA"
    arr_country(11, 0) = "AM"
    arr_country(11, 1) = "ARMENIA"
    arr_country(12, 0) = "AW"
    arr_country(12, 1) = "ARUBA"
    arr_country(13, 0) = "AU"
    arr_country(13, 1) = "AUSTRALIA"
    arr_country(14, 0) = "AT"
    arr_country(14, 1) = "AUSTRIA"
    arr_country(15, 0) = "AZ"
    arr_country(15, 1) = "AZERBAIJAN"
    arr_country(16, 0) = "BS"
    arr_country(16, 1) = "BAHAMAS"
    arr_country(17, 0) = "BH"
    arr_country(17, 1) = "BAHRAIN"
    arr_country(18, 0) = "BD"
    arr_country(18, 1) = "BANGLADESH"
    arr_country(19, 0) = "BB"
    arr_country(19, 1) = "BARBADOS"
    arr_country(20, 0) = "BY"
    arr_country(20, 1) = "BELARUS"
    arr_country(21, 0) = "BE"
    arr_country(21, 1) = "BELGIUM"
    arr_country(22, 0) = "BZ"
    arr_country(22, 1) = "BELIZE"
    arr_country(23, 0) = "BJ"
    arr_country(23, 1) = "BENIN"
    arr_country(24, 0) = "BM"
    arr_country(24, 1) = "BERMUDA"
    arr_country(25, 0) = "BT"
    arr_country(25, 1) = "BHUTAN"
    arr_country(26, 0) = "BO"
    arr_country(26, 1) = "BOLIVIA"
    arr_country(27, 0) = "BA"
    arr_country(27, 1) = "BOSNIA AND HERZEGOVINA"
    arr_country(28, 0) = "BW"
    arr_country(28, 1) = "BOTSWANA"
    arr_country(29, 0) = "BV"
    arr_country(29, 1) = "BOUVET ISLAND"
    arr_country(30, 0) = "BR"
    arr_country(30, 1) = "BRAZIL"
    arr_country(31, 0) = "IO"
    arr_country(31, 1) = "BRITISH INDIAN OCEAN TERRITORY"
    arr_country(32, 0) = "BN"
    arr_country(32, 1) = "BRUNEI DARUSSALAM"
    arr_country(33, 0) = "BG"
    arr_country(33, 1) = "BULGARIA"
    arr_country(34, 0) = "BF"
    arr_country(34, 1) = "BURKINA FASO"
    arr_country(35, 0) = "BI"
    arr_country(35, 1) = "BURUNDI"
    arr_country(36, 0) = "KH"
    arr_country(36, 1) = "CAMBODIA"
    arr_country(37, 0) = "CM"
    arr_country(37, 1) = "CAMEROON"
    arr_country(38, 0) = "CA"
    arr_country(38, 1) = "CANADA"
    arr_country(39, 0) = "CV"
    arr_country(39, 1) = "CAPE VERDE"
    arr_country(40, 0) = "KY"
    arr_country(40, 1) = "CAYMAN ISLANDS"
    arr_country(41, 0) = "CF"
    arr_country(41, 1) = "CENTRAL AFRICAN REPUBLIC"
    arr_country(42, 0) = "TD"
    arr_country(42, 1) = "CHAD"
    arr_country(43, 0) = "CL"
    arr_country(43, 1) = "CHILE"
    arr_country(44, 0) = "CN"
    arr_country(44, 1) = "CHINA"
    arr_country(45, 0) = "CX"
    arr_country(45, 1) = "CHRISTMAS ISLAND"
    arr_country(46, 0) = "CC"
    arr_country(46, 1) = "COCOS (KEELING) ISLANDS"
    arr_country(47, 0) = "CO"
    arr_country(47, 1) = "COLOMBIA"
    arr_country(48, 0) = "KM"
    arr_country(48, 1) = "COMOROS"
    arr_country(49, 0) = "CG"
    arr_country(49, 1) = "CONGO"
    arr_country(50, 0) = "CD"
    arr_country(50, 1) = "CONGO, THE DEMOCRATIC REPUBLIC OF THE"
    arr_country(51, 0) = "CK"
    arr_country(51, 1) = "COOK ISLANDS"
    arr_country(52, 0) = "CR"
    arr_country(52, 1) = "COSTA RICA"
    arr_country(53, 0) = "CI"
    arr_country(53, 1) = "COTE D'IVOIRE"
    arr_country(54, 0) = "HR"
    arr_country(54, 1) = "CROATIA"
    arr_country(55, 0) = "CU"
    arr_country(55, 1) = "CUBA"
    arr_country(56, 0) = "CY"
    arr_country(56, 1) = "CYPRUS"
    arr_country(57, 0) = "CZ"
    arr_country(57, 1) = "CZECH REPUBLIC"
    arr_country(58, 0) = "DK"
    arr_country(58, 1) = "DENMARK"
    arr_country(59, 0) = "DJ"
    arr_country(59, 1) = "DJIBOUTI"
    arr_country(60, 0) = "DM"
    arr_country(60, 1) = "DOMINICA"
    arr_country(61, 0) = "DO"
    arr_country(61, 1) = "DOMINICAN REPUBLIC"
    arr_country(62, 0) = "EC"
    arr_country(62, 1) = "ECUADOR"
    arr_country(63, 0) = "EG"
    arr_country(63, 1) = "EGYPT"
    arr_country(64, 0) = "SV"
    arr_country(64, 1) = "EL SALVADOR"
    arr_country(65, 0) = "GQ"
    arr_country(65, 1) = "EQUATORIAL GUINEA"
    arr_country(66, 0) = "ER"
    arr_country(66, 1) = "ERITREA"
    arr_country(67, 0) = "EE"
    arr_country(67, 1) = "ESTONIA"
    arr_country(68, 0) = "ET"
    arr_country(68, 1) = "ETHIOPIA"
    arr_country(69, 0) = "FK"
    arr_country(69, 1) = "FALKLAND ISLANDS (MALVINAS)"
    arr_country(70, 0) = "FO"
    arr_country(70, 1) = "FAROE ISLANDS"
    arr_country(71, 0) = "FJ"
    arr_country(71, 1) = "FIJI"
    arr_country(72, 0) = "FI"
    arr_country(72, 1) = "FINLAND"
    arr_country(73, 0) = "FR"
    arr_country(73, 1) = "FRANCE"
    arr_country(74, 0) = "GF"
    arr_country(74, 1) = "FRENCH GUIANA"
    arr_country(75, 0) = "PF"
    arr_country(75, 1) = "FRENCH POLYNESIA"
    arr_country(76, 0) = "TF"
    arr_country(76, 1) = "FRENCH SOUTHERN TERRITORIES"
    arr_country(77, 0) = "GA"
    arr_country(77, 1) = "GABON"
    arr_country(78, 0) = "GM"
    arr_country(78, 1) = "GAMBIA"
    arr_country(79, 0) = "GE"
    arr_country(79, 1) = "GEORGIA"
    arr_country(80, 0) = "DE"
    arr_country(80, 1) = "GERMANY"
    arr_country(81, 0) = "GH"
    arr_country(81, 1) = "GHANA"
    arr_country(82, 0) = "GI"
    arr_country(82, 1) = "GIBRALTAR"
    arr_country(83, 0) = "GR"
    arr_country(83, 1) = "GREECE"
    arr_country(84, 0) = "GL"
    arr_country(84, 1) = "GREENLAND"
    arr_country(85, 0) = "GD"
    arr_country(85, 1) = "GRENADA"
    arr_country(86, 0) = "GP"
    arr_country(86, 1) = "GUADELOUPE"
    arr_country(87, 0) = "GU"
    arr_country(87, 1) = "GUAM"
    arr_country(88, 0) = "GT"
    arr_country(88, 1) = "GUATEMALA"
    arr_country(89, 0) = "GG"
    arr_country(89, 1) = "GUERNSEY"
    arr_country(90, 0) = "GN"
    arr_country(90, 1) = "GUINEA"
    arr_country(91, 0) = "GW"
    arr_country(91, 1) = "GUINEA-BISSAU"
    arr_country(92, 0) = "GY"
    arr_country(92, 1) = "GUYANA"
    arr_country(93, 0) = "HT"
    arr_country(93, 1) = "HAITI"
    arr_country(94, 0) = "HM"
    arr_country(94, 1) = "HEARD ISLAND AND MCDONALD ISLANDS"
    arr_country(95, 0) = "VA"
    arr_country(95, 1) = "HOLY SEE (VATICAN CITY STATE)"
    arr_country(96, 0) = "HN"
    arr_country(96, 1) = "HONDURAS"
    arr_country(97, 0) = "HK"
    arr_country(97, 1) = "HONG KONG"
    arr_country(98, 0) = "HU"
    arr_country(98, 1) = "HUNGARY"
    arr_country(99, 0) = "IS"
    arr_country(99, 1) = "ICELAND"
    arr_country(100, 0) = "IN"
    arr_country(100, 1) = "INDIA"
    arr_country(101, 0) = "ID"
    arr_country(101, 1) = "INDONESIA"
    arr_country(102, 0) = "IR"
    arr_country(102, 1) = "IRAN, ISLAMIC REPUBLIC OF"
    arr_country(103, 0) = "IQ"
    arr_country(103, 1) = "IRAQ"
    arr_country(104, 0) = "IE"
    arr_country(104, 1) = "IRELAND"
    arr_country(105, 0) = "IM"
    arr_country(105, 1) = "ISLE OF MAN"
    arr_country(106, 0) = "IL"
    arr_country(106, 1) = "ISRAEL"
    arr_country(107, 0) = "IT"
    arr_country(107, 1) = "ITALY"
    arr_country(108, 0) = "JM"
    arr_country(108, 1) = "JAMAICA"
    arr_country(109, 0) = "JP"
    arr_country(109, 1) = "JAPAN"
    arr_country(110, 0) = "JE"
    arr_country(110, 1) = "JERSEY"
    arr_country(111, 0) = "JO"
    arr_country(111, 1) = "JORDAN"
    arr_country(112, 0) = "KZ"
    arr_country(112, 1) = "KAZAKHSTAN"
    arr_country(113, 0) = "KE"
    arr_country(113, 1) = "KENYA"
    arr_country(114, 0) = "KI"
    arr_country(114, 1) = "KIRIBATI"
    arr_country(115, 0) = "KP"
    arr_country(115, 1) = "KOREA, DEMOCRATIC PEOPLE'S REPUBLIC OF"
    arr_country(116, 0) = "KR"
    arr_country(116, 1) = "KOREA, REPUBLIC OF"
    arr_country(117, 0) = "KW"
    arr_country(117, 1) = "KUWAIT"
    arr_country(118, 0) = "KG"
    arr_country(118, 1) = "KYRGYZSTAN"
    arr_country(119, 0) = "LA"
    arr_country(119, 1) = "LAO PEOPLE'S DEMOCRATIC REPUBLIC"
    arr_country(120, 0) = "LV"
    arr_country(120, 1) = "LATVIA"
    arr_country(121, 0) = "LB"
    arr_country(121, 1) = "LEBANON"
    arr_country(122, 0) = "LS"
    arr_country(122, 1) = "LESOTHO"
    arr_country(123, 0) = "LR"
    arr_country(123, 1) = "LIBERIA"
    arr_country(124, 0) = "LY"
    arr_country(124, 1) = "LIBYAN ARAB JAMAHIRIYA"
    arr_country(125, 0) = "LI"
    arr_country(125, 1) = "LIECHTENSTEIN"
    arr_country(126, 0) = "LT"
    arr_country(126, 1) = "LITHUANIA"
    arr_country(127, 0) = "LU"
    arr_country(127, 1) = "LUXEMBOURG"
    arr_country(128, 0) = "MO"
    arr_country(128, 1) = "MACAO"
    arr_country(129, 0) = "MK"
    arr_country(129, 1) = "MACEDONIA, THE FORMER YUGOSLAV REPUBLIC OF"
    arr_country(130, 0) = "MG"
    arr_country(130, 1) = "MADAGASCAR"
    arr_country(131, 0) = "MW"
    arr_country(131, 1) = "MALAWI"
    arr_country(132, 0) = "MY"
    arr_country(132, 1) = "MALAYSIA"
    arr_country(133, 0) = "MV"
    arr_country(133, 1) = "MALDIVES"
    arr_country(134, 0) = "ML"
    arr_country(134, 1) = "MALI"
    arr_country(135, 0) = "MT"
    arr_country(135, 1) = "MALTA"
    arr_country(136, 0) = "MH"
    arr_country(136, 1) = "MARSHALL ISLANDS"
    arr_country(137, 0) = "MQ"
    arr_country(137, 1) = "MARTINIQUE"
    arr_country(138, 0) = "MR"
    arr_country(138, 1) = "MAURITANIA"
    arr_country(139, 0) = "MU"
    arr_country(139, 1) = "MAURITIUS"
    arr_country(140, 0) = "YT"
    arr_country(140, 1) = "MAYOTTE"
    arr_country(141, 0) = "MX"
    arr_country(141, 1) = "MEXICO"
    arr_country(142, 0) = "FM"
    arr_country(142, 1) = "MICRONESIA, FEDERATED STATES OF"
    arr_country(143, 0) = "MD"
    arr_country(143, 1) = "MOLDOVA, REPUBLIC OF"
    arr_country(144, 0) = "MC"
    arr_country(144, 1) = "MONACO"
    arr_country(145, 0) = "MN"
    arr_country(145, 1) = "MONGOLIA"
    arr_country(146, 0) = "ME"
    arr_country(146, 1) = "MONTENEGRO"
    arr_country(147, 0) = "MS"
    arr_country(147, 1) = "MONTSERRAT"
    arr_country(148, 0) = "MA"
    arr_country(148, 1) = "MOROCCO"
    arr_country(149, 0) = "MZ"
    arr_country(149, 1) = "MOZAMBIQUE"
    arr_country(150, 0) = "MM"
    arr_country(150, 1) = "MYANMAR"
    arr_country(151, 0) = "NA"
    arr_country(151, 1) = "NAMIBIA"
    arr_country(152, 0) = "NR"
    arr_country(152, 1) = "NAURU"
    arr_country(153, 0) = "NP"
    arr_country(153, 1) = "NEPAL"
    arr_country(154, 0) = "NL"
    arr_country(154, 1) = "NETHERLANDS"
    arr_country(155, 0) = "AN"
    arr_country(155, 1) = "NETHERLANDS ANTILLES"
    arr_country(156, 0) = "NC"
    arr_country(156, 1) = "NEW CALEDONIA"
    arr_country(157, 0) = "NZ"
    arr_country(157, 1) = "NEW ZEALAND"
    arr_country(158, 0) = "NI"
    arr_country(158, 1) = "NICARAGUA"
    arr_country(159, 0) = "NE"
    arr_country(159, 1) = "NIGER"
    arr_country(160, 0) = "NG"
    arr_country(160, 1) = "NIGERIA"
    arr_country(161, 0) = "NU"
    arr_country(161, 1) = "NIUE"
    arr_country(162, 0) = "NF"
    arr_country(162, 1) = "NORFOLK ISLAND"
    arr_country(163, 0) = "MP"
    arr_country(163, 1) = "NORTHERN MARIANA ISLANDS"
    arr_country(164, 0) = "NO"
    arr_country(164, 1) = "NORWAY"
    arr_country(165, 0) = "OM"
    arr_country(165, 1) = "OMAN"
    arr_country(166, 0) = "PK"
    arr_country(166, 1) = "PAKISTAN"
    arr_country(167, 0) = "PW"
    arr_country(167, 1) = "PALAU"
    arr_country(168, 0) = "PS"
    arr_country(168, 1) = "PALESTINIAN TERRITORY, OCCUPIED"
    arr_country(169, 0) = "PA"
    arr_country(169, 1) = "PANAMA"
    arr_country(170, 0) = "PG"
    arr_country(170, 1) = "PAPUA NEW GUINEA"
    arr_country(171, 0) = "PY"
    arr_country(171, 1) = "PARAGUAY"
    arr_country(172, 0) = "PE"
    arr_country(172, 1) = "PERU"
    arr_country(173, 0) = "PH"
    arr_country(173, 1) = "PHILIPPINES"
    arr_country(174, 0) = "PN"
    arr_country(174, 1) = "PITCAIRN"
    arr_country(175, 0) = "PL"
    arr_country(175, 1) = "POLAND"
    arr_country(176, 0) = "PT"
    arr_country(176, 1) = "PORTUGAL"
    arr_country(177, 0) = "PR"
    arr_country(177, 1) = "PUERTO RICO"
    arr_country(178, 0) = "QA"
    arr_country(178, 1) = "QATAR"
    arr_country(179, 0) = "RE"
    arr_country(179, 1) = "REUNION"
    arr_country(180, 0) = "RO"
    arr_country(180, 1) = "ROMANIA"
    arr_country(181, 0) = "RU"
    arr_country(181, 1) = "RUSSIAN FEDERATION"
    arr_country(182, 0) = "RW"
    arr_country(182, 1) = "RWANDA"
    arr_country(183, 0) = "SH"
    arr_country(183, 1) = "SAINT HELENA"
    arr_country(184, 0) = "KN"
    arr_country(184, 1) = "SAINT KITTS AND NEVIS"
    arr_country(185, 0) = "LC"
    arr_country(185, 1) = "SAINT LUCIA"
    arr_country(186, 0) = "PM"
    arr_country(186, 1) = "SAINT PIERRE AND MIQUELON"
    arr_country(187, 0) = "VC"
    arr_country(187, 1) = "SAINT VINCENT AND THE GRENADINES"
    arr_country(188, 0) = "WS"
    arr_country(188, 1) = "SAMOA"
    arr_country(189, 0) = "SM"
    arr_country(189, 1) = "SAN MARINO"
    arr_country(190, 0) = "ST"
    arr_country(190, 1) = "SAO TOME AND PRINCIPE"
    arr_country(191, 0) = "SA"
    arr_country(191, 1) = "SAUDI ARABIA"
    arr_country(192, 0) = "SN"
    arr_country(192, 1) = "SENEGAL"
    arr_country(193, 0) = "RS"
    arr_country(193, 1) = "SERBIA"
    arr_country(194, 0) = "SC"
    arr_country(194, 1) = "SEYCHELLES"
    arr_country(195, 0) = "SL"
    arr_country(195, 1) = "SIERRA LEONE"
    arr_country(196, 0) = "SG"
    arr_country(196, 1) = "SINGAPORE"
    arr_country(197, 0) = "SK"
    arr_country(197, 1) = "SLOVAKIA"
    arr_country(198, 0) = "SI"
    arr_country(198, 1) = "SLOVENIA"
    arr_country(199, 0) = "SB"
    arr_country(199, 1) = "SOLOMON ISLANDS"
    arr_country(200, 0) = "SO"
    arr_country(200, 1) = "SOMALIA"
    arr_country(201, 0) = "ZA"
    arr_country(201, 1) = "SOUTH AFRICA"
    arr_country(202, 0) = "GS"
    arr_country(202, 1) = "SOUTH GEORGIA AND THE SOUTH SANDWICH ISLANDS"
    arr_country(203, 0) = "ES"
    arr_country(203, 1) = "SPAIN"
    arr_country(204, 0) = "LK"
    arr_country(204, 1) = "SRI LANKA"
    arr_country(205, 0) = "SD"
    arr_country(205, 1) = "SUDAN"
    arr_country(206, 0) = "SR"
    arr_country(206, 1) = "SURINAME"
    arr_country(207, 0) = "SJ"
    arr_country(207, 1) = "SVALBARD AND JAN MAYEN"
    arr_country(208, 0) = "SZ"
    arr_country(208, 1) = "SWAZILAND"
    arr_country(209, 0) = "SE"
    arr_country(209, 1) = "SWEDEN"
    arr_country(210, 0) = "CH"
    arr_country(210, 1) = "SWITZERLAND"
    arr_country(211, 0) = "SY"
    arr_country(211, 1) = "SYRIAN ARAB REPUBLIC"
    arr_country(212, 0) = "TW"
    arr_country(212, 1) = "TAIWAN, PROVINCE OF CHINA"
    arr_country(213, 0) = "TJ"
    arr_country(213, 1) = "TAJIKISTAN"
    arr_country(214, 0) = "TZ"
    arr_country(214, 1) = "TANZANIA, UNITED REPUBLIC OF"
    arr_country(215, 0) = "TH"
    arr_country(215, 1) = "THAILAND"
    arr_country(216, 0) = "TL"
    arr_country(216, 1) = "TIMOR-LESTE"
    arr_country(217, 0) = "TG"
    arr_country(217, 1) = "TOGO"
    arr_country(218, 0) = "TK"
    arr_country(218, 1) = "TOKELAU"
    arr_country(219, 0) = "TO"
    arr_country(219, 1) = "TONGA"
    arr_country(220, 0) = "TT"
    arr_country(220, 1) = "TRINIDAD AND TOBAGO"
    arr_country(221, 0) = "TN"
    arr_country(221, 1) = "TUNISIA"
    arr_country(222, 0) = "TR"
    arr_country(222, 1) = "TURKEY"
    arr_country(223, 0) = "TM"
    arr_country(223, 1) = "TURKMENISTAN"
    arr_country(224, 0) = "TC"
    arr_country(224, 1) = "TURKS AND CAICOS ISLANDS"
    arr_country(225, 0) = "TV"
    arr_country(225, 1) = "TUVALU"
    arr_country(226, 0) = "UG"
    arr_country(226, 1) = "UGANDA"
    arr_country(227, 0) = "UA"
    arr_country(227, 1) = "UKRAINE"
    arr_country(228, 0) = "AE"
    arr_country(228, 1) = "UNITED ARAB EMIRATES"
    arr_country(229, 0) = "GB"
    arr_country(229, 1) = "UNITED KINGDOM"
    arr_country(230, 0) = "US"
    arr_country(230, 1) = "UNITED STATES"
    arr_country(231, 0) = "UM"
    arr_country(231, 1) = "UNITED STATES MINOR OUTLYING ISLANDS"
    arr_country(232, 0) = "UY"
    arr_country(232, 1) = "URUGUAY"
    arr_country(233, 0) = "UZ"
    arr_country(233, 1) = "UZBEKISTAN"
    arr_country(234, 0) = "VU"
    arr_country(234, 1) = "VANUATU"
    arr_country(235, 0) = "VE"
    arr_country(235, 1) = "VENEZUELA"
    arr_country(236, 0) = "VN"
    arr_country(236, 1) = "VIET NAM"
    arr_country(237, 0) = "VG"
    arr_country(237, 1) = "VIRGIN ISLANDS, BRITISH"
    arr_country(238, 0) = "VI"
    arr_country(238, 1) = "VIRGIN ISLANDS, U.S."
    arr_country(239, 0) = "WF"
    arr_country(239, 1) = "WALLIS AND FUTUNA"
    arr_country(240, 0) = "EH"
    arr_country(240, 1) = "WESTERN SAHARA"
    arr_country(241, 0) = "YE"
    arr_country(241, 1) = "YEMEN"
    arr_country(242, 0) = "ZM"
    arr_country(242, 1) = "ZAMBIA"
    arr_country(243, 0) = "ZW"
    arr_country(243, 1) = "ZIMBABWE"


COUNTRY_LIST = arr_country
Erase arr_country


End Property

Create a user form with a cbo box named cbo_box1 with two columns and then add the following code to the form
activate event

CODE

Dim countrytest as NEW countryexample

cbo_box1.list = countrytest.COUNTRY_LIST

[/code]

Back to VBA Visual Basic for Applications (Microsoft) FAQ Index
Back to VBA Visual Basic for Applications (Microsoft) Forum

My Archive

Resources

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close