vba string转化为日期型
最好的方法不用VBA。请不要惊讶,如果你知道复制后点右键有选择性贴上(快捷键S)就可以了。
1、任意GENERAL的储存格输入0
2、点此储存格按下CTRL+C
3、选中要转换时间的储存格。
4、在选中范围点右键选选择性贴上(或按下S)
5、在弹出来的窗口,上面选择“值”,下面选择“加",点确定。
6、将这选中的储存格用格式刷刷成你已经修改成功的样式。
纯手打!!!
VBA 数据类型相互转换
CBool(expression)
CByte(expression)
CCur(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CSng(expression)
CStr(expression)
CVar(expression)
CStr(expression)
实例
Sub test()
Dim a As String
Dim da As Date
a = "65742"
da = CDate(a)
MsgBox da
End Sub
效果如图
方法和详细的操作步骤如下:
1、第一步,双击以打开Excel表,见下图,转到下面的步骤。
2、第二步,执行完上面的操作之后,选择底部的工作表,然后右键单击“查看代码”选项,见下图,转到下面的步骤。
3、第三步,执行完上面的操作之后,输入日期格式转换代码,代码见下图,转到下面的步骤。
4、第四步,执行完上面的操作之后,单击工具栏中的“三角形”按钮,见下图,转到下面的步骤。
5、第五步,执行完上面的操作之后,成功显示转化为日期型,见下图。这样,就解决了这个问题了。
vba 中可以使用 CDate 函数,将符合格式的字符串转换成日期类型的数值。
CDate 函数的定义如下:
Cdate(日期表达式)
功能:将日期表达式转换成日期类型的数据。
说明:日期表达式是任何可以解释成日期的表达式,包含日期文字,可以看作日期的字符串以及从函数返回的日期。
示例代码:
Private Sub CommandButton1_Click()
CurrentDateTimeString = Format$(Date, "dd-MM-yy")
monthString = Month(CurrentDateTimeString)
If (monthString = 12) Then
LastMonth = 1
Else
LastMonth = monthString - 1
End If
Select Case LastMonth
Case 1, 3, 5, 7, 8, 10, 12
LastDate = 31
Case 2
LastDate = 28
Case Else
LastDate = 30
End Select
LastMonthString = LastDate & " - " & LastMonth & " - " & "2017"
Range("A3").Value = CDate(LastMonthString) '设置 A3 单元格为当前日期
MsgBox (LastMonthString)
End Sub
运行结果:
CInt(val(string))
大狐皆化刺: 不用那么麻烦,用format函数,代码如下 print format(20100808 , "####-##-##") 即可
淮上区13842104952: VBA日期转化问题 - ?
大狐皆化刺: 日期转化有三个函数: 1、=DAY(A1),转化为日 2、=MONTH(A1),转化为月 3、=YEAR(A1),转化为年
淮上区13842104952: 如何把string类型转换成date类型 - ?
大狐皆化刺: public static void main(String[] args) throws ParseException { String str ="2017-14-11 18:59:59"; Date date = new SimpleDateFormat("yyyy-MM-dd HH:mm:ss").parse(str); System.out.println(date); } 注意你定义的或得到的String字符串必须要跟SimpleDateFormat的格式一致,不然会出异常!希望能帮到你!
淮上区13842104952: VB,如何将字符串型转化为日期型? - ?
大狐皆化刺: format(cdate(x),“yyyy-m-d“)cdate是转换的函数functionnbsp;formatdatetime(constnbsp;format:nbsp;string;nbsp;datetime:nbsp;tdatetime):nbsp;string;nbsp;overload;当然和format一样还有一种,但这里只介绍常用的第一种format参数是一个格...
淮上区13842104952: vba 怎么设置某一列的单元格为日期格式 - ?
大狐皆化刺: 选择你想要显示那个数据的一列,单击右键选单元格格式设置的那一项,然后选择日期,挑你想要的日期格式然后确定.之后数据写到单元格会自动转化成日期格式.用代码的话, 选择单元格范围,例如: Range("A1:A9").Select 指定范围的格式 Selection.NumberFormatLocal = "yyyy/m/d;@"
淮上区13842104952: String 转换Date类型 - ?
大狐皆化刺: Date是日期对象,并不是字符串.当你打印Date对象时,java虚拟机默认调用了此对象的toString()方法.此方法输出的国际标准日期格式.并不是说Date对象是这个格式.Date对象在保存日期时使用的是...
淮上区13842104952: VB求两个string类型转换date类型并求他们的时间间隔 - ?
大狐皆化刺: dim a as string, b as date dim h, m, s a = 80 h = 0 m = a \ 60 s = a mod 60 b = timeserial(h, m, s)
淮上区13842104952: 怎么用vba代码把单元格数字提取出来变成日期? - ?
大狐皆化刺: 请查收附件.代码如下.sub tq() dim r, n as long dim rg as range dim bgarr r = range("a" & rows.count).end(xlup).row bgarr = range("b1:g" & r) n = mid(range("a" & r), 2, 1) for each rg in range("a1:a" & r) bgarr(rg.row, 1) = --left(rg, 1) ...
淮上区13842104952: vb 字符串转日期 - ?
大狐皆化刺: VB使用 CDate 函数将字符串转换成 Date. CDate 函数示例本示例使用 CDate 函数将字符串转换成 Date.一般说来,字符串格式的日期与时间硬编码(如示例中所示)并不好.较好的做法是使用日期原义表达式和时间的原义表达式(如 #2/...
淮上区13842104952: java的String类型怎么转化成日期类型? - ?
大狐皆化刺: String pattern = "yyy-MM-dd HH:mm:ss"; //首先定义时间格式SimpleDateFormat format = new SimpleDateFormat(pattern);//然后创建一个日期格式化类String toConvertString = "2012-11-01 10:10:05";Date convertResult = null;try {...