(若是和其他不同软件互动之问题 请记得一并填写)
软件: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的目的是给不知道密码的人可以检视资料、筛选、排序的用途

问题2，如为动态范围方面range.currentregionworksheet.usedrange或range.end方面看是否有符合问题1，看加上application.cutcopymod判断是否有符合回文有落字，为cutcopymode少了个e