excel中某列日期的格式如何能快速自动转换?

发布网友 发布时间:2022-02-25 20:34

我来回答

3个回答

热心网友 时间:2022-02-25 22:03

选择F列,分列,分隔符:“/”,把F列分为F、G、H三列,如果原来G、H、I列中有数据,先在F列后插入三列。

在I1中输入: =TEXT(H1&"-"&F1&"-"&G1,"yyyy-mm-dd"),并选择I1,双击右下角小十字,填充公式到最后一行。

选择I列,复制。然后定位到F1,选择性粘贴:数值。

删除G、H、I列。

热心网友 时间:2022-02-25 23:21

你选中那些数据,在单元格格式,数字里面选自定义,然后输入yyyy-mm-dd 就行了

热心网友 时间:2022-02-26 00:56

=text(f1,"yyyy-mm-dd"),先转换成所需的日期格式,然后再复制-选择性粘贴-数值,到原来区域。其他的方法,用VBA方法,
sub test()
dim i as long,x as long
i = range("f65536").end(xlup).row
for x = 2 to i
range("f" & x).value=vba.format(range("f" & x),"yyyy-mm-dd")
next
end sub追问每次只对有日期的单元格进行转换,空白部分暂不运行,请帮手再看看有没有方法优化运行速度。

追答i本来就是最后一个非空单元格,如果在f列中间还有空的单元格,那么,按F11,进入VBE,然后插入模块,然后把如下代码复制过去,假如你那个工作表的codename(代码名称)是sheet1,则:sub test()
dim i as long,x as long
with sheet1
i = .range("f65536").end(xlup).row
for x = 2 to i
if vba.len(.range("f" & x))=0 then
range("f" & x).value=vba.format(.range("f" & x),"yyyy-mm-dd")
end if
next
end with
end sub
注:学VBA不是做学问,无需搞太复杂,用最简单的方法达到目的就好。

声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。
E-MAIL:11247931@qq.com