DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Kardeş ilgilendiğin için teşekkürler ama ben bunu sormamıştım.Hazırladığım mesaj makrosunu baskıönizleme ve yazdır düğmelerine eklemek istiyorum.Yani bu düğmelere bastıklarında önizleme ve yazdırma bölümü açılmayacak mesaj çıkacak.Sub baskıonizleme()
Range("A1:I28").Select ' yazdırılacak olan alan
ActiveSheet.PageSetup.PrintArea = "$A$1:$I$28" ' yazdırılacak olan alan
ActiveWindow.SelectedSheets.PrintPreview
End Sub
Sub yazdır()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
Kardeş o düğmelere sağ tıkladığımda makro ata diye birşey çıkmıyorki.Sen nereye makro atamak istediğimi tam okudun umarım.Üstteki yazdır butonuna makro atamak istiyorum.Bir düğmeye sağ tıkladığında makro atayı tıklayarak makroların listesi karşınıza çıktığında makronuzu seçin(eğer makronuz hazırsa).İyi çalışmalar.
Sayın muokumus,merhabalar.mami 68 düğme 1i nerden buluyoz office 2007de
Ona bastığımda yazdırma seçenekleri değilde hazırladığım makronun çalışmasını istiyorum.Teşekkürler yinede ilgin için.Bu konuda bilgin varsa yardım edersen sevinirimQUOTE]
Biz aynı şeyi konuşuyoruz ama algılamada bir sorun var,yada ben iyi cevap veremedim, yada uygulamasını yerine getiremediniz.
Bir yerlerde hata yapmışsınız sanırım. Kodları dosyaya ekledim ve butona atadım. Gayet güzel çalışıyor. Yalnız unutmayın A2:A61 aralığı dolu olacak, aksi takdirde kurada boş hücreyi çakebilirsiniz.http://www.excel.web.tr/showthread.php?t=57413&highlight=rastgele
bu sayfadaki kodu düğme oluşturdum.kod görüntüleyi açtım oraya kopyaladım. end debug diye uyarı verdi.ben hiç makro bilmiyorum.en baştan anlatabilirmisiniz
Bir önceki msjda açıkladığım şekilde...kardeş iyi güzel yapmışsın.ama nasıl atadın onu soruyorum.ama çalıştır komutuna basınca bi değişiklik olmuyor.