ralat & koreksi
jawaban no. 2 a; seharusnya sbb:
Dengan cara mencari melalui looping
dim i as long
with combobox1
.listindex = -1
for i = 0 to .ListCount -1
if .ListIndex(i) = TextBox1 then
.ListIndex = i
exit for
end if
next i
if .listindex = -1 then _
msgbox "tidak ada item spt di texbox1", 48
end with
----- Original Message -----
From: siti Vi
To: [email protected]
Sent: Saturday, February 27, 2010 8:55 AM
Subject: Re: [belajar-excel] Combo box
2
Caran agar combobox dapat menampilkan item sesuai dgn text pada suatu textbox.
Asumsinya: ComboBox sudah mempunyai item-list.
(a)
Dengan cara mencari melalui looping
dim i as long
with combobox1
.listindex = -1
for i = 0 to .ListCount -1
if .ListIndex(i) = "TextBox1" then
.ListIndex = i
exit for
end if
next i
if .listindex = -1 then _
msgbox "tidak ada item spt di texbox1",48
end with
