用EXCEL怎样做“倒计时牌”

http://school.cfan.com.cn/office/excel/2007-01-02/1167711690d34003.shtml网页上的公式输入好像不够正确,例:=IF(D3,B3,"day")    是正确的,但=DATEDIF(D16,D3,"day")公式无误,可倒不出实际天数      & 这个符号是怎么运用到制作“倒计时牌”中,请大师指教指教

    要做倒计时显示就需要知道具体的到期时间,建国是2013年月10月1日,以及巴西世界杯举行时间为2014年6月13日。需要用的是函数是day和today两个函数名。(date是指具体到期时间,而today则是指今天的时间),现在开始制作倒计时牌。首先点选单元格。

    (倒计时日期=到期日期-今天的日期)在单元格编辑栏内输入函数名=date(2013,10,1)-today()&"天",有时需要在倒计时数字后面加个单位,很简单加个连字符&“单位符号”就可以了。

    按回车确认得出距离建国还有74天。

    以此类推,继续制作2014年巴西世界杯倒计时,同样我们先选定单元格后,在编辑栏内输入公式:=date(2014,6,13)-today()&"天",最后按回车确认。看,距离世界杯还有329天。


温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-10-02
具体办法是将在下载工具(比如说网际快车)里新建一个下载任务,将FLASH地址复制到任务设置里的网地址里就可以了,或者直接鼠标右键点我给的这个地址选择“目标另存为”更方便些! 其次,直接放置是不可能的,我们要借助第三方软件,这个软件的名字叫《身形百变桌面钟》去百度搜索一下,或者从这个地址下载: 下载完安装,然后在按以下文件夹顺序:身形百变桌面钟→SKINS→clock3文件夹下有个clock3的文件,将你刚才下载的“clockcpa”文件重命名为“clock3”剪切过来覆盖这个文件,下面的工作就是打开身形百变桌面钟,选择主题为:clock3,在软件设置里调节位置和大小,以及随WINDOWS同步启动就可以了! 现在,只要您的电脑开机,桌面上就会有一个倒计时我回答的很辛苦的。挺好的呀,2011/10/2 18:08:08
第2个回答  2011-10-02
  Alt+F11调出VBA编辑器,插入一个模块,将下列代码粘贴进去,试一下世界末日倒计时的效果。
  时间及节日请自行修改,再将相关单元格的格式设置得美观一些。

  您可以在主窗口插入两个命令按钮控件,一个调用StartTimer()过程以开始执行,一个调用StopTimer()过程以停止计时。当然您也可以只用一个按钮来调用,这可能需要您进行技术性的处理。

  '以下为需要复制的代码:

  Option Explicit
  '声明变量
  Private theTime As Date
  Private Const SpecialDate As Date = #12/21/2012#
  Private Const SpecialTime As Date = #12:00:01 AM#
  Sub StartTimer()
  '开始倒计时
  With Sheet1.Range("B9") '倒计时名称
  .Value = "世界末日倒计时"
  End With
  Exit Sub

  Call TimeOn
  End Sub
  Sub StopTimer()
  '停止倒计时
  On Error Resume Next
  Application.OnTime theTime, "TimeOn", , False
  End Sub
  Sub TimeOn()
  '显示倒计时
  Dim d As Integer
  Dim nowTime As Date
  nowTime = Now()
  If nowTime >= SpecialDate + SpecialTime Then
  Sheet1.Range("B10:B11").Value = 0
  MsgBox "时间到!", vbExclamation
  Exit Sub
  End If
  If TimeValue(nowTime) > SpecialTime Then d = 1
  With Sheet1.Range("B10") 'B10倒计时天数
  .NumberFormat = "0"
  .Value = SpecialDate - Date - d
  End With
  With Sheet1.Range("B11") 'B11倒计时时间
  .NumberFormat = "hh:mm:ss"
  .Value = SpecialTime - TimeValue(nowTime) + d * 86400
  End With
  theTime = nowTime + TimeValue("0:0:1")
  Application.OnTime theTime, "TimeOn"

  End Sub本回答被提问者采纳
第3个回答  2020-09-23

Excel怎么制作项目倒计时?这个视频告诉你!

第4个回答  2020-11-16

倒计时,从未来的某一时点计算时间,用来表示距离某一期限还有多少时间(多含剩余时间越来越少,越来越紧迫的意思)。

相似回答