mesela aşağıdaki kod ile A1:C2 aralığı doğrudan comboya aktırılabilir tabi combo 2 sütunlu olmalı 2. sütun görünmez yapılmalı bu durumda seçilen değerin indisi sütunu 2. sütunun değeri de 2. satırın alacağı değer olacağından ekstradan işlemlere gerek kalmaz
ayrıca veriler hep aynı sayfaya mı aktarılacak seçilen ürüne göre farklı sayfaya mı?
comboya liste yükleme

Private Sub UserForm_Initialize()

ComboBox1.List = Application.WorksheetFunction.Transpose(Sayfa1.Range("A1:C2"))

End Sub