Dosyanızda combobx ekledim tetbox5 i gizlemeniz gerekmekte.
Comboya girilen veri textbox5 e aktarıyor.
Sadece combobox eklenseydi kod karışık olduğu için bir sürü yer depşlmesi gerekecekti.
Alttaki kodda array içine, koyarak devam edebilirsiniz yada bir sayfa ekleyip oraya kategori adlarını girip comboyada alabilirsiniz.
Private Sub UserForm_Initialize()
ComboBox3.List = Array("Kolye", "Zincir", "Bilezik", "Küpe", "Yüzük", _
"Set Bakim")