vba单元格日期格式小白请教EXCELVBA动态日期怎么写？

2023-04-25

1120

小白请教EXCELVBA动态日期怎么写？没有必要用VBA，用三个条件格式就是可以一切搞定。修改每个日期范围和相对应单元格底色。vba如何把当前日期赋值给单元格？材料/工具：Excel20101、可以打

小白请教EXCELVBA动态日期怎么写？

没有必要用VBA，用三个条件格式就是可以一切搞定。修改每个日期范围和相对应单元格底色。

材料/工具：Excel20101、可以打开一个Excel的文件，鼠标左键左键单击【开发工具】菜单标签。

2、随即，在表格中再输入很简单表格，比如说水果表格。

3、然后把在VBA控件下拉菜单中，中,选择按钮控件。

4、随即在表格中草图出按钮控件，并可以修改控件名称。

5、然后，鼠标左键单击【打开系统代码】按钮。

6、随后，在代码窗口中然后输入给单元格的赋值语句。

7、结果在设计窗口上，鼠标左键右击按钮，可以看见表格中的单元格中自动不显示出数据了

1、在Excel中刚建一个文档，并将它名称之前为“提醒.xls”。

2、执行菜单栏中的“工具”→“宏”→“Visual Basic编辑器”命令，进入VBA编辑状态。

3、在“工程资源管理器”窗口中，全选“VBAProject（叮嘱.xls）”选项，后再不能执行菜单栏中的“直接插入”→“模块”命令，再插入一个名为“模块1”的新模块。

4、鼠标右键点击“模块1”，先执行菜单栏中的“视图”→“属性窗口”命令，在再打开的“属性”窗口中将它更改为“提醒”。

5、在“叮嘱”模块的代码窗口中再输入追加所示的代码：

Subauto_open()可以设置一个手动运行程序的宏--auto_open

Application.OnTimeTimeValue(09:30:00),tx

设置里提醒时间为09:30:00（是可以参照实际需要参与修改），设置全局函数告诫宏

Application.OnTimeTimeValue(010:00:00),tx再设置中嘱咐第二次。

EndSub

Subtx()设置中一个总是显示提醒消息的宏。

msgMsgBox(订购两张2005年1月1日北京——海南的机票！,vbInformation,赶快订机票)

EndSub

提示：

可以设置多个叮嘱宏（tx1、tx2……），只需要在不自动运行宏中各设置里动态链接库的时间，即可基于多个消息的定时提醒。

6、能保存代码，并退出VBA编辑状态。

7、当设置的时间消息时，系统将提示框提示框并且嘱咐。