Textbox içindeki formül çalışmıyor

[Milady Meriç]

Herkese iyi günler dilerim.

Access üzerinde yaptığım bir formda birçok Textbox var ve bu Textbox'ların control source'larında formüller bulunuyor.

Fakat bir textbox içinde kullandığım;

=Concatenate("SELECT Supp_Series FROM Supplier WHERE Supp_Company=[Forms]![Form1]!Combo10 ")

formülü çalışmıyor. Concatenate fomülü VBA'da oluşturulmuş bir kod. Sorgu sonucunda çıkan sonuçları aralarında virgül olarak sırayla textbox içine yazıyor.( Sayın modalı'ya saygılarımı sunuyorum, kendisinin yardımıyla bu kodu bulabildim. )

Kodda bir sorun yok. Eğer;

=Concatenate("SELECT Supp_Series FROM Supplier")

olarak çalıştırırsam , istediğim veriler textbox'a geliyor.

=Concatenate("SELECT Supp_Series FROM Supplier WHERE Supp_Company=('ATK')")

olarak çalıştırırsam da , istediğim veriler textbox'a geliyor.

FAKAT;

=Concatenate("SELECT Supp_Series FROM Supplier WHERE Supp_Company=[Forms]![Form1]!Combo10 ")

yazarsam çalışmıyor. Yani WHERE'den sonra combobox'daki değeri bir türlü referans veremedim.

Dosyayı ekte gönderiyorum. Form1 içinde bulunan bozuk textbox'ı kırmızı dörtgen içine alıp işaretledim. Bu textbox'a

=Concatenate("SELECT Supp_Series FROM Supplier WHERE Supp_Company=[Forms]![Form1]!Combo10 ")

formülünü yazabilir misiniz ? Form açıkken combobox'dan "ATK" değerini seçince, textbox içinde "M09083, M09890" yazması gerekiyor.

çok teşekkür ederim.

 

[Taruz]

Merhaba..

Değişkeni veri tipine uygun şekilde tırnak içine alırsak istediğimiz değeri döndürebiliriz..:

=Concatenate("SELECT Supp_Series FROM Supplier WHERE Supp_Company='" & [Formlar]![Form1]![Combo10] & "' ")

 

[modalı]

Sayın frksdf,

Uygulamanız ekte.

Bu adımı daha önce tahmin etmiştim.

İyi çalışmalar

 

[modalı]

Sayın Taruz,

Combo10 aynı formun üstünde.

İyi çalışmalar

 

[Milady Meriç]

Sayın Modalı ve Sayın Taruz,
İlginize ve yardımlarınız için teşekkür ederim. Gerçekten çok sağolun.

Sayın Modalı;
Önce sorgu oluşturup, ardından DLOOKUP ile o sorgunun sonuçlarını formülün içine yerleştirdiniz. Çok da güzel çalışıyor. teşekkür ederim.

Birkaç gündür tırnak işaretleri ve parantezler içersinde boğuşuyorum. Denemediğim varyasyon kalmadı. Bir ara, gerçekten imdat diye bağaracaktım. Sayın Taruz'un yukarıda söylediği;

=Concatenate("SELECT Supp_Series FROM Supplier WHERE Supp_Company='" & [Formlar]![Form1]![Combo10] & "' ")

çalışmıyor. #NAME hatası veriyor.
Yaptığınız çözümün, formülün içine sql ifadesini yazarak oluşturulması mümkün mü? Gerçekten meraktan soruyorum. Günlerdir boşuna mı uğraştım

 

[Taruz]

Sayın Taruz,

Combo10 aynı formun üstünde.

İyi çalışmalar

Merhaba sayın modalı..

İlk mesajdaki yazılanlara göre öneride bulunmuştum.. Zaten combo10, sizin de bildiğiniz gibi aynı form üzerinde olsa dahi deyim sıkıntısız bir şekilde çalışır..

Selamlar..

 

[Taruz]

Sayın Modalı ve Sayın Taruz,
İlginize ve yardımlarınız için teşekkür ederim. Gerçekten çok sağolun.

Sayın Modalı;
Önce sorgu oluşturup, ardından DLOOKUP ile o sorgunun sonuçlarını formülün içine yerleştirdiniz. Çok da güzel çalışıyor. teşekkür ederim.

Birkaç gündür tırnak işaretleri ve parantezler içersinde boğuşuyorum. Denemediğim varyasyon kalmadı. Bir ara, gerçekten imdat diye bağaracaktım. Sayın Taruz'un yukarıda söylediği;

=Concatenate("SELECT Supp_Series FROM Supplier WHERE Supp_Company='" & [Formlar]![Form1]![Combo10] & "' ")

çalışmıyor. #NAME hatası veriyor.
Yaptığınız çözümün, formülün içine sql ifadesini yazarak oluşturulması mümkün mü? Gerçekten meraktan soruyorum. Günlerdir boşuna mı uğraştım

Hayır; boşuna uğraşmadınız..

İngilizce sürüm kullanıyorsanız [Formlar] ifadesini [Forms] olarak kullanınız..

Ya da tümünü bu şekilde kullanabilirsiniz..:

=Concatenate("SELECT Supp_Series FROM Supplier WHERE Supp_Company='" & [Combo10] & "' ")

 

[Milady Meriç]

Sayın Taruz;

Sayın Modalı;

 

[Taruz]

Nezaketiniz için biz de size teşekkür ederiz..