[算表] VBA活頁簿另存成工作表問題

作者: leader223 (LChance)   2018-08-08 21:21:11
軟體:Excel
版本:2013
有一活頁簿(受保護)其中有3個工作表
我想把其中一個工作表(甲班)匯出至獨立的活頁簿
但是只保留值,不含公式,也不含按鈕
到達第3行時就顯示受保護的工作表,叫我取消保護工作表
表格如附圖 煩請各位大大協助...
Sub 按鈕1_Click()
ActiveSheet.Copy
[A1:I22] = [A1:I22].Value
ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & ActiveSheet.Name
ActiveWorkbook.Close
End Sub
https://imgur.com/a/XwsOvtb
受保護的表格為A1:I22
作者: soyoso (我是耀宗)   2018-08-08 21:40:00
先取消保護工作表,worksheet.unprotect,最後再worksheet.protect

Links booklink

Contact Us: admin [ a t ] ucptt.com