Comboboxtan seçilen değere göre, ilgili dosyadan veri alma

Katılım
17 Eylül 2006
Mesajlar
119
Excel Vers. ve Dili
Excel 2003 Türkçe
Combobox'ta müşteri isimlerim yazıyor. Combobox'tan bir müşteri ismi seçtiğimde, o müşterinin D:\tiglioglu_insaat\musteri klasöründeki müşteri ismi.xls dosyasının A sayfasının A1 hücresindeki değerin, combobox'un bulunduğu sayfadaki C1 hücresine yazdırmak istiyorum.
Örnek comboboxtan Kamil POYRAZ'ı seçtiğimde C1 hücresine, D:\tiglioglu_insaat\musteri\Kamil POYRAZ.xls dosyasının A sayfasının A1 hücresindeki değeri yazsın.
Yardımlarınızı bekliyorum.
Çalışmalarınızda başarılar dilerim.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,058
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Aşağıdaki kodu deneyin.

Kod:
Private Sub ComboBox1_Click()
[c3] = ExecuteExcel4Macro("'D:\tiglioglu_insaat\musteri\[" & ComboBox1 & ".xls]A'!R1C1")
End Sub
 
Katılım
17 Eylül 2006
Mesajlar
119
Excel Vers. ve Dili
Excel 2003 Türkçe
Sayın Leventm, öncelikle ilginizden dolayı teşekkürederim.. Gönderdiğiniz kodu yazdım ama comboboxtan değer seçince Run-time error '1004': Yazdığınız formülde bir hata var uyarısı geliyor.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,058
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Yukarıdaki kodu düzelttim tekrar deneyin.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,058
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Aşağıdaki gibide olabilir.

Kod:
[c3] = "='D:\tiglioglu_insaat\musteri\[" & ComboBox1 & ".xls]A'!A1"
 
Katılım
17 Eylül 2006
Mesajlar
119
Excel Vers. ve Dili
Excel 2003 Türkçe
Hocam çok teşekkürederim.
Ayrıca 10000'i aşkın iletiye ulaştığınız için sizi tebrik ederim, Bilginize, bedeninize sağlık. Allah sizden razı olsun.
 
Üst