Синтаксическая ошибка в VBA, код не может быть выполнен

Question

Я написал подпункт "change_array".Когда я пытаюсь использовать change_array("A1:AX2",2,2,0.5,1) и запускать его, я получаю «Синтаксическая ошибка: невозможно скомпилировать».

Я пытался использовать измерение «As String» для «cellref», но это не привело кв любых улучшениях.

Public Sub change_array() 'Sub does not return value, only executes

     Dim cellref As Range
     Dim row_number As Long
     Dim column_number As Long
     Dim x As Double 'Number, which will be added or multiplied by chosen cell value in an array
     Dim method As Integer 'One for multiplication, two for addition

     If method = 1 Then
        Cells(row_number, column_number) = Cells(row_number, column_number) * "x"
    ElseIf method = 2 Then
        Cells(row_number, column_number) = Cells(row_number, column_number) + "x"
    End If

End Sub

Ожидаемый результат будет, что соответствующее значение из выбранного массива (в данном случае B2) умножается на 0,5