24小时热门版块排行榜    

查看: 1350  |  回复: 4
本帖产生 1 个 博学EPI ,点击这里进行查看

tongjx

银虫 (小有名气)

[求助] 【求助】EXCEL中如何设置提醒功能【已搜索无重复】

最近参加考试,有一道题给出了一个EXCEL表格,有日期和时间,要求设置“提醒”功能,到了指定日期后,前面日期对应的事件颜色变绿,并在事件对应的单元格划上中划线,表示已经完成。请问各位高手如何实现?是否要用VBA?
Afterrainitcomesfineweather.
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

qfw_68

版主 (文坛精英)

有尾巴的青蛙

【答案】应助回帖


YUE-jf(金币+1):鼓励你一下 2010-05-20 19:06:10
tongjx(金币+2, 博学EPI+1):谢谢帮助,但IF语句只能实现提醒,好像还要用VBA来编程实现单元格变色和汉字划线? 2010-05-21 18:34:41
没有困难创造困难也要上网。
2楼2010-05-20 19:00:56
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

tongjx

银虫 (小有名气)

,高手们帮忙进一步解决啊!拜谢!
Afterrainitcomesfineweather.
3楼2010-05-21 18:35:49
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

lixiaoyue

铁杆木虫 (正式写手)

tongjx(金币+2):没有解决变颜色和划线的问题,不过仍谢谢你的帮助。 2010-05-22 06:21:50
网上找了一个方法。不知道对你有没有用。https://wenwen.soso.com/z/q160452939.htm

1、启动Excel,新建一文档,取名保存(如“提醒.xls”)。

  2、按“Alt+F11”组合键进入VBA编辑状态。

  3、在左侧“工程资源管理器”窗口中,选中“VBAProject(提醒.xls)”选项,执行“插入模块”命令,插入一个新模块。

  4、将下述代码输入到右侧的编辑区域中:

  Sub auto_open()  '设置一个自动运行的宏——auto_open

  Application.OnTime TimeValue("08:30:00", "tx"  '设置提醒时间——08:30:00(可以根据需要修改),设置调用提醒宏——tx。

  Application.OnTime TimeValue("09:30:00", "tx"  '再设置提醒一次。

  End Sub

  Sub tx()  '设置一个显示提醒消息的宏(名称要与上述自动运行宏中调用的名称一致)。

  msg = MsgBox("通知张三、李四、王五评委参加下午评标!", vbInformation, "赶快打电话" '设置提醒对话框中的消息和标题(前面是消息内容,后面是对话框标题,请根据需要输入)。

  End Sub

  注意:①上述代码中,英文单引号及其后面的字符是对代码的解释,在实际输入时可以不需要。②如果设置多个提醒宏(tx1、tx2……),并在自动运行宏中分别设置调用的时间,可以实现多个消息的定时提醒。

  5、输入完成后,退出VBA编辑状态,保存工作簿文档。

  6、以后,一上班,就启动Excel,打开上述工作簿文档。设定时间一到,系统即刻弹出提示框。
4楼2010-05-21 20:58:36
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

rsb_long

至尊木虫 (著名写手)

【答案】应助回帖

tongjx(金币+1): 2010-06-16 06:19:04
使用VBA嵌入编程,但此类程序往往会被除数认为是宏病毒,需要调整宏的级别
5楼2010-06-05 11:23:44
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 tongjx 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 时间戳又变了 +11 wuchongjun 2026-08-20 16/800 2026-08-20 19:26 by wuchongjun
[基金申请] 科研孤儿太难了 +9 我4大白菜 2026-08-20 9/450 2026-08-20 18:23 by 2549091707
[基金申请] 时间戳变了,能看出什么问题? +18 基诺咪客 2026-08-17 23/1150 2026-08-20 17:19 by Godzela
[基金申请] 今天系统多次维护,明天很可能放榜! +9 zju2000 2026-08-16 10/500 2026-08-20 15:56 by Leogzhya
[基金申请] 放榜前的不淡定 40+3 snowwithsea 2026-08-19 12/600 2026-08-20 15:56 by lfy8008
[基金申请] 言之凿凿,明天官网会通知放榜? +14 医学老男孩 2026-08-20 16/800 2026-08-20 15:47 by LNP@mRNA
[基金申请] 哪位老哥知道今年的国自然具体哪一天放榜? +16 Ldrop2023 2026-08-13 20/1000 2026-08-20 11:07 by xskun
[基金申请] 今天基金会出结果吗?20260819 +14 kkkl_v 2026-08-19 15/750 2026-08-20 08:21 by sunzitan
[基金申请] filecode,4个jtjc了 +11 ziyangfang 2026-08-19 13/650 2026-08-19 21:28 by aasahr
[基金申请] 今天放榜没戏了吧 +4 yuleib84 2026-08-19 5/250 2026-08-19 19:52 by hhs666
[基金申请] 今天放榜吗? +14 布布和一二 2026-08-19 15/750 2026-08-19 18:07 by gltch
[基金申请] 朋友圈看到的 +6 wangzilk 2026-08-18 8/400 2026-08-19 10:55 by Haru815
[基金申请] 快农历七夕节了,轻松一下,男人悄悄话,女施主请不要进来。 +6 Tide man 2026-08-14 7/350 2026-08-19 09:56 by ZJTJZ
[论文投稿] 投稿咨询 +4 wwm09 2026-08-17 6/300 2026-08-18 15:36 by wwm09
[基金申请] 时间戳又变了8-15 +14 archvillain 2026-08-15 26/1300 2026-08-18 13:37 by phantomgost
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
[基金申请] 93BebMhtakh前后11位开头都是大写 +4 且听虎啸 2026-08-17 5/250 2026-08-18 00:49 by 蔡棒棒菂
[基金申请] 感觉是下周放榜了 +6 angus9576 2026-08-17 11/550 2026-08-17 23:57 by angus9576
[精细化工] 招聘 金属平磨液,抛光液研发工程师 +3 小天0311 2026-08-14 3/150 2026-08-16 07:31 by H9PLUS
[基金申请] 各位道友,我要去昆明玩几天,回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
信息提示
请填处理意见