废话不多说直接上代码： Sub Showsaveinfo()    Dim savetime As String    savetime = ActiveWorkbook.BuiltinDocumentProperties("last save time").Value    If savetime = &q

当过了某个时间这个工作簿将不能被打开或者打开这个工作簿一定要在某个一天才能打开！比如你的excel表格指定在2011-3-23这一天才能打开，其他时间都不能打开！你是不觉得很神秘？想体验吗？那就跟我来写代码！ 打开VBA编辑器，在Thisworkbook下插入如下代码：     Private Sub Workbook_Open() ‘工作簿打开时执行    If Now >=