为什么每个循环在VBA中都没有定义变量？
提问于 2014-09-24 10:21:22
我已经得到了大量的答案，从斯塔克溢出，我真的很感谢你的所有信息，专家提供的！这是我第一次问问题，所以谢谢你。
我正在一个大型Excel 2010工作簿的后端运行各种VBA程序，我对当前的问题完全感到困惑。在模块中，我有一个带有For每一个循环的公共子循环，该循环迭代一个变量，该变量在工作表中加载了一系列字符串值。
当我运行这个循环时，我要么得到一个直接的编译错误“变量未定义”，然后为每个变量突出显示，要么程序运行但循环没有结束。我从字面上评论了循环中的每一件事，我仍然理解这个问题。当循环运行时，我会看到字符串值被正确地检索到for每个变量中。如果我注释掉循环，那么子运行就没有任何问题。
以下是我必须澄清的一点：
Dim showWord as String
showWord = ""
For Each thisWord In allWords
'showWord = CStr(thisWord)
'MsgBox showWord
Next x现在，我在另一个模块的其他地方有一个完全相同的循环，它总是没有问题地运行。我确实对每个变量和变量名都进行了更改，但仅此而已。
有人能帮我弄清楚这是怎么回事吗？
谢谢。
回答 2
Stack Overflow用户
回答已采纳
发布于 2014-09-24 10:30:48
非常确定您没有定义变量allWords，如下所示
Dim showWord as String
showWord = ""
dim allWords as (wtv)
allWords = (something)
'if not allWords is nothing then
For Each thisWord In allWords
'showWord = CStr(thisWord)
'MsgBox showWord
Next x
'end ifStack Overflow用户
发布于 2016-03-23 15:50:35
循环不会结束，因为在Next x中必须是循环的相同变量，类似于这个Next ThisWord，您必须声明allWords。
Dim showWord as String
showWord = ""
For Each thisWord In allWords
....
Next thisWord页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/26023828
复制相关文章
点击加载更多
腾讯云开发者
