我正在构建一个摘录,我遇到了一个小问题。如果我运行一次提取(从VB6应用程序) - 一切正常。在函数结束时,我这样做....
xlbook.close
Set xlSheetInfo = Nothing
Set xlBook = Nothing
Set xlApp = Nothing
xlApp.Quit
我让用户查看提取,但是,一旦关闭,EXCEL仍然显示为任务管理器中的一个进程。因此,当我再次尝试再次运行时,我收到错误...
91 object variable or with block variable not set
我在这行代码中收到错误....
With xlSheetSurvey.Range("A5:S5").Select
With Selection
.HorizontalAlignment = xlCenter <----- here i get an error
.VerticalAlignment = xlBottom
.Font.Bold = True
end with
end with
为什么会这样?我希望它能连续多次运行而且它不会让我这样做
答案 0 :(得分:0)
因此,当我应用对齐,字体等时,我正在做的是没有正确引用范围。我把它改成了这个并且效果很好......
xlsheetsurvey.Range("A5:S5").Horizontalalignment = xlCenter
xlsheetsurvey.range("A5:S5").verticalalignment=xlbottom
....等等。我删除了with语句,并且在我引用RANGE的每一个实例中,我确保将其精确地引用到我正在使用的工作表中。谢谢!