(若是和其他不同軟體互動之問題 請記得一併填寫)
軟體:Excel
版本:2010
大家好,我有一個工作簿裡面sheet1用以下的方式保密
Private Sub Worksheet_Activate()
If Application.InputBox("PASSWORD:") = "12345" Then
Range("A1").Select
Sheets("sheet1").Cells.Font.ColorIndex = 56
Else
MsgBox "You may not modify this sheet!"
Sheets("sheet2").Select
End If
End Sub
Private Sub Worksheet_Deactivate()
Sheets("sheet1").Cells.Font.ColorIndex = 2
End Sub
目的是不讓不知道密碼的人去做輸入修改的動作,
現在要在sheet2將sheet1的資料做複製文字貼上(去掉公式)
我現在的做法是用巨集,不過因為有選擇sheet1的動作,所以會跳出輸入密碼的視窗
1.想請問有甚麼做法可以複製文字貼上不會跳出密碼
2.資料是隨時繼續增加的所以選擇範圍要可以變動的
補充:sheet2的目的是給不知道密碼的人可以檢視資料、篩選、排序的用途