C列的格式为HH:mm:ss,其时间(格式为文本,工作表将以csv格式导出).
C1,C2,C3值分别为时间09:15:00,09:16:00,09:17:00至15:29:00
需要仅使用":59"替换最后一个":00"部分
--- CATCH ---在C栏中将有10:00:00或11:00:00或12:00:00等值
这意味着用":59"直接替换":00"将破坏精确的10'o时钟,11'o时钟等的值.
C列将填充数千个此类数据点.我的猜测下面的逻辑不起作用:
{
Dim secrep As String
LastRow = Cells(Rows.Count, "C").End(xlUp).Row
Secsz = Range("C1:C" & LastRow).Select
seczero = Right(Secsz, 2)
secrep = Replace(Secsz, ":00", ":59")
}
我知道上面的代码是错误的,但这就是我能想到的.
请求帮助完成此逻辑..
编辑:解释不太精细.即使这些全小时值也需要替换,例如:10:00:59,11:00:59,12:00:59