如何用VBA代码实现锁定excel 工作表中A1:E100不能打印

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    rg = ActiveSheet.PageSetup.PrintArea
    If Not Range("a1:e100 " & rg) Is Nothing Then Cancel = True
End Sub

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/3x2rfe23y33yvefe73.html