• Merhaba Ziyaretçi,
    Microsoft 365 Uygulamaları ile ilgili yeni haberler, dikkat çekici konular, ilgi ile takip edeceğiniz yazılar için.

    Abone Olun
  • ESTE - Microsoft Office Eğitimleri

    Yeni yıl Microsoft Office Eğitim planlarınız için bütçenizi oluşturmadan önce ESTE eğitim kalitesi ile tanışın. 🙌
    Kullanıcıların ihtiyacı olan yazılı materyal, dosya ve video kaynağı desteğimiz ile tüm ofis çalışanlarının iş süreçlerini rahatlatacak eğitimler planlayın. 🎯
    Microsoft Office eğitimlerimiz hakkında detaylı bilgi için bize ulaşın.

    👉 Microsoft Office Eğitim Talebi

Yardım Çalışma kitaplarındaki verileri tek bir çalışma kitabına toplama

goofy

Yeni Üye
Katılım
2 May 2019
Mesajlar
7
En iyi yanıt
0
Puanları
1
Yaş
55
Konum
Tekirdağ
Ad Soyad
Hamdi KURAL
Elimdeki dosyada farklı çalışma kitaplarının aynı satırlarında bulunan verilerini tek bir çalışma kitabına alt alta getirmek istiyorum. Dosyaya sürekli yeni çalışma kibabı ilave ediliyor (isimleri sheet1, sheet2 vb. gibi değil, yeniden adlandırılmış durumda). Bunu makroyla nasıl yapabiliriz. Teşekkürler.
 

Murat OSMA

Yönetici
Site Yöneticisi
Katılım
25 May 2018
Mesajlar
1,504
En iyi yanıt
13
Puanları
113
Konum
İstanbul
Web sitesi
excelarsivi.com
Ad Soyad
Murat OSMA
Office Vers.
Office 365 TR+EN
Örnek dosyaları gönderirseniz üzerinden çözüm sunalım.
 

goofy

Yeni Üye
Katılım
2 May 2019
Mesajlar
7
En iyi yanıt
0
Puanları
1
Yaş
55
Konum
Tekirdağ
Ad Soyad
Hamdi KURAL
Merhaba, excel dosyası içinde değişik adlardaki yüzlerce çalışma kitabı (sheets) içindeki aynı satırda bulunan bilgileri tek bir çalışma kitabına otomatik olarak almak istiyorum.
Örnek dosyada özet çalışma kitabına diğer çalışma kitaplarında 2'nci satırda bulunan bilgilerin tek tek kopyalamadan gelmesini istiyorum. Dosyaya eklenen her bir yeni çalışma sayfasının 2'nci satırındaki bilgilerin otomatik olarak özet çalışma sayfasına gelmesini gerekmekte. Özet çalışma kitabına en uzak olan çalışma kitabının 2'nci satırındaki bilgiler özet çalışma kitabının 2'nci satırına gelecek, bir solundaki çalışma kitabının 2'nci satırındaki bilgiler özet çalışma kitabının 3'ncü satırına gelecek vb... devam edecek.
Bu konuda makro veya başka bir şekilde kullanılabilecek bir yol var mı? (yalnız çözüm makrodaysa bu konuda bilgim az olduğundan detaylı anlatırsanız sevinirim).
İlgi ve alakanız için şimdiden teşekkürler.
 

Ekli dosyalar

  • sheet çalışma deneme.xlsx
    12.3 KB · Görüntüleme: 15

Murat OSMA

Yönetici
Site Yöneticisi
Katılım
25 May 2018
Mesajlar
1,504
En iyi yanıt
13
Puanları
113
Konum
İstanbul
Web sitesi
excelarsivi.com
Ad Soyad
Murat OSMA
Office Vers.
Office 365 TR+EN
Diğer sayfalarda şu an sadece 2. satırda veri var, o veriler 3-4-5-6- vs. alt alta ilerleyecek mi peki?
Yoksa her seferinde, her sayfanın 2. satırındaki verileri özet sayfasına almak mı istiyorsunuz?
 

Murat OSMA

Yönetici
Site Yöneticisi
Katılım
25 May 2018
Mesajlar
1,504
En iyi yanıt
13
Puanları
113
Konum
İstanbul
Web sitesi
excelarsivi.com
Ad Soyad
Murat OSMA
Office Vers.
Office 365 TR+EN
Diğer sayfaların A2:F2 aralığındaki verilerini Özet sayfasında alt alta listelemek için bu kodları kullanabilirsiniz.
PHP:
Sub Osma()
    Dim syf%
    For syf = 2 To Sheets.Count
       Range("A65536").End(3)(2, 1).Resize(, 6) = Sheets(syf).Range("A2:F2").Value
    Next syf
    syf = Empty
