Bir çalışma sayfasını birden çok dosyaya kopyalama

Katılım
25 Nisan 2005
Mesajlar
66
Excel Vers. ve Dili
excel 2000 Türkçe
Selamlar.
Bir çalışma sayfasını kapalı olan 620'e yakın excel dosyasına kopyalamak
istiyorum. Amacım bir dosyada yaptığım değişiklikleri diğer dosyara kopyalamak.
Ekli dosyadaki Aylık toplam çalışma sayfasını kapalı olan diğer dosyalara kopyalamak.
Ek bilgi: aylık toplam sayfası diğer dosyalardada var.
Not: dosya adları ocak,şubat,mart........,aralık. Örneğin ocak isimli excel dosyası hard diskin değişik dizinlerinde (52 dizin) var.
 
Katılım
22 Haziran 2005
Mesajlar
998
Excel Vers. ve Dili
Office 2007 Türkçe
Ek bilgi: aylık toplam sayfası diğer dosyalardada var.
1-Aylık toplam sayfasındaki değişen verilerimi diğer dosyalarda değiştirmek istiyorsunuz?
2-Diğer dosyalardaki Aylık Toplam sayfalarını silip Yenisinimi kaydetmek istiyorsunuz.
3-Diğer dosyalardaki Aylık Toplam sayfalarını simeden Yenisinimi kaydetmek istiyorsunuz.
 
Katılım
25 Nisan 2005
Mesajlar
66
Excel Vers. ve Dili
excel 2000 Türkçe
Silerek kopyalama

1-Aylık toplam sayfasındaki değişen verilerimi diğer dosyalarda değiştirmek istiyorsunuz?
2-Diğer dosyalardaki Aylık Toplam sayfalarını silip Yenisinimi kaydetmek istiyorsunuz.
3-Diğer dosyalardaki Aylık Toplam sayfalarını simeden Yenisinimi kaydetmek istiyorsunuz.
İlginiz için teşekkür ederim.
Aslında ilk iki seçenekte işimi görür. Sanırım silerek kaydetmek daha çok insanın işine yarayabilir. Bu nedenle silerek yenisini kaydetmek konusunda yardımcı olursanız sevinirim.
Saygılarımla.
 
Katılım
25 Nisan 2005
Mesajlar
66
Excel Vers. ve Dili
excel 2000 Türkçe
Silerek kopyalama

1-Aylık toplam sayfasındaki değişen verilerimi diğer dosyalarda değiştirmek istiyorsunuz?
2-Diğer dosyalardaki Aylık Toplam sayfalarını silip Yenisinimi kaydetmek istiyorsunuz.
3-Diğer dosyalardaki Aylık Toplam sayfalarını simeden Yenisinimi kaydetmek istiyorsunuz.
ilk iki çözümde benim işimi görür. Ama sanırım silerek yapılacak uygulama herkesin daha çok işine yarar. O nedenle silerek yapmak mümkünse onu rica ediyorum.
Herkese teşekkürler.
 
Katılım
25 Nisan 2005
Mesajlar
66
Excel Vers. ve Dili
excel 2000 Türkçe
Herhangi bir çözüm yok galiba. Yada ben soruyu yeterince açıklayamadım.
Genede siteye emeği geçen herkese teşekkürler.
Saygılarımla.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,058
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Klasörlerin yollarınından bir kaç tane örnek verirmisiniz.

Bu klasörler tekbir ana klasörde toplanamazmı?
 
Katılım
25 Nisan 2005
Mesajlar
66
Excel Vers. ve Dili
excel 2000 Türkçe
klasör yolu

Klasörlerin yollarınından bir kaç tane örnek verirmisiniz.

Bu klasörler tekbir ana klasörde toplanamazmı?
Öncelikle bu kadar geç yanıt verdiğim için özür dilerim.
c:\analiz\ham\10200\ocak.xls
c:\analiz\ham\10200\şubat.xls
.....
.....
c:\analiz\mam\90200\ocak.xls
c:\analiz\mam\90200\şubat.xls
.....
.....

ham hammaddeler için bir dizin onun altında her hammadde için bir dizin ( 28 çeşit hammadde)
mam mamüller için bir dizin onun altında her mamul için bir dizin ( 24 çeşit mamül)

dosya adları hep ocak, şubat, mart ........, aralık.xls olduğundan tek bir dizine
toplamak mümkün değil.

Dostça paylaşımlarınız için Teşekkür ederim.
Saygılarımla.
 
Katılım
22 Haziran 2005
Mesajlar
998
Excel Vers. ve Dili
Office 2007 Türkçe
Sayın mustafa58 istediğiniz uygulama ektedir.

Uygulamanın nasıl kullanıldığına dair yardım mevcuttur.
Uygulamayı kullanmadan önce yardım bölümünü muhakkak okuyunuz.
 
Katılım
25 Nisan 2005
Mesajlar
66
Excel Vers. ve Dili
excel 2000 Türkçe
Teşekkürler

Sayın mustafa58 istediğiniz uygulama ektedir.

