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
>
>