Excel中创建真实电子表

1、单击Office按钮，然后选择“Excel选项”：

3、单击“开发工具”选项卡，然后单击“Visual Basic”：

5、粘贴入以下代码：Sub 电子表()ActiveSheet.Range("A1").Value = TimeApplication.OnTime Time + TimeSerial(0, 0, 1), "电子表"End Sub

7、​选择“电子表”后，单击“执行”（直接双击电子表也行）：