combobox veri alma ve kaydetme

[fatih34]

merhabalar
combobox a depo adlı dosyadaki veriler alındıktan sonra malzemenin fiyatını girip,malzeme adlı dosyaya kaydetmek istiyorum.yardım ederseniz sevinirim.

 

[fatih34]

yardım eden yokmu?

 

[mustafakoker]

Private Sub ComboBox2_Change()
On Error Resume Next
End Sub

Private Sub UserForm_Activate()
On Error Resume Next
If Sheets("DATA").Range("A1").Value = "" Then
firmasec.Value = "Kayıtlı Ürün Yok!"
Else
ComboBox1.RowSource = "DATA!A1:A" & [DATA!A65536].End(3).Row
ComboBox2.RowSource = "DATA!A1:A" & [DATA!A65536].End(3).Row

End If


End Sub

 

[fatih34]

sayın mustafa bey teşekkür ederim ama kodu uyguladım comboboxlarda veri çıkmıyor

 

[mustafakoker]

Benim verdiğim örnek aynı çalışma sayfasında (sayfa ismi data) a1 hücresinde yazılı olan verileri combobax1 e çekmesi içindi

 

[mustafakoker]

linki inceleyiniz

Sayın Evren beyin yanıtı
http://www.excel.web.tr/showthread.php?t=85035&highlight=kapal%FD+dosya

 

[fatih34]

her halde hazırlamaya çalıştığım programın verilerini aynı sayfa içerisinde yapmak gerekecek başka dosyalarda olunca zor oluyor anlaşılan