Aynı işlemi çok sayıda excel dosyasına uygulamak

[mufsata]

Merhaba, elimde 8000 adet excel dosyası var ve temelde hepsi aynı biçimde doldurulmuş. Bu dosyaların hepsinde uygulayacağım bir işlem var bunu nasıl yapabilirim?

Örnek vermem gerekirse, dosyanın C stününda ki değerlerden 1000den küçük olanları ve 1500den büyük olanları bi renge boyamalıyım, D stünundaki değerlerden 25 den küçük ve 35 den büyük olanları bi renge boyamam gerekli. Benzer şekilde 4 stünda boyama yapacağım. Verilerin tamamında da 0 olan değerleri bi renge boyamam gerekiyor. Bu işlemleri tek dosya için koşullu biçimlendirmeyle yapabiliyorum ancak bu aynı işlemi 8000 dosyaya uygulamam gerekli. Bunun bir kısa yolu var mıdır?

 

[Asri]

dosya.tc ye örnek dosya paylaşabilir mi siniz?

 

[mufsata]

DEĞER 1 : 1000 altındakiler sarı, 1200 üzerindekiler kırmızı
DEĞER 2 : 28 altındakiler sarı, 34 üzerindekiler kırmızı

DEĞER 4 : 600 altındakiler sarı, 750 üzerindekiler kırmızı
DEĞER 5 : 28 altındakiler sarı, 34 üzerindekiler kırmızı

DEĞER 7 : 1100 altındakiler sarı, 1375 üzerindekiler kırmızı
DEĞER 8 : 29 altındakiler sarı, 35 üzerindekiler kırmızı

DEĞER 10 : 550 altındakiler sarı, 650 üzerindekiler kırmızı
DEĞER 11 : 32 altındakiler sarı, 38 üzerindekiler kırmızı

Tüm değerler için de 0 olanlar mavi

Bu şekilde renklendirmem gereken 1000 adet veri dosyası bulunuyor

 

[mufsata]

Tüm dosyalarda benzer veriler aynı sütunda yer alıyor. Sadece veri adetleri farklılık gösteriyor. Bazılarında bi sütunda 80 veri varken bazı dosyalarda 100 olabiliyor.

 

[mufsata]

Ek olarak, dosyayı açmaya çalıştığımda şu şekilde bir hata mesajıyla karşılaşıyorum. EVET dedikten sonra normal bir biçimde açılıyor.

 

[Asri]

DEĞER 1 : 1000 altındakiler sarı, 1200 üzerindekiler kırmızı
DEĞER 2 : 28 altındakiler sarı, 34 üzerindekiler kırmızı
..................
Bu şekilde renklendirmem gereken 1000 adet veri dosyası bulunuyor

Özellikle www.dosya.tc demiştim.

 

[mufsata]

Özellikle www.dosya.tc demiştim.

http://s5.dosya.tc/server/ccpclp/ornek.xlsx.html

 

[Asri]

Program referans bir excel dosyasındaki sayfanın tüm bçimlerini, belirli bir klasördeki tüm excel sayfalarıdaki belirli bir sayfasına uygular.

Link deki dosyayı indirip deneyiniz.

http://asriakdeniz.com/excel-tum-dosyalari-bicimlendirme-programi

 

[mufsata]

Program referans bir excel dosyasındaki sayfanın tüm bçimlerini, belirli bir klasördeki tüm excel sayfalarıdaki belirli bir sayfasına uygular.

Link deki dosyayı indirip deneyiniz.

http://asriakdeniz.com/excel-tum-dosyalari-bicimlendirme-programi

Hemen deniyorum, teşekkürler :yazici:

 

[mufsata]

Program referans bir excel dosyasındaki sayfanın tüm bçimlerini, belirli bir klasördeki tüm excel sayfalarıdaki belirli bir sayfasına uygular.

Link deki dosyayı indirip deneyiniz.

http://asriakdeniz.com/excel-tum-dosyalari-bicimlendirme-programi

Nasıl kullanmam gerektiği hakkında biraz bilgi verebilir misiniz?

"Compile Error: Cant find project or library" Hatası alıyorum.

http://s4.dosya.tc/server/67yxh3/ekrerk.JPG.html

bu şekilde yaptım ancak yukarıdaki hatayı alıyorum. Birleştirmeye başla dediğimde hangi dosyayı seçmem gerekli? Referansı da seçsem, değiştirmek istediğim dosyaları da seçsem aynı hatayı alıyorum.

 

[Asri]

VBA bölümünde Tools , References bölümünde gelin.

Aaşağıdaki başlıkları seçili yapıp OK deyin.

Excel i kapatıp açıp tekrar dener misiniz.

Visual Basic For Application
Microsoft Excel 14.0 Object Library
OLE Automation
Microsft Office 14.0 Object library
Microsft Word 14.0 Object library

Diğer bir konu düm dosyalar aynı yapıda demiştiniz.
Program menu kısmında sadece ikinci satırı dikkate alır.
Yani tek bir kaynak klasör, tek bir kaynak sayfa adı ve tek bir referans sayfa adı kabul ediyor.

