问题描述
由于重新安装了Windows(不同的语言),因此某些日志文件现在具有不同的DateTime格式。
为了使我的Excel / VBA脚本再次工作,我必须将DateTime字符串转换为恒定长度的旧(德语)时间格式。
明确说明:我想操作字符串(不获取其他数据类型)。
Problematic Format => Wanted Format
"12/28/2019 9:37:49 PM" => "28.12.2019 21:37:49"
"1/2/2020 10:15:20 AM" => "02.01.2020 10:15:20"
"2/1/2020 7:10:15 AM" => "01.02.2020 07:10:15"
"2/13/2020 7:10:15 AM" => "13.02.2020 07:10:15"
我面临的一个问题是“问题格式”的字符串长度可变。这意味着我无法使用LEFT / MID / RIGHT
在此字符串中提取特定位置。
是否可以轻松地将此字符串转换为无循环的旧格式?
由于Excel的行为异常/不一致,因此以下代码无法正常工作:
ProblematicFormat$ = "2/1/2020 7:10:15 AM"
MyDate = CDate(ProblematicFormat$)
NewDateTime$ = Format(MyDate,"dd.MM.yyyy H:nn:ss")
MsgBox NewDateTime$
该代码的结果在一天和一个月中混合在一起:
"2/1/2020 7:10:15 AM" => "02.01.2020 07:10:15" (wrong)
"2/13/2020 7:10:15 AM" => "13.02.2020 07:10:15" (correct)
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)