Calculate 公式重算 他之前 不是在当前单元格输入了 =now() 吗 为了重算这个公式的, 基本没什么用, 你删掉试试就知道了,Private Sub Worksheet_Change(ByVal Target As Range)Application.EnableEvents = FalseTarget.SelecttimestampApplication.EnableEvents = TrueEnd Sub这段代码是 工作表 内容改变触发事件, 他触发的事件是调用第一个SUB ,另外这段代码要放到sheet 模块才起作用