Makro ile Excel Verilerini Word Programına Yazdırma

Makro ile Excel Verilerini Word Programına Yazdırma

  • Konuyu başlatan Konuyu başlatan mftomas
  • Başlangıç tarihi Başlangıç tarihi
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

mftomas

Kullanıcı
Katılım
28 Tem 2022
Mesajlar
7
Günlerdir bu uygulama için uğraşıyorum araştırıyorum ancak kayda değer bir şey bulamadım. Yardımcı olursanız çok sevinicem.

"Satislar.xlsx" Excel çalışma kitabındaki satış kayıtlarını tarayarak, her satış elemanına hitaben, ekte bulunan "OrnekDokum.docx" belgesinin bir kopyasını oluşturmak için bir VBA fonksiyonu yazmaya çalışıyorum. Bu fonksiyon oluşturduğu döküm kopyasındaki tabloya ilgili elemanın yıllık satış toplamlarını yerleştireceğim, eleman her yıl 100bin TL üstü satış yapmışsa tablodan sonraki bir paragrafta bunu belirtip elemanı tebrik eden ifadeler eklemelidir.
Bu işin çözümü Excel VBA projesinden Word programını açıp Excel açıkken Word belgeleri oluşturmayı gerektirecek.

Adsız.webp
 
ComboBox Items Remove ile Silme
UserForm Nesnesinin Application Visible Durumunu Kontrol Etme

Ekli dosyalar

Tarihe göre sırala Oylamaya göre sırala
@MemolIPayne alıntı olduğunu belirtseydin keşke :). Neyse yapmış olduğum bu çalışmanın 2.versiyonunu atıyorum. Her yıl için özel tebrik yazıyor. ADO bağlantı kodlarını sadeleştirdim.
 
Oyla 0 Olumsuz oyla
Öncelikle: VBE'de tools-references'dan Microsoft Word 1x.0 Object Library işaretlenmelidir. Aksi halde hatalı davranır.
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(144 satır)

EKRAN GÖRÜNTÜSÜ

Ekran Alıntısı.webp
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
Tebrik mesajları alt alta liste olarak sıralanıyor. Sıralaması bittiğinde (uzun bir sıralama) word'ü kapatıp yeni word açıyor ve tebrik için tablo oluşturup tekrar kapatıyor. Hepsi tamamlanana kadar sayısız word dosyası açıp tablo oluşturup kapatıyor.

Tebrik mesajları da şöyle, "İstanbul yılında TL üzeri satış yaptınız. Tebrik ederiz " :)
 
Oyla 0 Olumsuz oyla
Yukarıda bir ekran görüntüsü atmıştım, gördün mü onu. bende öyle çıkıyor tebrik mesajları. Kapatıp açma işine de gelince her personele özel doc oluşturup kapatıyor.
 
Oyla 0 Olumsuz oyla
Sütün başlıklarını kontrol et. İlgili sütun başlığının altında ilgili veriler olması gerek. Yani sütun başlıklarını baz alarak yapıyor.
 
Oyla 0 Olumsuz oyla
Benimkinde Microsoft Word 1x.0 Object Library yoktu. Bende Microsoft Word 12 Object Library vardı onu işaretledim. Problem bundan çıkıyor olamaz değil mi?

metehan8001' Alıntı:
Sütün başlıklarını kontrol et. İlgili sütun başlığının altında ilgili veriler olması gerek. Yani sütun başlıklarını baz alarak yapıyor.
Genişletmek için tıklayın ...

Kontrol edeyim bi hemen
 
Oyla 0 Olumsuz oyla
mftomas' Alıntı:
Benimkinde Microsoft Word 1x.0 Object Library yoktu. Bende Microsoft Word 12 Object Library vardı onu işaretledim. Problem bundan çıkıyor olamaz değil mi?
Genişletmek için tıklayın ...
Yok bundan dolayı yapmaz.
Microsoft Word 12.0 Object Library
Microsoft Word 13.0 Object Library
Microsoft Word 14.0 Object Library
Microsoft Word 15.0 Object Library
Microsoft Word 16.0 Object Library hangisi varsa onu işaretle.
 
Oyla 0 Olumsuz oyla
Dediğim gibi bende normal çalışıyor. Ben yinede kodlara ufak bir müdahale ettim. Yüklendiğim dosyayı indir dene.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(145 satır)
 

Ekli dosyalar

Oyla 1 Olumsuz oyla
16 olması önemli değil hangisi varsa onu yapacaksın ve dosyayı pc başında arkadaşa gönderdim normal çalışıyor bilgisini verdi.

Makroların çalışması için güvenlik düzeyini düşüğe ayarlamak gerekiyor.
Excelde makroları etkin kılmak için.
*Önce araçları seçelim.
*Makro>Güvenlik seçelim.
*En sondaki düşük önerilmez seçip ve tamam tuşuna basalım.
Exceli kapatıp tekrar açalım.

Dosyayı ilk açtığında içeriği ve makroyu etkinleştireceksin.

İçerik .webp
 
Oyla 0 Olumsuz oyla
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt