变量“上下文菜单”未显示

Question

更多的是工具问题而不是编程问题。 不确定是否是正确的名称，但是通过上下文菜单，我的意思是输入变量名称和点后显示的变量属性和方法的列表。例如，我输入：

Dim lo As ListObject
Set lo = Sheet1.ListObjects("table1")
Dim lc As ListColumn
Set lc = lo.ListColumns(1)
Dim r As Range
Set r = lc.

现在在这里输入最后一个点后，通常会出现一个菜单，例如，我可以在其中选择“ DataBodyRange”，当您不完全记住名称时，该菜单对于探索给定类型的变量的属性/方法很有用。

但是，有时这些菜单会停止弹出。我注意到了...

1. 有时是由于代码中的错误引起的，尽管有时不是
2. 它不能在一个模块/工作表的代码中工作，而在另一个模块/工作表的工作中

鉴于这不是代码中的错误（我目前的问题是在可以编译并正常运行的代码中），有关此原因以及解决方法的任何提示

编辑：修复了代码中的错误。它是用手工编写的，我的实际工作表没有错误（但是代码太长，无法有效地描述我的问题）。 注意！我要做的就是从这样声明：

Dim lc1, lc2 As ListColumn

要这样声明：

Dim lc1 As ListColumn
Dim lc2 As ListColumn

我想我应该在原始帖子中让大家知道，尽管我不认为这样声明很重要。应该/应该吗？