<em>EXCEL</em>2010打开文件 VBA调试一直显示出错“运行时错...-excel

你的系统是win7吧，数知学工具在win7下需要把程序运行的模式设为兼容模式，并且要以管理员身份运行才行。这个运行时错误5是由于权限问题引起的。
具体操作方法：右道键点mathtool.exe，在菜单中点“属性”然后在弹版出的界面中点“兼容性”选项卡，在兼容性选项卡中将兼容模式设置为“windows xp sp3” 并将“以管理员身份运行这个程序”权前打勾。

你在VBA中点击 调试——据语句，或按F8【可能会和有道的热键冲突】 一句句看看，出错的地方是哪一句话
SourceData:= _
"渠道日报!R1C1:R65536C26"
超过65535行，Excel 2003最多只有65535行，改为"渠道日报!R1C1:R65535C26"

帮你测试了一下，第一次百运行正常，再运行出现“运行时错误'5' 无效的过程调用或参数

”提示。

原因：

1. 原始运行度环境不存在"我的主菜知单"工具栏，第一次运行时，可以道添加"我的主菜单"工具栏，所以代码运行正常；

2. 再次运行代码，"我的主菜版单"工具栏已经存在，所以运行报错，并生成“自定义*”工具栏。

将代码修改一下：

Sub 菜单栏位权置()

     Dim 主菜单栏 As CommandBar

         On Error Resume Next                                                ‘新增代码

         Application.CommandBars("我的主菜单").Delete        ‘新增代码

      Set 主菜单栏 = Application.CommandBars.Add

        With 主菜单栏

              .Visible = True

              .Name = "我的主菜单"

              .Position = msoBarTop

        End With

End Sub

试试！