从多个选定单元格中选择某些列

Question

这是我第一篇文章。我搜索了一些可以帮助我的东西，但我有点卡住了。

我想要做的是改变列B中的单元格的单元格颜色：选中单元格的行中的AI。 示例：如果我选择B15 & B16，并运行该宏，则会为单元格B15：AI16着色某种颜色。

我已经尝试了下面，但它只适用于我选择的第一个单元格。

Sub testMacro() 

    For Each cell In Selection 
     Range("B" & Selection.Row & ":AI" & Selection.Row).Interior.ColorIndex = 33 
    Next cell 

End Sub 

任何人都可以帮忙吗？

Answer 1

试试这个。你需要引用你的单元变量，它是循环每次迭代中变化的单元变量。

Sub testMacro() 

    For Each cell In Selection 
     Range("B" & cell.Row & ":AI" & cell.Row).Interior.ColorIndex = 33 
    Next cell 

End Sub