Çözüldü ayrı exceldeki sayfaları tek excelde sayfa sayfa nasıl birleştiririz.

[alicox]

Ofis 2010 kullanıyorum. 2 ve daha fazla ayrı exceldeki sayfaları tek excelde sayfa sayfa nasıl birleştiririz.

 

[Miraga]

merhablar
veri / birleştir seçeneği işinizi görürmü acaba

 

[alicox]

örnek travers, sehim, ağırlık, vs gibi excellerim var bunları bir excelde sayfa sayfa nasıl toplayabilirim

 

[VetExc]

Merhaba bu işlemi Sn. siyar0044 ünde belirttiği gibi Power Query ile de yapabilirsiniz.. Birden fazla çalışma kitabınız var ise ve her çalışma kitabının içinde de birden çok sayfa var ise aşağıdaki VBA kodu ile tüm sayfaları tek çalışma kitabında ayrı sayfalarda birleştirebilirsiniz.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[alicox]

Merhaba bu işlemi Sn. siyar0044 ünde belirttiği gibi Power Query ile de yapabilirsiniz.. Birden fazla çalışma kitabınız var ise ve her çalışma kitabının içinde de birden çok sayfa var ise aşağıdaki VBA kodu ile tüm sayfaları tek çalışma kitabında ayrı sayfalarda birleştirebilirsiniz.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

İlk önce size teşekkür etmek istiyorum.

Yeni bir excel (excel 2010) açtım kodu çalıştırdım, 3 adet excelim vardı, bu excelleri yeni excel içine kod yerleştirdi, hatta bir excelimin içinde 3 sayfa vardı bu 3 sayfayı da getirdi, diğerlerinde 1 er sayfa vardı.

İşlem sonunda “run-time error’1004’: Method’Open’ of object ‘Workbooks’ failed hatası verdi

Debug dediğimde “Set wbSource = Workbooks.Open(MyPath & "\" & MyFile)” sarı renk ile işaretledi

Yeni exceli kaydettim. Ama istediğim excelleri tek excelde toplamış oldum.

Yukarıda bahsettiği hatayı da düzeltebilirsek memnun olur, Saygılar sunarım

 

[alicox]

merhablar
veri / birleştir seçeneği işinizi görürmü acaba

hayır olmuyor, excel 2010 olduğu için olabilir mi, nasıl yapılacağını açıklayabilir misiniz

 

[VetExc]

İlk önce size teşekkür etmek istiyorum.

İşlem sonunda “run-time error’1004’: Method’Open’ of object ‘Workbooks’ failed hatası verdi

Debug dediğimde “Set wbSource = Workbooks.Open(MyPath & "\" & MyFile)” sarı renk ile işaretledi

Yeni exceli kaydettim. Ama istediğim excelleri tek excelde toplamış oldum.

Yukarıda bahsettiği hatayı da düzeltebilirsek memnun olur, Saygılar sunarım

Rica ederim. Ben boş yeni bir excel açtım.. başka tüm excelleri kapattım.. kodu yeni boş excelde denedim hiçbir hata almadım.. muhtemelen siz birleştirmek istediğiniz excellerde kodu denmişsinizdir. Yada birleştirmek istediğiniz exceller açıktır ondan hatayı almışsınızdır diye düşünüyorum.. Eğer bu ihtimallerden kaynaklanmıyorsa forumda diğer üstadlardan alteenatif çözüm önerileri gelebilir.. iyi çalışmalar..

NOT: Yeni oluşturduğunuz BOŞ excel çalışma kitabı ile diğer bitleştireceğiniz excel çalışma kitapları aynı isimde olmamalıdır. Biliyorsunuz ki 2 tane aynı isimde excel dosyası açılmaz.

 

[alicox]

Rica ederim. Ben boş yeni bir excel açtım.. başka tüm excelleri kapattım.. kodu yeni boş excelde denedim hiçbir hata almadım.. muhtemelen siz birleştirmek istediğiniz excellerde kodu denmişsinizdir. Yada birleştirmek istediğiniz exceller açıktır ondan hatayı almışsınızdır diye düşünüyorum.. Eğer bu ihtimallerden kaynaklanmıyorsa forumda diğer üstadlardan alteenatif çözüm önerileri gelebilir.. iyi çalışmalar..

NOT: Yeni oluşturduğunuz BOŞ excel çalışma kitabı ile diğer bitleştireceğiniz excel çalışma kitapları aynı isimde olmamalıdır. Biliyorsunuz ki 2 tane aynı isimde excel dosyası açılmaz.

Bende boş excel açtım, başka exceller kapalıydı, kodu yeni açtığım excele yazdım kod çalıştı ve exceller tek tek boş excele geldi, ancak gelen exceller bağlantılı geldi, bağlantılarını kestiğimde makro olanları çalıştıramadım. Makrolar gelmemişti. Sonuç olarak elinize sağlık işimize yarayan bir çalışma oldu