尝试从列C到O选择标题/第一行和它下面的数据,直到列C中的第一个单元格出现单词"Estimated“我根据另一个关于stackoverflow的答案想出了这个VBA代码,但它似乎不起作用
非常感谢大家的帮助!
Range("C1").Select
For i = 1 To 9999
If ISNUMBER(SEARCH(ActiveCell.Offset(0, i), "Estimated")) = TRUE Then Exit For
If ISNUMBER(SEARCH(ActiveCell.Offset(0, i), "Estimated")) = FALSE Then Exit For
Next
If ISNUMBER(SEARCH(ActiveCell.Offset(0, i), "Estimated")) = TRUE Then
Range(Cells(ActiveCell.Row, 15), Cells(ActiveCell.Row, ActiveCell.Column + i - 1)).Select`
发布于 2018-07-13 05:01:47
试一下,
range(cells(1, "C"), cells(application.match("Estimated", columns(3), 0)-1, "O")).select从您的叙述中不能确定是否要包含包含“估计”的行。-1告诉它不要包含“估计”行。
https://stackoverflow.com/questions/51314295
复制相似问题