Добрый день/ночь всем!
Не могу сообразить как сделать.
Есть: "код" который ищет одинаковые значения в строке и столбце.
Нужно: например в приложенном файле найдена ячейка на пересечении строки "6" и столбца "E" так как iCells и jCells равны (ячейка E6). Нужно с этой ячейкой работать, например закрасить ее, или вписать что-то.
P.S. Я знаю что я не писатель, так что говорите пожалуйста что не понятно, попробую объяснить.
Не могу сообразить как сделать.
Есть: "код" который ищет одинаковые значения в строке и столбце.
Нужно: например в приложенном файле найдена ячейка на пересечении строки "6" и столбца "E" так как iCells и jCells равны (ячейка E6). Нужно с этой ячейкой работать, например закрасить ее, или вписать что-то.
| Код |
|---|
Sub runPrg()
Dim jCells As Range
Dim iCells As Range
For Each jCells In Range("B5:B7")
For Each iCells In Range("D4:E4")
If jCells = iCells Then
....тут что то надо сделать с ячейкой... Я пока вставил "MsgBox iCells"
Else
End If
Next iCells
Next jCells
End Sub |
P.S. Я знаю что я не писатель, так что говорите пожалуйста что не понятно, попробую объяснить.
Изменено: - 07.12.2015 22:52:50
