VBA: Is there something wrong with the way I am defining my variables here?

[SteveOranjin]

Hello,

Can someone tell me if there is something wrong with the way I am defining my variables here? I'm not clear on what it is.

Sub Insert_Map()
    'We are inserting our variables
    Dim rngMSRPHeader As Range
    Dim rngHeaders As Range
    Dim brand As String
    Dim mapPolicy As String
    
    
    Set rngHeaders = Worksheets("Data Sheet").Range("1:1") 'look in entire first row
    Set rngMSRPHeader = rngHeaders.Find(what:="MSRP", After:=Cells(1, 1))
    
    rngMSRPHeader.Offset(0, 1).EntireColumn.Insert
    rngMSRPHeader.Offset(0, 1).Value = "MAPprice"
    
    brand = Worksheets("Import Info").Cells("A2")
    mapPolicy = Worksheets("Import Info").Cells("J2")

    MsgBox ("For Brand:" & brand & vbNewLine & "The Map Policy Is" & mapPolicy)
    
End Sub

 

[cerfani]

Cells function is wrong... use Range("A2") or if you want to use Cells then you use it like this... Cells(2, 1) usage: Cells(rowNumber, columnNumber)

when debugging the error should have hit that line, then you just look up the function on msdn