köprü

[halley]

excele bir tane yazıcı resmi yapıştırdım.yalnız bu resme tıkladığımda (ctrl p) yazıcı ile yazdırma olayı faaliyet geçebilirmi???

 

[Korhan Ayhan]

Selamlar,

İlk olarak yazım kurallarına lütfen uyalım. (Soru başlığınızı aramalar için daha açıklayıcı şekilde düzeltebilirmisiniz.)

Cevabınıza gelince aşağıdaki kodları inceleyiniz.

Sub YAZICI_PENCERESİ()
    Application.Dialogs(xlDialogPrint).Show
End Sub

Sub ÖNİZLEME_YAZDIR()
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=True, Collate:=True
End Sub

Sub YAZDIR()
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

 

[halley]

olmadi sanirim

resme tıkladığımda yazıcının faaliyete geçmesini istiyorum.

 

[Korhan Ayhan]

Selamlar,

Ekte örnek dosyanızda gerekli düzenlemeyi yaptım incelermisiniz.

 

[halley]

teşekkür ederim

olmuş da kendi sayfamda makroyu kopyaladım olmadı.yeniden normal cari hs.gönderiyorum.orda tekrar yaparsanız sevinirim.

 

[Korhan Ayhan]

Selamlar,

İlk olarak resmin yazıcıdan yazdırılmaması için aşağıdaki işlemi yapın.

Resim üzerinde sağ tıklayın. Resim Biçimlendir-Özellikler penceresinden "Nesneyi Yazdır" seçeneğinin çentiğini kaldırın.

Bu işlemden sonra yine resim üzerinde sağ tıklayın. Makro Ata seçeneğini seçin. Açılan pencerede "YAZDIR" isimli makroyu seçip "TAMAM" derseniz istediğiniz işlem gerçekleşecektir.

 

[halley]

çooook sağol

peki bunun gibi başka resimler de ekleyebilirmiyiz.örneğin (büyüteç resmini)önizleme yapmak içinde makroyamı ihtiyaç vardır.
ayrıca bu makroyu nasıl öğrenebilirim.(program yapmayı):hey:

 

[Korhan Ayhan]

Selamlar,

Eğer resim ekleyerek menüleri kullanmak istiyorsanız evet makro ile bu işlemleri yapmanız gerekir.

Makroları öğrenmek istiyorsanız eğer sitemizin "MAKROLAR" bölümünü detaylıca incelemenizi ve verilen örnek kodları boş vakitlerinizde test ederek çalışma mantıklarını kavramanızı öneririm.

Önizleme için aşağıdaki kodu kullanabilirsiniz.

Sub ÖNİZLEME()
    ActiveWindow.SelectedSheets.PrintPreview
End Sub

 

[halley]

tebrik eder başarılarınızın devamını dilerim.

çoook çoooook sağolun.:hey: