access 编写vba 出现“vba 运行时错误4244”

来源：蜘蛛抓取(WebSpider) 时间：2015-03-26 11:48 标签： vba运行错误424
Access俱乐部
?&&&&?&&&&?&&&&?&&&&
您的位置：　 > >
运行时错误‘424’ 要求对象
来源:&&点击数:3183&&评论数:0　&|&&|&
时　间: 10:15:34
作　者:&&&ID：42182&&城市：南京
摘　要:在报销教程中出现过俩次这样的错误，其实是通用的范例，现单独讲解一下。
1.打开报销教程frmBxmx_sg_main窗体中的修改按钮，出现下面这个错误。
2.点击调试，发现左边工程里面是不是没有frmBxmx_sg_List这个窗体。
3.所以我们要在工程列表里加上frmBxmx_sg_List窗体名。步骤是：打开该窗体设计界面，点击左上角查看代码，就将该窗体名加入工程列表了。
4.看里面是不是有这个窗体名了。
5.重新操作第1步，问题是不是就解决了。
Access软件网官方交流QQ群 (群号:)
　　　　　　
&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】&&&&【&&】
Access网店
价格：￥100 元
价格：￥50 元
价格：￥1 元
(05-09 22:50)
(05-09 22:41)
(05-09 18:33)
(05-09 10:27)
(05-09 10:04)
(05-08 12:57)
(05-08 10:58)
(05-08 10:11)
(05-08 10:06)
(05-07 22:45)
Access软件网 版权所有 CopyRight
提供支持 本站特聘法律顾问: 李慧 律师查看: 11984|回复: 10
请帮助看一下，运行时错误424：要求对象
阅读权限30
在线时间 小时
本帖最后由 wyzdddl 于
16:14 编辑
(31.94 KB, 下载次数: 40)
09:17 上传
点击文件名下载附件
为什么下面代码中加了”Windows(&腾远配件资料.xlsm&).Activate这句后“，运行时出现“运行时错误424：要求对象”的提示？
Sub 查看该配件资料()Dim i& '声明变量Ai = ActiveCell.Row + 1 With Sheets(&配件资料&)& & .Activate& & .Range(&A& & i & &:Z& & i).Select End WithEnd Sub这个可以正常运行
而加了“Windows(&腾远配件资料.xlsm&).Activate”它之后，就提示“错误424”，如下：
Sub 查看该配件资料()
Dim i& i = ActiveCell.Row
With Windows(&腾远配件资料.xlsm&).Activate
& & Sheets(&配件资料&).Activate
& & .Range(&A& & i & &:Z& & i).Select
阅读权限95
在线时间 小时
本帖最后由 zez 于
08:48 编辑
虽然我打不开xlsm文件，但从方便愿意帮助你的人着想，还是建议楼主上传附件！
阅读权限30
在线时间 小时
本帖最后由 wyzdddl 于
09:21 编辑
zez 发表于
虽然我打不开xlsm文件，但从方便愿意帮助你的人着想，还是建议楼主上传附件！
您好，谢谢您，已经上传了xls格式的附件
附件在一楼
阅读权限95
在线时间 小时
Sub 查看该配件资料()
i = ActiveCell.Row
With Workbooks(&腾远配件资料.xls&)
& & Application.Goto .Sheets(&配件资料&).Range(&A& & i & &:Z& & i)
阅读权限100
在线时间 小时
&配件资料&工作表在Windows(&腾远配件资料.xlsm&)里面还是在代码所在的工作簿里面的？
阅读权限30
在线时间 小时
蓝桥玄霜 发表于
&配件资料&工作表在Windows(&腾远配件资料.xlsm&)里面还是在代码所在的工作簿里面的？
在“腾远配件资料”工作簿，不在，当前工作簿
阅读权限30
在线时间 小时
doitbest 发表于
Sub 查看该配件资料()
i = ActiveCell.Row
提示“下标越界”
阅读权限20
在线时间 小时
Sub 查看该配件资料()
Dim i& i = ActiveCell.Row
With Windows(&腾远配件资料.xlsm&).Activate
& & Sheets(&配件资料&).Activate
& & .Range(&A& & i & &:Z& & i).Select
&&with&&循环体内容错误了，导致 .Range(&A& & i & &:Z& & i).Select 无法运行，你自己再改一下。
阅读权限95
在线时间 小时
我把代码放在&求助&中运行正常，而且你附件中的是“腾远配件资料.xls”，而不是“腾远配件资料.xlsm”
阅读权限95
在线时间 小时
选择同一工作簿中其它工作表上的单元格或者选择不同工作簿中的单元格，用GOTO，或者先激活要选择的工作簿的工作表再用SELECT。
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师

我要回帖

更多关于 vba运行错误424 的文章

 

随机推荐