Uygulamanın nasıl kullanıldığına dair yardım mevcuttur.
Uygulamayı kullanmadan önce yardım bölümünü muhakkak okuyunuz.
Çözüm için gönderdiğiniz dosyayı açtım. Kaynak ve hedef dosyalar benim bilgisayarımda olmadığı için deneme yapamıyorum.
Ama soruna yaklaşım biçiminiz beni çok etkiledi. Harcadığınız emek için
kuru bir teşekkür dışında birşeyler yapmak isterdim.
Siteyle ilgilenen herkese çok teşekkür ediyorum.
Saygılarımla.
 
Katılım
25 Nisan 2005
Mesajlar
66
Excel Vers. ve Dili
excel 2000 Türkçe
Herkesin işine yarayabilir

Sayın Alpi'nin gönderdiği dosya üzerinde biraz düşününce bu siteden faydalanmayı düşünen herkesin işine yarayacağını anladım. Bence bu dosyaya örnek uygulamalar kısmına koyulmalı diyorum.
Saygılarımla.
 
Katılım
22 Haziran 2005
Mesajlar
998
Excel Vers. ve Dili
Office 2007 Türkçe
Sayın Mustafa yaptığım uygulamanın aslında o kadar da abartılacak bir tarafı yok. Evet emek verdim ancak bu sadece yarım saat yada bir saatlik kadar bir emek. Excelin mantığını anladığınızda ve diğer programlama dillerinden en az birini bildiğinizde bu uygulamanın abartılacak bir tarafı olmadığını aslında sizde görürsünüz.
Yardımcı olabildiğim için mutlu oldum.
 
Katılım
22 Haziran 2005
Mesajlar
998
Excel Vers. ve Dili
Office 2007 Türkçe
Sayın Mustafa belirttiğiniz Gözat satırındaki hata Excel Versiyonlarımızın farklı olmasından kaynaklanıyor. Dosyanızı yeniden düzenledim umuyorum ki şimdi hata vermeyecektir.
 
Katılım
25 Nisan 2005
Mesajlar
66
Excel Vers. ve Dili
excel 2000 Türkçe
Gene hata alıyorum.

Sayın Mustafa belirttiğiniz Gözat satırındaki hata Excel Versiyonlarımızın farklı olmasından kaynaklanıyor. Dosyanızı yeniden düzenledim umuyorum ki şimdi hata vermeyecektir.
Sayın Alpi
Kaynak dosya kısmı istenen dosyayı açıyor.sorun yok.
ama hedef dosya kısmı tıklandığında
runtime error 438
Object doesn't support proporty or method
mesajı veriyor.

Debub tıklandığında
btnHedefGözat kısmında altıncı satırı gösteriyor.
.hWndOwner = Application.hWnd
sayfaları seçerek ve seçmeden 4,5 kez denedim.
ikinci birşey benim kaynak dosyam hep aynı o nedenle
ilk yazdığımı aklında tutarsa iyi olur.

Evde internet bağlantım olmadığı ve işyerinde sınırlı zamanlarda internete
erişebildiğim için size geç dönüyorum kusura bakmayın.
Saygılarımla.
 
Katılım
22 Haziran 2005
Mesajlar
998
Excel Vers. ve Dili
Office 2007 Türkçe
Belirttiğiniz hatalı satırı silin.

Kaynak dosya adını unutmaması içinde şunu yapın

1-btnKaynakGözat_Click olayının en alt satırına
Kod:
Sayfa1.[A1] = Gözat
2-UserForm_Initialize olayının en alt satırına
Kod:
txtKaynak.Text = Sayfa1.[A1]
yazın.
 
Katılım
25 Nisan 2005
Mesajlar
66
Excel Vers. ve Dili
excel 2000 Türkçe
Kopyalama başarılı

Belirttiğiniz hatalı satırı silin.

Kaynak dosya adını unutmaması içinde şunu yapın

1-btnKaynakGözat_Click olayının en alt satırına
Kod:
Sayfa1.[A1] = Gözat
2-UserForm_Initialize olayının en alt satırına
Kod:
txtKaynak.Text = Sayfa1.[A1]
yazın.
Sayın alpi
son uyarılarınızı uyguladım kopyalama işlemini başarılı bir şekilde yapıyor.
ama iki sorun var.

1- Kaynak dosyanın master.xls olduğunu varsayarsak ocak.xls, şubat.xls ......
adlı dosyalara kopyalama yaptığında (aylık toplam sayfasını kopyalıyorum)
formüldeki adresler aynen masterdeki gibi gelmek yerine
C:\Documents and Settings\alfa\Desktop\analiz\[master.xls]01..2006'!$F$3 şeklini alıyor oysa orjinalini korumalı yani
= '01..2006'!$F$3
= '02..2006'!$F$3
gitmeli. Yani master dosya ile bağlantı kuruyor bu olmamalı.

2- Dosyada aynı adlı sayfa var olduğu için aylık toplam (2) diye ikinci bir sayfa açıyor. Oysa sizin menünüzde Hedef dosyada aynı adlı sayfa varsa sil
diye bir seçim var orası işaretli.

Sizlere zahmet verdiğim için kusura bakmayın. Hepinizin eline ve beynine sağlık.
Teşekkürler.
 
Üst