Dim statement to declare the object type of a variable

[Juggler_IN]

I want to convert variable "COLUMNS" as an Integer from the current classification of "CONSTANT." When I change Const COLUMNS to Dim COLUMNS as Integer, I am getting an error in [Dim RN(1 To COLUMNS) As Range] statement. It says constant expression required. How can this be resolved? Basically I want to capture the number of columns via an input box and not keep it as constant.

Const COLUMNS = 31
Dim s1 As Worksheet
Dim s2 As Worksheet
Dim Lags
Dim RN(1 To COLUMNS) As Range

 

[mole999]

I would have thought COLUMNS was a reserved word, maybe add an extra letter or number to it

 

[Kyle123]

Like this:

Dim COLUMNS As Integer
Dim RN() As Range

COLUMNS = 31
ReDim RN(1 To COLUMNS)

 

[Juggler_IN]

@Kyle, thanks. It worked