我从可以导出到 Excel 的系统中获取数据,但格式是“图片式”而不是普通电子表格形式(即:每组标题、时间和数据顶部的合并单元格中的名称;然后重复对于每个案例),所以排序和小计是不可能的。而且,当然,这一切都在文本中。
我取消合并并插入了一个空白列 (C)。B 列中的一些单元格有活动时间(即:“Act: 00:15”),其他单元格有重复的标题。
我需要将此公式放在 C 列“=mid(B#,7,5)”中以“整理”时间值,但前提是“Act:”一词出现在 B 列中。然后,我需要复制或重复 C 列下的公式(每个报告的长度不同)并小计每个案例以及总计。
Do
Cells.Find(What:="act:", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:= False, SearchFormat:=False).Activate
ActiveCell.Offset(0, 1).Activate
ActiveCell.FormulaR1C1 = "=MID(act,7,5)"
ActiveCell.Offset(1, -1).Activate
Loop While ActiveCell = "Email me"