Çapraz Sorgu (Metin Olarak Sonuç Versin)

Katılım
19 Şubat 2006
Mesajlar
73
Excel Vers. ve Dili
exel
Slm Arkadaşlar

Ekte bir örnek hazırladım örnekte 2 Adet tablo ve 1 adet çapraz sorgu bulunmakta birde istenilen çapraz sorgu sonucunun nasıl olacağını görmek adına bir adet daha tablo ekledim.

yapacağım bir çapraz sorgu sonucunda normal sonuç olarak aldığım alanların sutunlar halinde değilde bir alan içinde ve metin olarak yazılmasını istiyorum

Örneğin
Adı Soyadı Cari Fatura Çek Toplam

Ahmet 10 25 10 45

Bu Şekilde Olan Çapraz Sorgunun Aşağıdaki şekilde sonuç vermesini istiyorum

Adı Soyadı Sonuc(Metin Olarak)
Ahmet Cari 10, Fatura 25, Çek 10, Toplam 45


Yardım edecek arkadaşlara şimdiden teşekkür ediyorum

bunu istememin sebebi ise SMS olarak gönderme yapacağım için SMS programı bu şekilde bir veriyi kabul etdiğindendir.
 
Katılım
8 Eylül 2006
Mesajlar
155
Excel Vers. ve Dili
Excel 2002
Eğer Cari Hesap,Fatura ve Çek gibi işlem türleriniz sabitse
ekteki gibi ikili sorgu işinizi çözer.

Yok sabit değil yeni veya farklı işlem türleri olabilir, onları otomatik olarak
görmesini istiyorum derseniz, kod yazıp geçici tablo oluşturarak farklı çözümler bulunabilir.
 
Katılım
19 Şubat 2006
Mesajlar
73
Excel Vers. ve Dili
exel
Sayın seruz

öncelikle ilginiz için teşekkür ediyorum

çapraz sorgu olmasının sebebi zaten bu değerlerin değişken olmasından kaynaklanıyor yani çok sık değişmesede ilaveler oluyor onun için sorguyu otomatik hale getirmem gerekiyorki kullanıcı istediğini yazabilsin ve bu yazdığına görede SMS raporu alabilsin istiyorum

mümkünse bahsettiğiniz farklı çözümleri yapabilirmisiniz.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın smmmustafa,

Kusura bakmayın örnekleri karıştırdım.
 
Katılım
19 Eylül 2008
Mesajlar
331
Excel Vers. ve Dili
2003
sayın smmustafa
tabildot.rar formda mevcut. İncelediğinde problemini kolaylıkla çözeceksin.
alanları birleştirmek ve metin gibi göstermek için aşğıdaki kod benzerini kullanabilirsin
ilk alan=rs(0)&" "&rs(1)&" "&rs(2)&" "&rs(3)
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Madem ki SMS göndereceksiniz neden rapor kullanmıyorsunuz?
 
Katılım
19 Şubat 2006
Mesajlar
73
Excel Vers. ve Dili
exel
Sayın Modalı

Benim için hiç farketmiyor rapor veya sorgu şeklinde çıkması

sonuçta ben çıkan veriyi excel atıp ordanda SMS programı tarafından okutturuyorum ve çoğu SMS programıda excel göre ayarlamış kendini ama istediği şartlar var tabi onun için o şartlara uygun bir şekilde aktarım yapmak istiyorum

Verilerimin Şekli
ahmet KDV 15
ahmet Stopaj 20
ahmet SSK 25


istenilen format ise
adısoyadı * cepno * Mesaj Metni
ahmet * 532000000 * KDV 15,00 Stopaj 20,00 SSK 25, Toplam 60,00

şimdi bu metini yukarıdaki tablodan (tabloyu değiştirme şansım yok başka hesaplarada bağlı çünkü) alacak ve aşağıdaki şekile çevirecek

rapor veya sorgu farketmiyor önemli olan tablodaki veriyi istediğim şekle çevirmesidir.


Sayın Modalı Sizin çözeceğinizi düşünüyorum. yardımlarınız için şimdiden teşekkür ederim.
 
Katılım
19 Şubat 2006
Mesajlar
73
Excel Vers. ve Dili
exel
Sayın Modalı

