Simple VBA Code or should be

thanks yes makes sense!! Ok but I am getting error "Can not Find Stored Procedure False" any idea or what does this mean the complete code is

Private Sub CommandButton1_Click()


Dim MoviesConn As ADODB.Connection
Dim MoviesCmd As ADODB.Command
Dim r As Range
Dim SQLStr As String

Dim GPCustID As String
Dim RMCCustID As String
Dim ComID As String
Dim LegalName As String
Dim Partner As String

Set MoviesConn = New ADODB.Connection
Set MoviesCmd = New ADODB.Command

MoviesConn.ConnectionString = StrSQL
MoviesConn.Open

Application.Cursor = xlWait
Application.StatusBar = "Logging onto Database..."


MoviesCmd.ActiveConnection = MoviesConn

For Each r In Range("A4", Range("A4").End(xlDown))

MoviesCmd.CommandText = _
SQLStr = "INSERT INTO Customer_Master (GPCustID, RMCCustID, ComID, " & _
"LegalName, Partner) Values (" & GPCustID & ", " & RMCCustID & _
", " & ComID & ", '" & LegalName & "', '" & Partner & "')" & _
" WHERE " & GPCustID & " Not In (SELECT GPCustID FROM Customer_Master)"

MoviesCmd.Execute
Next r


MoviesConn.Close

Set MoviesConn = Nothing
End Sub