|
sqlString = "select sum(贷款余额) as total from [贷款明细$a5:cc65535] where substring(贷款发放日期,1,7)='" & s1 & "' and 用途代码名称 in('个人住房按揭贷款(个人)','个人住房二手房贷款(个人)','个人其它房产贷款(个人)','个人住房购建贷款(个人)','个人经济适用房贷款(个人)')"
Set rst = cnn.Execute(sqlString)
arr = rst
Sheets("A1470").Range("c" & 16).ClearContents
Sheets("A1470").Range("c" & 16).Value = Round(arr(0) / 10000)
If Sheets("A1470").Range("c" & 16).Value = "" Then Sheets("A1470").Range("c" & 16).Value = 0
前面一些内容都没问题 但是这条语句执行涉及到 字符串拼接 , Set rst = cnn.Execute(sqlString)这条语句就报错、
求问是什么原因
|
|