-
Foruma hoş geldin 👋 Ziyaretçi
Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.
Giriş yap veya Şimdi kayıt ol
- Konuyu Başlatan xmenx
- Başlangıç tarihi
Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Çözüm
Adnan
Destek Ekibi
- Katılım
- 10 Mar 2021
- Mesajlar
- 1,513
- Çözümler
- 285
- Aldığı beğeni
- 1,646
- Excel V
- Office 365 TR
xmenx;
Dosyanızda tüm sayfalarınızda çekilecek verilere ait bilgi bulamadım. Yani örneğinize göre hangi kayıtlar 2023 hangileri 2024 bunu manuel yapın nasıl yaptığınızı anlatın bizde öyle yapalaım
Dosyanızda tüm sayfalarınızda çekilecek verilere ait bilgi bulamadım. Yani örneğinize göre hangi kayıtlar 2023 hangileri 2024 bunu manuel yapın nasıl yaptığınızı anlatın bizde öyle yapalaım
Hocam şöyle düşünebilirsiniz önce N2 hücresinde 2023 yazıyor ya o verileri alsın sonra N2 hücresini 2024 yazıp o şekilde çekmesi yeterli benim için verileri sqlden aldıgım için otomatik değişiyor Sube_Hareketleri_DepoBazlı sayafsındaki veriler
Merhaba sql sorgu yapmaya çalıştım fakat doğru getirmiyor. 2023-2024 stokkoduna göre diğer sayfadan eşleşenlerin NETCIKIŞINI toplayarak ilgili sütuna yazması yardımcı olursanız sevinirim
aeGNoR
Destek Ekibi
- Katılım
- 10 Mar 2021
- Mesajlar
- 878
- Çözümler
- 116
- Aldığı beğeni
- 1,017
- Excel V
- Office 2021 TR
peki hocam benim istediğim 2023-2024 stokkoduna bakarak ona göre veri getirmesi
aeGNoR
Destek Ekibi
- Katılım
- 10 Mar 2021
- Mesajlar
- 878
- Çözümler
- 116
- Aldığı beğeni
- 1,017
- Excel V
- Office 2021 TR
Hatanızı söylediğimde cevap da vermiş oldum aslında.
Yine de cevap isterseniz, Sorgu bu şekilde:
HTML:
Sayfaya aktarma kodlarında "Sheets("2023-2024").Range("D2").CopyFromRecordset RS" yerine aşağıdaki kodlar:
HTML:
Son düzenleme:
aeGNoR
Destek Ekibi
- Katılım
- 10 Mar 2021
- Mesajlar
- 878
- Çözümler
- 116
- Aldığı beğeni
- 1,017
- Excel V
- Office 2021 TR
Kopyalama kodunda hata vardı üstteki mesajı düzenleyerek düzelttim. RS.MoveFirst kısmını ekledim.
Teşekkür ederim hocam benim anladıgım inner join kullanınca düşeyara gibi gelicek zannetmem . Hocam kodunuzu denedim yavaş çalışıyor hızlandırmak için başka ne yapılabilir acaba
aeGNoR
Destek Ekibi
- Katılım
- 10 Mar 2021
- Mesajlar
- 878
- Çözümler
- 116
- Aldığı beğeni
- 1,017
- Excel V
- Office 2021 TR
Çözüm
Teşekkür ederim hocam elinize sağlık
aeGNoR
Destek Ekibi
- Katılım
- 10 Mar 2021
- Mesajlar
- 878
- Çözümler
- 116
- Aldığı beğeni
- 1,017
- Excel V
- Office 2021 TR
Daha güzel bir kullanım için; stok kodlarını 2023-2024 sayfasından değil farklı bir sayfadan referans alır, SELECT ile Kodu, Adı, vb. gibi gerekli bilgileri çektikten sonra 2023-2024 sayfasında Range("A2").CopyFromRecordset RS şeklinde kullanabilirsiniz.
aeGNoR
Destek Ekibi
- Katılım
- 10 Mar 2021
- Mesajlar
- 878
- Çözümler
- 116
- Aldığı beğeni
- 1,017
- Excel V
- Office 2021 TR
Aradaki boşları da görmek gibi bir niyetiniz varsa o zaman işe yaramaz tabi.
boşlarla işim yok hocam dediğiniz gibi örnek yapabilirmisiniz acaba
aeGNoR
Destek Ekibi
- Katılım
- 10 Mar 2021
- Mesajlar
- 878
- Çözümler
- 116
- Aldığı beğeni
- 1,017
- Excel V
- Office 2021 TR
Bu sefer c sütunundaki verileri kaybederiz. Bu şekilde olmaz.
Hocam bu şekildeki sql koduyla çok daha hızlı sonuc almaktayım . Sizin yöntemle bu yöntem aynımıdır acaba
strSQL = " Select IIF(IsNull(T1.R),0,T1.R),IIF(IsNull(T1.[ENVANTER]),0,T1.[ENVANTER]) " & _
" From [2023-2024$] As T2 " & _
" Left Join " & _
" ( " & _
" Select [STOKKODU],[ENVANTER], Sum([NETCIKIS]) As R From [Sube_Hareketleri_DepoBazlı$] Group By [STOKKODU] ,[ENVANTER] " & _
" ) As T1 " & _
" On T1.[STOKKODU]= T2.[STOKKODU]"
HTML:
strSQL = " Select IIF(IsNull(T1.R),0,T1.R),IIF(IsNull(T1.[ENVANTER]),0,T1.[ENVANTER]) " & _
" From [2023-2024$] As T2 " & _
" Left Join " & _
" ( " & _
" Select [STOKKODU],[ENVANTER], Sum([NETCIKIS]) As R From [Sube_Hareketleri_DepoBazlı$] Group By [STOKKODU] ,[ENVANTER] " & _
" ) As T1 " & _
" On T1.[STOKKODU]= T2.[STOKKODU]"
HTML:
aeGNoR
Destek Ekibi
- Katılım
- 10 Mar 2021
- Mesajlar
- 878
- Çözümler
- 116
- Aldığı beğeni
- 1,017
- Excel V
- Office 2021 TR
bu sorgu aradaki satırların boş gelmesini sağlıyor ve dolayısıyla sizi sonradan döngü ile uğraşmaktan kurtarıyor. Bu sorgu ile daha hızlı yaparsınız elbette.
Teşekkürler
- Durum