Непонятная ошибка TYPE MISMACH при установке фильтра в RECORDSET - VB

Формулировка задачи:

.........
Set RSm = CreateObject("ADODB.Recordset")
RSm.ActiveConnection = XLSconn
RSm.SOURCE = "SELECT * FROM [2011 год$A1:G65535]"
RSm.OPEN()
.............
Set Cmd.ActiveConnection = Baseconn
cmd.commandtype = 1
Cmd.CommandText = SQL1
Set RSb = Cmd.EXECUTE
................

rsm.FILTER = "zakaz = '" + CStr(rsb.fields("doc_no").VALUE) + "'"

все работает, пока значение rsb.fields("doc_no").VALUE целое и не становится равно, к примеру "425.9" или "425нн" Тогда выскакивает ошибка - "Provider ..... TYPE MISMACH"
почему оно требует целое число? я же в кавычки заключаю выражение, это подразумевает строковое значение. Где я неправ?

Решение задачи: «Непонятная ошибка TYPE MISMACH при установке фильтра в RECORDSET»

textual
                            Листинг программы 
                        
                            <font color="red">''</font> & zakaz <font color="blue">As</font> zakazSTR 
<font color="teal">-- название zakazSTR  - условное</font>