Kısacası tüm dosyalarda aynı sayfa adı var olduğunu var sayar.

 

[mufsata]

İçerikler aynı yapıda fakat sayfa adıyla dosya adı aynı. Yani her sayfa farklı isimde kayıtlı. Bu şekilde olunca sanırım çalışmıyor sistem. Önce Sayfa adlarını aynı yapmam gerekiyor anladığım kadarıyla :frown:

 

[Asri]

İçerikler aynı yapıda fakat sayfa adıyla dosya adı aynı. Yani her sayfa farklı isimde kayıtlı. Bu şekilde olunca sanırım çalışmıyor sistem. Önce Sayfa adlarını aynı yapmam gerekiyor anladığım kadarıyla :frown:

Sayfa adlarını aynı yapmak ile uğraşmayın. Programa sayfa numarası yada sayfa adı ile çalışma özelliği eklerim.

Siz dediğim şekilde bir deneme yapın. İşinize yarıyor mu? Ona bakalım.

 

[Asri]

Dosyayı güncelledim.

Sayfa numarası yada sayfa adından birini girerekhedef dosyaların biçimlerini değiştirebilir siniz.

Önemli bir nokta hedef dosyaların tamamız aynı sıra numarasında olmalı.
Örneğin hepsi Sayfa1 de yada 1. sıradaki sayfada olmalı.

1. sıradaki sayfa için sayfa numarasına 1 girin.
3. sıradaki sayfa için sayfa numarasına 3 girin.

* Hedef klasörde sadece biçimlendirme yapılacak dosyalar olmalı ( Program ve şablon dosya farklı bir klasörde olmalı)

* Program ve şablon dosya aynı klasörde olmalı. Hedef klasörde bulunmamalı.

* Sablon dosyasının bir kopyası aynı isim ile hedef klasörde olmamalı.

 

[mufsata]

Dosyayı güncelledim.

Sayfa numarası yada sayfa adından birini girerekhedef dosyaların biçimlerini değiştirebilir siniz.

Önemli bir nokta hedef dosyaların tamamız aynı sıra numarasında olmalı.
Örneğin hepsi Sayfa1 de yada 1. sıradaki sayfada olmalı.

1. sıradaki sayfa için sayfa numarasına 1 girin.
3. sıradaki sayfa için sayfa numarasına 3 girin.

Teşekkürler hemen tekrar deniyorum.

 

[mufsata]

Dosyayı güncelledim.

Sayfa numarası yada sayfa adından birini girerekhedef dosyaların biçimlerini değiştirebilir siniz.

Önemli bir nokta hedef dosyaların tamamız aynı sıra numarasında olmalı.
Örneğin hepsi Sayfa1 de yada 1. sıradaki sayfada olmalı.

1. sıradaki sayfa için sayfa numarasına 1 girin.
3. sıradaki sayfa için sayfa numarasına 3 girin.

"Run-time error '9':

Subscript out of range "

Diye bir hata alıyorum. Debug'a tıkladığımda "Windows(sablondosya).Activate" satırı sarı ile vurgulanmış.

Biçimlemeye başla dediğimde referans dosyayı seçmem gerekiyor değil mi?

 

[Asri]

"Run-time error '9':

Subscript out of range "

Diye bir hata alıyorum. Debug'a tıkladığımda "Windows(sablondosya).Activate" satırı sarı ile vurgulanmış.

Biçimlemeye başla dediğimde referans dosyayı seçmem gerekiyor değil mi?

Biçimlendirmeye başla dediğiniz de referans dosyayı seçmeniz yeterli,
bir de hedef dosyaların yolu A2 de tanımlanmış olması gerekiyor. c:\deneme klsörü gibi.

 

[mufsata]

Dediğiniz gibi yaptım ancak aynı runtime error u alıyorum. Biçim boyacısıyla kopyalayabiliyorum sanırım. Simdi makro bölümüne bi konu açtım. Bu biçim boyacısını kullanarak tüm dosyalara uygulayacak bi makro yazmaya çalışacağım. Bir de Tools>references ın içinde dediklerinizi işaretledim ancak bendekiler 12.0, sizin söylediğiniz 14.0
Bu bi sorun teşkil eder mi?

 

[Asri]

Office 2010 TR kullanıyorum, herhangi bir sorun yok. Sablon dosyasındaki formatı 6 farklı dosyaya program ile uyguluyorum ve sorunsuz çalışıyor.

yaptığınız işlemleri bir video olarak yada ekran ekran gösterebilir mi siniz?
Debug değinizde sarı alanda sablondosya ve diğer değişkenlerin üzerine geldiğinizde değerlerini gösterir. Onları yazabilir mi siniz?

14. Mesajda gerekli bilgilendirme yapıldı.

Bu şekilde deneyiniz.

 

[mufsata]

Çok teşekkürler hocam tüm yardımlarınız için. İki gündür uğraştırdım baya. Emeğinize sağlık. :dua::dua::mutlu: