Я использую tabArray на листе, который будет циклически проходить по ячейкам F13, F17 и т. Д. До F31 (все нечетные ячейки).Каждая ячейка представляет собой выпадающий список, чтобы пользователь мог сделать выбор.Если ячейка в массиве имеет серый фон, я хочу перейти к следующей ячейке в массиве.Например, F21 имеет серый фон, однако, если я сделаю выделение в F13, следующая ячейка, к которой он перемещается, будет F23.Каждая ячейка, в которой я делаю выбор, изменяется до того, как ячейка F21 автоматически переместится на F23.
Я пробовал "Exit For" и "GoTo", но безуспешно.
tabArray = Array ("F13","F15","F17","F19","F21","F23","F25")
For I = LBound(tabArray) to UBound (tabArray)
If tabArray(I) = target.address(0,0) then
If I = UBound(tabArray) then
Me.Range(tabArray(LBound(tabArray))).Activate
Else
Me.Range(tabArray(I+1)).Activate
end if
ElseIf Range(tabArray(I)).Interior.Colorindex = 15 then
If I = UBound(tabArray) then
Me.Range(tabArray(LBound(tabArray))).Activate
Else
Me.Range(tabArray(I+1)).Activate
end if
end if
Next I
Если фон ячейки серый для F23, и я делаю выделение в F13, я хочу, чтобы следующая ячейка, в которую он перемещается, была F15, но фактический результат - то, что она перемещается в ячейку F25.