excel vba call subroutine with variables

You would call the sub as

EnterCellValueMonthNumber "N23:Q23", 1

No brackets. Or

Call EnterCellValueMonthNumber("N23:Q23", 1)

Brackets, and Call before it.

Also, your Sub is expecting a Range object as the first argument and you're supplying a string; you should change the signature of the sub to:

Sub EnterCellValueMonthNumber(cells As String, number As Integer)

Also, I'm uncertain as to what you are trying to achieve with this code as it will only set the top-left cell of the range to 1. Would something like

Range(cells).Value = number' Or, if you're going to be passing in something more complex later...Range(cells).FormulaR1C1 = number

be more appropriate?

I'd also be very wary of using Range("...") without specifying which sheet you are referring to. This will act on whichever is the active sheet and can thus cause unexpected problems, almost always prefer SheetX.Range("..."). Similarly for using .Select, it's unnecessary, and can only cause problems for you in the future.

You actually have 2 issues.

First the actual answer to your question. You need to say:

Call EnterCellValueMonthNumber("N23:Q23",1)

But that still wont work if you run it, since you have set cells of type range... set it as type string using this instead:

Sub EnterCellValueMonthNumber(cells As String, number As Integer)    Range(cells).Select    ActiveCell.FormulaR1C1 = numberEnd Sub

Try the following code:

Sub EnterCellValueMonthNumber(ByVal cells As String, number As Integer)    Range(cells).Select    ActiveCell.FormulaR1C1 = numberEnd Sub