这个问题有点难以解释,所以请耐心等待。
我正在从我的公司的大表中提取数据,并且我正在尝试创建一个宏来使这些数据更易于阅读/理解。网站上的数据每天都会根据我们工厂中导致某些故障的原因而发生变化,这会导致我的宏分析不存在或错误单元格的数据(由于行被移动/移动/添加/删除)。因为我认为这不是很清楚,所以这是一个例子:
宏说选择单元格J5,J13和J25。当我创建宏时,这些是我想要放在列表中的值。但是,当我今天拉动数据并运行宏时,这些值在我的工作表上的不同位置(单元格J13的值现在在J12中)。这完全扰乱了所有的分析并使我的宏/数据变得毫无用处。
有没有办法让宏更智能地选择数据?也许让它检查组名,然后从旁边的单元格中选择值?我希望我能说得更好......谢谢,如果你已经走到这一步了!
答案 0 :(得分:0)
简单地说......是的。这是一个用于查找组名并获取相邻单元格的代码:
Dim Group1Range As Range
'Look in ThisWorkbook
With ThisWorkbook
'Look in Sheet1
With .Sheets(1)
'Look in Column I
With .Columns("I:I")
'Find the text Group1
Set Group1Range = .Find(What:="Group1").Offset(0, 1)
End With
End With
End With
'Indicate the address of the found range
Debug.Print Group1Range.Address
End Sub
现在,您可以通过以下方式改善问题:
J13
不再有效,而J12
现在已经存在。