求VBA代码：判断工作簿是否为今天第一次打开，谢谢！

荒烟平楚

求VBA代码：
      1、假如：当前工作簿是今天第一次打开，那么H1单元格内容等于""，并且H1单元格闪烁，内容等于"提示" ，字体呈紫色。
          假如：当前工作簿不是今天第一次打开，并且H1单元格内容等于""，那么H1单元格闪烁，内容等于"提示" ，字体呈紫色。
  
      2、执行“停止闪烁”按钮命令后，H1单元格停止闪烁，H1内容等于"确定"，字体呈蓝色。

      第一条用 WorkBook Open   事件，第二条用“停止闪烁”按钮触发，谢谢！