错误: 该代码已不禁用如果您按下并时从获取启动的任务窗格打开 Microsoft Excel 工作簿后保持按下 SHIFT 键

文章翻译 文章翻译
文章编号: 826826 - 查看本文应用于的产品
展开全部 | 关闭全部

本文内容

症状

如果按下然后按住 SHIFT 键,在打开 Microsoft Excel 工作簿中使用 开始工作 任务窗格时将不会禁用该代码。 当您使用任务窗格打开的工作簿时对于应用程序的宏包含 Microsoft Visual Basic 或引用的托管的代码扩展,代码始终运行。

解决方案

要防止代码运行时打开的工作簿按,然后在按住 SHIFT 键的同时您打开工作簿的任务窗格中而不是使用 文件 菜单。

状态

Microsoft 已经确认这是 Microsoft Office Excel 2003 中的错误。

更多信息

重现行为的步骤

  1. 创建一个新 Excel 文件,该文件包含托管的代码扩展。若要这样做,请按照下列步骤操作:
    1. 启动 Microsoft Visual Studio.net 2003年。
    2. 文件 菜单上单击 新建,然后单击 项目
    3. Microsoft Office 系统项目,下单击 Visual Basic 项目,然后单击 Excel 工作簿
    4. 单击 确定 以启动 Microsoft Office 项目向导。
    5. 单击 新建文档,然后单击 完成
    6. 在代码窗口中替换下面的代码:
      ' Called when the workbook is opened. 
      Private Sub ThisWorkbook_Open() Handles ThisWorkbook.Open 
      
      End Sub
      与:
      ' Called when the workbook is opened. 
      Private Sub ThisWorkbook_Open() Handles ThisWorkbook.Open 
          MessageBox.Show("The Open Event Fired.")
      End Sub 
    7. 按 F5 键生成项目,然后运行该项目。

      在 Excel 中打开工作簿,并会出现一个消息框。单击 确定 以关闭消息框。
  2. 关闭该工作簿。请不要关闭 Excel。
  3. 在在 Excel 中 视图 菜单上单击 任务窗格,以显示 开始工作 任务窗格。
  4. 按,然后在按住 SHIFT 键的同时单击该工作簿中 开始工作 任务窗格。

    将打开工作簿时,从托管的代码扩展的 Open 事件就会运行。
  5. 单击 确定 以关闭消息框。关闭该工作簿。
  6. 按,然后在按住 SHIFT 键的同时打开工作簿在 Excel 中使用 文件 菜单。

    从托管的代码扩展 打开 事件不会运行。

属性

文章编号: 826826 - 最后修改: 2007年1月5日 - 修订: 1.6
这篇文章中的信息适用于:
  • Microsoft Office Excel 2003
  • Microsoft Visual Studio Tools for the Microsoft Office System version 2003
关键字:?
kbmt kbbug KB826826 KbMtzh
机器翻译
注意:这篇文章是由无人工介入的微软自动的机器翻译软件翻译完成。微软很高兴能同时提供给您由人工翻译的和由机器翻译的文章, 以使您能使用您的语言访问所有的知识库文章。然而由机器翻译的文章并不总是完美的。它可能存在词汇,语法或文法的问题,就像是一个外国人在说中文时总是可能犯这样的错误。虽然我们经常升级机器翻译软件以提高翻译质量,但是我们不保证机器翻译的正确度,也不对由于内容的误译或者客户对它的错误使用所引起的任何直接的, 或间接的可能的问题负责。
点击这里察看该文章的英文版: 826826
Microsoft和/或其各供应商对于为任何目的而在本服务器上发布的文件及有关图形所含信息的适用性,不作任何声明。 所有该等文件及有关图形均"依样"提供,而不带任何性质的保证。Microsoft和/或其各供应商特此声明,对所有与该等信息有关的保证和条件不负任何责任,该等保证和条件包括关于适销性、符合特定用途、所有权和非侵权的所有默示保证和条件。在任何情况下,在由于使用或运行本服务器上的信息所引起的或与该等使用或运行有关的诉讼中,Microsoft和/或其各供应商就因丧失使用、数据或利润所导致的任何特别的、间接的、衍生性的损害或任何因使用而丧失所导致的之损害、数据或利润不负任何责任。

提供反馈

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com