Yardımlarınızı bekliyorum. :(
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın smmmustafa,

Bir de excele aktarım çıktı. O zaman hiç sorgularla falan uğraşmamak gerekir. Tablodan al veriyi ilgili excel hücresine ata.

İyi çalışmalar
 

beab05

Özel Üye
Katılım
19 Mart 2007
Mesajlar
1,418
Excel Vers. ve Dili
Office 2013
Merhabalar;

Bunun için basit bir kod yeterli gibi.. Bir module kaydedin ve kod üzerinde F5 e basınız immediate penceresinde görebilirsiniz. Pencere yoksa CTRL+G ye basınız.
İstediğinize uyuyor mu? Çıkan sonucu istediğiniz alana da alabilirsiniz. Ayrıca sorgu üzerinde de belirli şartlar oluşturarak daha iyi sonuçlar alabilirsiniz.

Kod:
Sub BB_alan_ve_veri()
    Dim rs As Recordset
    Dim f As Field
    Dim bb As String
    Set rs = CurrentDb.OpenRecordset("qry_cpr")
    rs.MoveLast
    For Each f In rs.Fields
    bb = bb & f.Name & " " & f.Value & ","
        Debug.Print bb
    Next
  rs.Close
End Sub
"qry_cpr" yani çapraz query ismi olarak kendi uygulamanızdakini yerleştiriniz..
 
Son düzenleme:
Katılım
19 Şubat 2006
Mesajlar
73
Excel Vers. ve Dili
exel
Arkadaşlar ilginize teşekkür ediyorum

ben bir şekilde çözdüm sayılır olayı biraz külfetli oldu ama sayın seruz'a teşekkür ediyorum verdiği örnekten yola çıkarak biraz uzun yoldan da olsa işi çözdüm


Fakat sayın modalı beni veya bu foruma giren insanları bu işi kendisi gibi bildiğini sanıyor galiba onun için cevaplarında hep bir stemkarlık var işin doğrusu verdiği cevaplar biraz zoruma gitti :(

örnek olsun diye yapmak istediğim şeyin minik bir kısmını hazırladım ve burdan çözüm istedim exel atma işi yapılabilirde yapılmayabilirde neticede kullanıcı istediği şekilde kullanabilmeli

Sonuç olarak çözüm alternatifleri sunulması gerekiyor veya sayın seruz gibi örnek koyup bu şekilde yapabilirsin denilmeli

yok efendim senin amacın buysa ne işin var bu sorguyla sen şöyle birşey yap demek ve işi kendi istediğin şekle çevirmek yapılan projeye uymayabilir bunu gözardı etmemek lazım.

sorulan her soru ya kafama takıldı şöyle birşey yapabilirmiyim deyip meraktan sorulmuyor mutlaka bir işi yaparken takılan bir yerde soruluyor.

ilginileze ve alakanıza tekar teşekkür eder iyi günler dilerim.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Arkadaşlar ilginize teşekkür ediyorum

ben bir şekilde çözdüm sayılır olayı biraz külfetli oldu ama sayın seruz'a teşekkür ediyorum verdiği örnekten yola çıkarak biraz uzun yoldan da olsa işi çözdüm


Fakat sayın modalı beni veya bu foruma giren insanları bu işi kendisi gibi bildiğini sanıyor galiba onun için cevaplarında hep bir stemkarlık var işin doğrusu verdiği cevaplar biraz zoruma gitti :(

örnek olsun diye yapmak istediğim şeyin minik bir kısmını hazırladım ve burdan çözüm istedim exel atma işi yapılabilirde yapılmayabilirde neticede kullanıcı istediği şekilde kullanabilmeli

Sonuç olarak çözüm alternatifleri sunulması gerekiyor veya sayın seruz gibi örnek koyup bu şekilde yapabilirsin denilmeli

yok efendim senin amacın buysa ne işin var bu sorguyla sen şöyle birşey yap demek ve işi kendi istediğin şekle çevirmek yapılan projeye uymayabilir bunu gözardı etmemek lazım.

sorulan her soru ya kafama takıldı şöyle birşey yapabilirmiyim deyip meraktan sorulmuyor mutlaka bir işi yaparken takılan bir yerde soruluyor.

ilginileze ve alakanıza tekar teşekkür eder iyi günler dilerim.
Sayın smmustafa,

Sizi tanımayan ve hiçbir karşılık beklemeden size yardım etmeye çalışan insanlara haksızlık ediyorsunuz.

Para vererek profesyonel yardım aldığınız kişilere bile bu ifadeleri kullanamazsınız.

Hayatınızda başarılar dilerim.
 

assenucler

Altın Üye
Katılım
19 Ağustos 2004
Mesajlar
3,552
Excel Vers. ve Dili
Ofis 365 TR 64 Windows 11 Home Single Language x64 TR
Altın Üyelik Bitiş Tarihi
29-05-2025
Sayın Modalı;

Sabırlar diliyorum...
 
Üst