Hücre değerine göre çıktı alma

[hakankilic]

Merhaba, hücre değeri değişken, örneğin:" T1 HÜCRESİ (1), T2 HÜCRESİ (9), ÇIKTI ALIRKEN - İLK SAFYA (1) - SON SAYFA (9) - KOPYA SAYISI (1)" Yapıp yazıcıdan çıktı almak istiyorum. Bunu makro kaydet ile yapamadım. Saygılarımla.

 

[Ömer]

Merhaba,

Bu şekilde deneyin. Kopya sayısı kırmızı işaretli bölümdür.

Sub Yazdir()
    
    On Error GoTo atla
    
    ActiveSheet.PrintOut From:=[T1], To:=[T2], Copies:=[B][COLOR="Red"]1[/COLOR][/B]
    Exit Sub
atla:
    MsgBox "T1 Ve T2 Hücresini Kontrol Edin.!"
    
End Sub

.