VBA Excel run-time error useing Recordset.Open

I'm getting a run-time error '-2147217833(80040e57)' String or binary data would be truncated. Any ideas what is going on here? It was working fine until another SQL Call was added to a second form within the excel worksheet. I did remove it but still getting this error so I'm currently STUCK. Your help and assistance is greatly appreciated and NEEDED.

http://www.vbforums.com/showth…ror&p=5096457#post5096457

objMyCmd.CommandText = strSQL
            objMyCmd.CommandType = adCmdText
            Set objMyRecordset.Source = objMyCmd
            If Err.Number = 0 Then
                objMyRecordset.Open
                If Not (objMyRecordset Is Nothing) Then
                    If (objMyRecordset.State And adStateOpen) = adStateOpen Then
                        objMyRecordset.Close
                        Set objMyRecordset = Nothing
                    End If
                End If
            End If
[COLOR=#333333][/COLOR]

Re: VBA Recordset.Open Error

Thank you cytop! With your information I was able to find the problem and you were correct. It did end up to be a size issue based on a SQL column definition. The VBA variable was 1 byte larger than the SQL Definition it was writing to.

I appreciate your help tremendously. You have saved me alot of time and frusration.