
用cells(1,1)value取得时得到2014/01/26 17:30:19
cells(1,1)value2取得时得到 416657293865741
取得单元格的值还有Formular1c1以及Formula
实在不行就先进行Cells(1,1)select然后用selectionvalue
或format(416657293865741,"yyyy/mm/dd hh:mm:ss")
您好,您问的是VBS查询周几?VBS(Visual Basic Script)是一种脚本语言,它可以用来查询周几。您可以使用VBS脚本来查询任何一天是周几,您只需要输入一个日期,然后VBS脚本就可以自动查询出该日期是周几。例如,您可以使用VBS脚本来查询2020年1月1日是周三。VBS脚本还可以用来查询任何一个月的第一天是周几,您只需要输入一个月份,然后VBS脚本就可以自动查询出该月份的第一天是周几。例如,您可以使用VBS脚本来查询2020年2月的第一天是周四。总之,VBS脚本可以用来查询任何一天或者任何一个月的第一天是周几,您只需要输入相应的日期或者月份,然后VBS脚本就可以自动查询出该日期或者月份的第一天是周几。
这里以窗口标题为无标题为例:代码如下:
Set Q = CreateObject("wscriptShell")
Qrun"notepadexe"
do
If QAppActivate("无标题")= True Then
exit do
End If
wscriptsleep 1000
loop
a=inputbox("请输入您的用户名","温馨提示")
t=split(split(now)(1),":")
ti1=t(0)3600+t(1)60+t(2)
QAppActivate"无标题"
wscriptsleep 500
Qsendkeys"{enter}"
Qsendkeys a
msgbox a
t=split(split(now)(1),":")
ti2=t(0)3600+t(1)60+t(2)
msgbox"用时"& ti2 - ti1 &"秒",4096+64,"温馨提示"
if hour(time)>=20 and minute(time)>=0 then
msgbox "己经超出时间"
else
msgbox "时间未到"
end if
If NOT Date = "2015-3-28" Then wscriptquit
……
……
如果日期不等于2015-3-28则退出。否则继续执行下面的代码。
以上就是关于VBS怎么读取excel的时间类型全部的内容,包括:VBS怎么读取excel的时间类型、vbs查询周几、如何用vbs获取一个时间段等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)