Çözüldü Makro ile Excel Verilerini Word Programına Yazdırma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
M

mftomas

Normal Üye

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
 

Ekli dosyalar

  • Satislar.xlsx
    264.9 KB · Görüntüleme: 4
Moderatörün son düzenlenenleri:
Tarihe göre sırala Oylamaya göre sırala
Öncelikle: VBE'de tools-references'dan Microsoft Word 1x.0 Object Library işaretlenmelidir. Aksi halde hatalı davranır.
VBA: 
Görüntülemek için giriş yapmalısınız.
(144 satır)

EKRAN GÖRÜNTÜSÜ

Ekran Alıntısı.webp
 

Ekli dosyalar

  • Satislar tomas.xlsx
    264.9 KB · Görüntüleme: 5
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
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: 
Görüntülemek için giriş yapmalısınız.
(145 satır)
 

Ekli dosyalar

  • Satislar tomas.xlsm
    279.5 KB · Görüntüleme: 8
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 Daha Fazlası
Konuyu başlatan
M
mftomas
Normal Üye
Katılım
Konu Bilgi
Durum
Çözüldü 
Forum
Excel Makro Soruları
Başlangıç tarihi
Son yanıt tarihi
Cevaplar
15
Çözüldü
Çözümü Görüntüle
Geri
Üst