我在excel中运行宏时出现以下错误...
运行时错误'91'：对象变量或未设置块变量
错误发生在if(req.body.sicDiv) {
co_sicDiv = {
$in: sicDiv.split(',')
};
query = Object.assign({co_sicDiv: co_sicDiv}, query);
//works fine, I get: { co_sicDiv: { '$in': [ 'C' ] }
}
if(req.body.sicMajor) {
if (sicDiv){
co_sicMaj = {
$in: sicMaj.split(',')
};
console.log('co_sicMaj: ', co_sicMaj);
sicMajO =Object.assign(
{'co_sicDiv': co_sicDiv},
{'co_sicMaj' : co_sicMaj}
);
console.log('SicMajO: ', sicMajO);
//Works fine, I get: SicMajO: { co_sicDiv: { '$in': [ 'C' ] }, co_sicMaj: { '$in': [ '15', '16' ] } }
sicMajOR =Object.assign({$or: [
{'co_sicDiv': co_sicDiv},
{'co_sicMaj' : co_sicMaj}
]}
);
console.log('SicMajOR: ', sicMajOR);
//Doesn´t work, I get: SicMajOR: { '$or': [ { co_sicDiv: [Object] }, { co_sicMaj: [Object] } ] }
行
str_text = Replace(link.innerHTML, "<EM>", "")任何人都可以为此提供解决方案吗？
答案 0 :(得分：0)
您的代码存在许多问题 。
您没有告诉我们 发生错误。
正如Chronocidal指出的那样，你的程序名称与变量名称相同......不太好。
您还有 2个未声明的变量和 2个已声明但尚未使用的变量。将Option Explicit添加到[every]模块的顶部[forever]，这样VBA将“强制”您正确声明＆amp;引用变量，对象，属性等。
由于某些原因，代码周围有{Curly Braces}。
这些粗心的疏忽显示缺乏对细节的关注，但我认为在这种情况下导致错误的是工作表上的“查询字符串数据”（从单元格A2开始）。一个或多个单元格为空白或包含Google查询“不喜欢”的字符。
您可以通过添加以下行来确定哪一行：MsgBox url ***在* 后面加url = "https://www....行。**
当弹出消息框时，查看查询字符串并查看它是否遗漏了某些内容，特别是在q=之后。
答案 1 :(得分：-1)
您的Sub与Object之一具有相同的名称：XMLHTTP - Excel可能无法说出是什么，因为您有两件事同名。
此外，您尚未声明str_text或i