End Sub
 

goofy

Yeni Üye
Katılım
2 May 2019
Mesajlar
7
En iyi yanıt
0
Puanları
1
Yaş
55
Konum
Tekirdağ
Ad Soyad
Hamdi KURAL
Diğer sayfalarda şu an sadece 2. satırda veri var, o veriler 3-4-5-6- vs. alt alta ilerleyecek mi peki?
Yoksa her seferinde, her sayfanın 2. satırındaki verileri özet sayfasına almak mı istiyorsunuz?
Merhaba, eklenecek her bir yeni sayfanın hep 2.satırındaki veriler özet çalışma kitabına aktarılacak. aşağıda bir kod yazmışsınız deneyip döneceğim.
Şimdiden ilginize teşekkürler.
 

goofy

Yeni Üye
Katılım
2 May 2019
Mesajlar
7
En iyi yanıt
0
Puanları
1
Yaş
55
Konum
Tekirdağ
Ad Soyad
Hamdi KURAL
Denedin çok güzel çalışıyor, elinize sağlık. Ancak, yeni bir sheet ekleyip makroyu çalıştırdığımda tüm sheetlerdeki bilgiler tekrar en alta kopyalanıyor. Makroyu ilk çalıştırmada sorun yok (örnek dosyadaki gibi) ama yeni sheetler eklediğimde özet sheette daha önce kopyalanmış olan satırların altına tekrardan tüm diğer sheetlerin verileri bir daha geliyor.
Münkünse makroyu çalıştırdığım her seferinde özet dışındaki diğer (yeni eklenen sheetlerde dahil) sheetlerin 2.satırındaki veriler gelsin ama dublikasyon olmasın.
Teşekkürler emeğinize tekrar.
 

Murat OSMA

Yönetici
Site Yöneticisi
Katılım
25 May 2018
Mesajlar
1,504
En iyi yanıt
13
Puanları
113
Konum
İstanbul
Web sitesi
excelarsivi.com
Ad Soyad
Murat OSMA
Office Vers.
Office 365 TR+EN
Bu kodu kullanın..
PHP:
Sub Osma()
    Dim syf%
    Range("A2:F65536").ClearContents
    For syf = 2 To Sheets.Count
       Range("A65536").End(3)(2, 1).Resize(, 6) = Sheets(syf).Range("A2:F2").Value
    Next syf
    syf = Empty
End Sub
 

goofy

Yeni Üye
Katılım
2 May 2019
Mesajlar
7
En iyi yanıt
0
Puanları
1
Yaş
55
Konum
Tekirdağ
Ad Soyad
Hamdi KURAL
Bu kodu kullanın..
PHP:
Sub Osma()
    Dim syf%
    Range("A2:F65536").ClearContents
    For syf = 2 To Sheets.Count
       Range("A65536").End(3)(2, 1).Resize(, 6) = Sheets(syf).Range("A2:F2").Value
    Next syf
    syf = Empty
End Sub
 

goofy

Yeni Üye
Katılım
2 May 2019
Mesajlar
7
En iyi yanıt
0
Puanları
1
Yaş
55
Konum
Tekirdağ
Ad Soyad
Hamdi KURAL
Tekrar Merhaba,
Formül bu şekliyle tamda istediğim gibi çalışıyor, teşekkür ederim.
Range'i 3.satırda A2:F65536 yerine A2:K65536 ve 5.satırda A2:F2 yerine A2:K2 olarak düzeltiyorum ama yine F2'den sonraki verileri getirmiyor (F2:K2 arasındaki veriler).
Bu konuda da yardımcı olabilir misiniz lütfen.
 

goofy

Yeni Üye
Katılım
2 May 2019
Mesajlar
7
En iyi yanıt
0
Puanları
1
Yaş
55
Konum
Tekirdağ
Ad Soyad
Hamdi KURAL
Birde diğer sheetlerden "özet" sheetine verileri getiriyor ama veriler içinde var olan tarihlerin formatını bozuyor (14.05.2019 yerine 43870 vb.). Hücre biçimlendirden de denebim ama düzelmiyor maalesef:(((
 

Murat OSMA

Yönetici
Site Yöneticisi
Katılım
25 May 2018
Mesajlar
1,504
En iyi yanıt
13
Puanları
113
Konum
İstanbul
Web sitesi
excelarsivi.com
Ad Soyad
Murat OSMA
Office Vers.
Office 365 TR+EN
Koddaki bu kısımda bulunan Resize(, 6) 6 sayısını bu kod için 6. sütun olarak düşünebilirsiniz.
K sütunu kaçıncı sütun ise o numarayı yazın buraya, o zaman gelir.
 
Üst Alt