医药营销战略:有精通VBA的哥哥姐姐吗？小弟有问题。作为答谢，小弟出30分

我现在正学VBA。感觉还行很有趣。因为是自学，难免走些弯路。（注：刚上路）。今天看了一篇教程，有关于加密工作表的一组代码，试验了一下，还行，但发现一个小问题：具体请看：
Private Sub Worksheet_Activate()
If Application.InputBox("请输入操作权限密码：") = "123" Then
Range("A1").Select
ActiveSheet.Cells.Font.ColorIndex = 56
Else
MsgBox ("密码错误，即将退出！")
Sheets("普通").Select
End If
End Sub

Private Sub Worksheet_Deactivate()
Sheets("haha").Cells.Font.ColorIndex = 2
End Sub

以上是代码。我的工作簿里有“普通”和“HAHA”两个表。其中“HAHA”是加密的。这样一来，其他人就看不到“HAHA”这个表了。但是，如果从“普通”表里直接选“宏”进行编辑或打开VBA编辑器我的代码就暴露无遗了。可以删掉，可以改密码，可以看到密码。。。。。。比不加密还恐怖。如果我只留一张表，情况还好，但如果必须要两张，该怎么办？
如果可以，请给出代码，谢谢。
另外，有几个小问题：请帮忙解释以下小东西及语法：
1；Private Sub Worksheet_Activate()这个我知道，是工作表的激活事件.如果可以，请帮忙讲讲其他事件。
2；Application.InputBox 这个我也了解一些。比如“msg box"是一个简单的对话框。”inputbox"是输入自定义的变量的对话框。其他的对话框都有哪些？
Cells.Font.ColorIndex 这句是什么意思？还有类似的用法是哪些？
也许我的要求有些太多，但请各位谅解！
还有循环的语法是怎样的？CALL是什么意思？语法？
最后谢谢各位帮忙。小弟QQ：316254094
希望和各位交朋友。请记住我：忘忧茶。