Excel VBA选择其他所有单元格

时间:2014-08-06 12:30:48

标签: excel vba

假设我们有A4,C4,E4,G4,I4,K4等文本(其他所有单元格都在右边)

如果A4中有文字,我想要一个宏来操作选择“A5:B5”,如果C4等中有文字,我想要“C5:D5”,并且如果第4行中的相应单元格是不存在。

我怎么能这样做?

1 个答案:

答案 0 :(得分:2)

那样的东西?

For i = 1 To 9999 Step 2
    If Cells(4, i).Value = "" Then Exit For
    Cells(5, i).Value = Cells(4, i).Value * 2
    Cells(5, i + 1).Value = Cells(4, i).Value / 2
Next

代码使用第4行和第1个值* 2 和第2个值/ 2 中的值。