Взяв режим колонки VBA

Question

Я новичок в VBA и ищу способ пометить значения в столбце.У меня есть электронная таблица с 11 столбцами и 210 строками (у каждого столбца будет свой режим), и я хочу выделить цифры, которые не соответствуют режиму для каждого столбца.

Это то, что у меня сейчас:

For n = 1 To 11

    Dim x As Variant
    Dim y As Variant

    x = Sheets("Sheet3").Cells(2, n).Value
    y = Sheets("Sheet3").Cells(211, n).Value

    With Range(Cells(2, n), Cells(211, n)).FormatConditions.Add(xlCellValue, xlNotEqual, WorksheetFunction.Mode(Range(x, y).Value))
        With .Font
            .Bold = True
            ColorIndex = 3
        End With
    End With

Next n

Я получаю сообщение об ошибке:

Ошибка времени выполнения '1004': сбой метода 'Range' объекта '_Global'

доЯ получаю сообщение об ошибке worksheetfunction.mode, так как он не определен.

Answer 1

Вам необходимо передать объект Range в функцию, а не значение, например,

WorksheetFunction.Mode_Sngl(Range("A1:A100"))

В вашем коде вы в настоящее время передаете значение ячейки по ее виду, а не Range