Макрос Excel для поиска ячеек, содержащих «<6» в столбцах с заголовком "n" и замене соседней ячейки на "S"

Question

Я относительно новичок в программировании Excel VBA, и у меня возникают проблемы при создании макроса. Мои данные выглядят примерно так. В столбце А под названием "N" я насчитал несколько рядов. Если число было от 1 до 6, у меня есть значение «<6» в этой ячейке. В противном случае счет отображается. В столбце B под названием «%» у меня есть процент этой строки по отношению к общему количеству. Этот шаблон повторяется переменное число раз до конца таблицы.

Я надеюсь, что каждый раз при обнаружении значения «<6» значение в ячейке изменяется прямо вправо на "S" (что указывает на то, что процент подавляется).

Answer 1

Вот кусок кода, который вам нужен. Вы должны попытаться интегрировать его в любой код самостоятельно.

Dim rng As Range, cell As Range
Set rng = Intersect(Range("A:A"), UsedRange)
If rng Is Nothing Then Exit Sub
For Each cell In rng.Cells
    If cell.Value = "<6" Then cell.Offset(0, 1).Value = "S"
Next