Hai NangAgus,

coba manfaatkan event before print milik this workbook
kira-kira scriptnya seperti ini:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Dim sht As Worksheet, sSht As String

    Application.DisplayAlerts = False
    sSht = "nama_worksheetnya"
    For Each sht In ActiveWorkbook.Windows(1).SelectedSheets
        If sht.Name = sSht Then
            Cancel = True
        End If
    Next sht
    Application.DisplayAlerts = True
End Sub



وَسَّلاَمُ عَلَيْكُمْ وَرَحْمَةُ اللهِ وَبَرَكَاتُهُ

-Miss Jan Raisin-

*>>> Untuk kepentingan belajar bersama, pertanyaan ditujukan ke
[email protected];*
*>>> Jika pertanyaan lama direspon, bersabarlah karena ALLAH beserta dengan
orang-orang yang sabar QS 2:153;*


Pada 12 Juni 2013 10.04, nangAgus <[email protected]> menulis:

> **
>
>
> Salam sejahtera untuk kita semua
>
> Minta tolong lagi nih. Bagaimana caranya file excel pada sheet tertentu
> terprotect sehingga tidak dapat di print.
> terimakasih.
>
> Salam
>
> NangAgus
>  
>

Kirim email ke