Excelden worde çıktı gönderme

[mekanican]

Ekte ücret isimli bir excel bir de word dosyas var. Excel dosyasında kriterlere göre elemanın ücretini hesaplatıp yazdır butonuna tıklandığında word dosyasındaki boşlukları otomatik olarak doldurup yazıcıdan çıktısını almak istiyorum. Acaba böyle birşey mümkün mü ya da bu işin daha kolay bir yolu var mı?
Yardımlarınız için şimdiden çok teşekkürler.

 

[serbestmali]

DOSYAYI SIKIÞTIRMADAN G�NDER
İLGİLENMEYE ÇALIÞALIM

 

[mekanican]

Tekrar gönderiyorum.
İlginiz için çok teşekkürler

 

[cyberwolf1980]

mekanican, bıraz daha detaylı bı ornek verebılırmısın lutfen excel dosyasının ıcı bos gorunuyor ??

 

[mekanican]

Dosyayı Vb düzenleyicisi ile oluşturdum. Başlangıçta otamatik olarak açılmasını beceremedim. alt+F11 ile açıyorum dosyayı

 

[cyberwolf1980]

mekanican, ok bı bakayım

 

[mekanican]

Arkadaşlar yardımlarınızı bekliyorum. En azından bahsettiğm şey mümkün mü değil mi onu öğreneyim. Worden çıktı almam şart değil üstte bahsettiğim formatta çıktı alablirsem o da yeter.

 

[Necdet]

Sayın mekanican,

Sizin işinize en uygun çözüm Word de Mail Merge (Adres Mektup Birleştirme).

Aşağıdaki linki inceleyiniz.
http://www.excel.web.tr/viewtopic.php?t=880

Ayrıca bu işin nasıl yapıldığını anlattığım word dosyasını gönderiyorum. Gönderdiğim versiyon word 2000 için geçerli 2002 yi bilmiyorum 2003 te Mail Merge ü değiştirmişler ama fikir verir.

 

[Necdet]

Aslında bu çalışma Excel dersanesinde yayınlansa iyi olur.
Gerekirsi 2003 versiyonunu da hazırlarım.
Office 2002 kullananlar varsa yukarıdaki açıklamam onlara uyuyor mu uymuyor mu merak ediyorum.

 

[Levent Menteşoğlu]

Aslında bu çalışma Excel dersanesinde yayınlansa iyi olur.

Sn Necdet bey bu önerinizle ilgileneceğim.

 

[Necdet]

Teşekkürler levent Bey,
bu mesajı yazarken siz yoktunuz, nerden nasıl gördünüz size moderatör değil süpermen demek gerek

 

[Levent Menteşoğlu]

Teşekkürler Necdet bey, foruma az önce girdim. İlk sıradada sizin mesajınız vardı.

 

[Necdet]

Bu arada Levent, Word kullanarak etiket dökümünü de göndereyim size, malum yılbaşı geliyor kart göndermek isteyenler zorlanmasınlar, boşuna etiket programı aramasınlar, ne dersiniz? onu da yayınlamak olası mı?

 

[Levent Menteşoğlu]

boşuna etiket programı aramasınlar, ne dersiniz? onu da yayınlamak olası mı?

Elbette mümkün. Onuda ekleyin veya e-mail ile gönderin.

 

[Necdet]

e-mail ile yollayacam SüperModeratör Levent Bey

 

[mekanican]

Necdet bey çok teşekkür ediyorum. Sanırım problemi çözebileceğim. Uğraşmaya başlıyorum. Becerebilirim inşallah.

 

[mekanican]

Necdet Bey sanırım yaptım. Çok teşekkür ediyorum beni büyük dertten kurtardınız. Dosyalar ekte incelerseniz sevinirim.

 

[unur]

Merhaba;
Excel sayfasına eklediğimiz bir butonla Açık olan word sayfasını yazdırabileceğim bir makro varmı?

Teşekkürler.
Necdet Beyin linkini açamadım.

 

[leumruk]

Merhaba,
Açık olan word dosyasını aşağıdaki kodla yazdırabilirsiniz.

Sub ExceldenWordYazdır()
    Set WD = GetObject(, "Word.Application")
    WD.PrintOut
End Sub

 

[unur]

Çok Teşekkürler leumruk hemşehrim.