• DİKKAT !

    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 Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Kapalı dosyalardan ilgili hücrelere aktarma

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
X

xmenx

Gold Üye
Katılım
25 Eki 2022
Mesajlar
303
Aldığı beğeni
45
Excel V
Office 2016 TR
Gold Bitiş
4 Kasım 2025
Konu Sahibi
Merhaba üstadlar ekte anapuantaj dosyasındaki tclere bakarak ve gazipaşa,sefakoy dosyalarındaki tc leri kontrol ederek ilgili günlerdeki hücrelere yazması . Yardımlarınızı rica ediyorum .Dosya ismindeki gazipaşa şubat puantaj ismindeki şubat ismini kontrol ederek anapuantaj dosyasındaki ay eşitse aktarım yaparsa çok iyi olur teşekkür ederim
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Tarihe göre sırala Oylara göre sırala
Merhaba
Ekli dosyayı inceleyin
Yol = Thisworkbook.path olarak ayarlandı, siz olması gereken yolu yazarsınız.
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 0 Negatif oyla
Konu Sahibi
Caylak denedim şimdi tam istediğim çalışıyor fakat aktarırken alttaki gibi diğer hücreleride aktarıyor. AL sütununa bakarsanız

011.png
022.png
 
Olumlu oy 0 Negatif oyla
xmenx' Alıntı:
Caylak denedim şimdi tam istediğim çalışıyor fakat aktarırken alttaki gibi diğer hücreleride aktarıyor. AL sütununa bakarsanız
Genişletmek için tıkla...

Merhaba, aceleden fazla saydım sanırım,
Döngülerin içerisindeki 38'i 35 yaparsanız sorun çözülecektir sanırım.
For x = 6 To 38 yerine For x = 6 To 35
iki adet döngü var ikisini de bu şekilde değiştirip dener misiniz?
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Birde hocam ben örnek olarak 2 dosya olarak ekledim fakat 6 adet daha dosya var kodu onlara göre alt alta eklemem gerekiyor sanırım
 
Olumlu oy 0 Negatif oyla
xmenx' Alıntı:
Birde hocam ben örnek olarak 2 dosya olarak ekledim fakat 6 adet daha dosya var kodu onlara göre alt alta eklemem gerekiyor sanırım
Genişletmek için tıkla...
Hayır onu da döngü ile halledebiliriz.
Dosya adlarınızı ya da klasör içeriklerinizi bilmediğim için ben bu şekilde yaptım.
Dosya = Dosyaadı
İf Dosya = Buysa then
Sayfa = Budur
deyip tek bir bağlantıya yönlendirilebilir.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
makroyu çalıştırdıktan sonra işlem bitince hocam dosyaları açmaya çalışınca alttaki gibi uyarı veriyor
033.png
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Yani hocam anadosyanın bulundugu dizindeki xlsx dosyalarındaki ana dosyadaki ay hangisi ise diyelim şubat Gazipasa Şubat Puantaj sadece şubat içerenleri aktarsın çünkü yanlışlıkla mart dosyasınıda oraya atılabilir oyuzden böyle olması daha iyi olur
 
Olumlu oy 0 Negatif oyla
Sanırım bağlantıyı kapatmadığımız için oluşuyor bu hata, bende görünmüyor ama siz PtjAktar sub'ının en altına;
Rss.Close
Cnn.Close
Set Rss = Nothing
Set Cnn = Nothing
End Sub
şeklinde yazar mısınız?
 
Olumlu oy 0 Negatif oyla
xmenx' Alıntı:
Yani hocam anadosyanın bulundugu dizindeki xlsx dosyalarındaki ana dosyadaki ay hangisi ise diyelim şubat Gazipasa Şubat Puantaj sadece şubat içerenleri aktarsın çünkü yanlışlıkla mart dosyasınıda oraya atılabilir oyuzden böyle olması daha iyi olur
Genişletmek için tıkla...
Mart dosyası orada olsa bile aktarım gerçekleşmez, çünkü kodlarda AnaPuantaj dosyasındaki Ay ve Yıl, puantaj dosyasındaki ay ve yıl ile karşılaştırılıyor.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Rss.Close
Cnn.Close
Set Rss = Nothing
Set Cnn = Nothing
End Sub bunu ekleyince düzeldi oda :)
  • #13 ozaman çok iyi sadece şunuda yaparsak hocam sorun kalmıcak sanırım . diğer dosyalar için nasıl ekleme yapmam gerekiyor . eğer uğraştırırsa sizi ben uzun yoldan kodları alt alta eklicem
 
Olumlu oy 0 Negatif oyla
Dosyanızı güncelledim, inceleyin
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Olumlu oy 1 Negatif oyla
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst