Hai Tio,
Langkah 1 :
> Properti bernama '(Name)' dari setiap textbox yang akan di-loop diberi
nama dengan prefix tertentu, seperti txtXX01, txtXX02, dst
> Jadi, ada identifier setiap textbox control di 5 karakter pertama
properti '(Name)' berbunyi sesuatu yang khas menurut kelompoknya.
Langkah 2 :
> pada event Click milik sebuah commandbutton control diisi dengan proses
loop terhadap seluruh controls, seperti ini :
dim oCtl as object
for each octl in me.controls
if typename(lcase(octl.name))="textbox" then
if left(lcase(octl.name),5)="txtxx" then
octl.visible=false
endif
endif
next octl
Regards,
Kid
2017-03-26 15:56 GMT+07:00 Tio Ali [email protected] [belajar-excel] <
[email protected]>:
>
>
> Salam Be Exceller
>
> Misal di userform ada beberapa textbox dan label yang tag nya dikasih
> nilai "xx" dan beberapa textbox dan beberapa label tidak dikasih nilai tag.
>
> Bagaimana sintax dari code for each next untuk membuat visible false
> ketika tombol di klik pada beberapa textbox dan label yg tagnya bernilai
> "xx'"?
>
> Terima kasih atas bantuannya.
>
> Salam
> Tio
>
>
>