求告诉帮忙，谢谢了

AAAA405060

本人刚接触2007EXCEL表，还不懂什么是宏，但是想知道，怎么设置自己建立的表格，不让别人用，怎么用宏设置excel表，在使用几天之后不能使用，只有在知道宏密码的情况下才能使用，并且延长表格的使用时间，谢谢大侠们，小虾米在这里拜谢了，

AAAA405060

这个是我在论坛上找到的，谁能帮我收拾一下，能用在自己表上，并且让自己的表只能用几天就不能用了，只有自己修改延长表的使用时间才能用，求大侠们帮忙啊，谢谢了





Sub CheckFileDate()
    Dim Counter As Long, LastOpen As String, Msg As String
    If RegRead = "" Then
        Term = 0   '範例用 0 天
        TermDate = DateSerial(Year(Now), Month(Now), Day(Now)) + Term
        MsgBox "本檔案只能使用到" & TermDate & "日" & Chr(13) & "超過期限將自動銷毀"
        RegWrite (Term)
    Else
        If CDate(RegRead) <= Now Then
            RegDelete
            KillMe
        End If
    End If
End Sub
Sub KillMe()
    Application.DisplayAlerts = False
    ActiveWorkbook.ChangeFileAccess xlReadOnly
    Kill ActiveWorkbook.FullName
    ThisWorkbook.Close False
End Sub