我有成千上万条具有不同时间值的行,例如 to_timestamp('14 / 03/18 07:46:33,573000000','DD / MM / RR HH24:MI:SSXFF') ,我想用一个字符串GETDATE()替换所有这些。
例如,我的文件中有以下条目
A D E F
X 4 5 6
X 1 2 3
现在,我想用GETDATE()字符串替换所有的字符串,如下所示
Sub FilterAndCopy()
Dim sht1 As Worksheet, sht2 As Worksheet
Set sht1 = Sheets("Master")
Set sht2 = Sheets("X")
Intersect(sht2.UsedRange, sht2.Rows("2:" & Rows.Count)).ClearContents
sht1.Cells(1, 1).CurrentRegion.AutoFilter
sht1.Cells(1, 1).CurrentRegion.AutoFilter 1, "X"
sht1.Cells(1, 1).CurrentRegion.Offset(1).SpecialCells(xlCellTypeVisible).EntireRow.Copy sht2.Cells(2, 1)
sht1.Cells(1, 1).CurrentRegion.AutoFilter
End Sub
我如何使用带正则表达式的Notepas ++实现此目标?还是有其他方法可以实现这一目标?
答案 0 :(得分:1)
如果您没有其他类似的功能,则只需使用正则表达式(to_timestamp\(.*?\))
如果要具体,请使用
(to_timestamp\('\d+\/\d+\/\d+\s\d+:\d+:\d+,\d+','DD\/MM\/RR\sHH24:MI:SSXFF'\))
并替换为GETDATE\(\)
答案 1 :(得分:0)
使用正则表达式to_timestamp\(.*\)