Выделите определенные строки в таблице в соответствии с условием

Я пытаюсь сделать этот макрос. Он должен выделять строки в таблице в соответствии с условием. Когда я пытаюсь компенсировать выбранный диапазон, так что подсвечиваются только ячейки в таблице. Но когда я это делаю, мое состояние не работает так, как должно быть. Я полностью новичок в этом, большое спасибо за любой совет.Выделите определенные строки в таблице в соответствии с условием

Sub výklep() 

'Find the last non-blank cell in column 
LastRow = Range("C" & Rows.Count).End(xlUp).Row 
Set SelectedRange = Range("I6:I" & LastRow) 

For Each cell In SelectedRange 
    If cell.Value > 10 Then cell.Range(Cells(1, 1), Cells(1, 9)).Offset(1, -7).Interior.ColorIndex = 3 
Next 

End Sub

источник

2017-01-09 Jirka Mašek

Будет ли условное форматирование проще? –

Что именно вы пытаетесь сделать, если ячейка в столбце I> 10, скажем, Cell I7, то какие ячейки в строке 7 вы хотите изменить цвет ячейки? –

И вы должны получить ошибку, пытающуюся компенсировать «Range (Cells (1, 1), Cells (1, 9)). Смещение (1, -7)», смещение столбца 1 на -7 равно -6, и должно привести к ошибке –

Вы должны быть осторожны при смещении знака минус (-). В вашем случае это минус семь (-7). Во время цикла он пересекает левую границу вашего листа, тем самым вызывая ошибку.

источник

2017-01-10 04:44:45

Выделите определенные строки в таблице в соответствии с условием

ответ

Смежные вопросы