-
access vba代码全部丢失_“找不到文件”;在Access 2007中执行任何VBA代码时
2020-12-21 18:26:33I'm working on a big Access 2003 project with Microsoft Access 2007. Recently, some users have started to experience problems with the buttons in my forms. For example, without any specific reason, ...I'm working on a big Access 2003 project with Microsoft Access 2007. Recently, some users have started to experience problems with the buttons in my forms. For example, without any specific reason, clicking on a button or trying to execute any code will return the error:
File not found
There is no way to go into debug mode. When this happens the only thing to do is to restart the database. I tried adding the Stop command at the beginning of the executed block to try debugging it, but no code is executed at all. It's like a compilation error but it's only happening 5-10% of the time, which is really weird.
After some research, I found other people are having the same problem, for example this and this link. There are other examples too, with no real solutions yet.
My database can be okay for a week and then the problem starts to happen again. Half the time and users can't do much; they need to restart the database once or twice to get it back working, and after a few minutes the error might happen again.
Because this is Access 2007 and there are a lot of people experiencing this bug, I can't believe it isn't more documented.
What's the problem? Is the database somehow partially corrupted? What should I do? This is really annoying.
解决方案
If I was in this situation one of the first things I would try would be to do a complete decompile+compact+recompile operation on the front-end database file, and then distribute that updated front-end out to the users to see if that improves things.
Detailed instructions on the decompile+compact+recompile steps are available here. Note: Be sure to read David W. Fenton's additional recommendations in his answer.
-
VBA中利用Dir遍历文件
2017-11-09 04:01:00选择系统分类的时候竟然找不到和VBA相关的,甚至连Office相关的项也没有,是不是因为这些方面太低级了很丢人哪。 下面简单说一下在用VBA开发的时候如何遍历某一目录中的文件,从而对其进行处理。 现实应用中,...选择系统分类的时候竟然找不到和VBA相关的,甚至连Office相关的项也没有,是不是因为这些方面太低级了很丢人哪。下面简单说一下在用VBA开发的时候如何遍历某一目录中的文件,从而对其进行处理。现实应用中,常常会遇到这样的情况,某个目录下有大量的Excel数据文件,现在需要对这些文件中的数据进行批量处理。现在的问题就来了,由于每次生成的数据文件名称都不固定,所以无法在程序中直接写死。其实通过VBA内置的Dir函数可以解决这一问题。Sub DirTest()
Do
xlsName = Dir("D:\ExcelTest\*.xls")
If xlsName = "" Then
Exit Do
End If
Workbooks.Open Filename:="D:\ExcelTest\" & xlsName
Workbooks(xlsName).Close savechanges:=False
Kill "D:\ExcelTest\" & xlsName
Loop
End Sub此处是假设需要处理的数据文件全部在“D:\ExcelTest\”目录下,实际应用中可根据情况更改。以下对此过程作一些简要说明。1.先插入一个过程,并且加入Do……Loop循环,从而实现对所有的文件进行处理2.定义一个变量xlsName(名称可根据自己爱好随便取,但建议是好记的名称,由于VBA可以不申明,直接使用,所以我这里偷懒,把定义的语句省略掉了,默认情况下执行是没有任何问题的。如果在VBA环境中设置了强制申明,则需要添加定义变量的语句)。3.通过一个If……End If来判断,取得的文件名是否是空(如果为空,则说明文件处理完毕),如果为空,则退出循环。4.打开取得的文件名对应的文件5.对数据进行相应处理(这里并没有写这些语句,实际使用时可根据自己的情况添加数据处理的语句)6.关闭刚打开的文件7.删除已经处理过数据的文件(如果这些数据还有他用,建议将其备份,在打开文件后,使用SaveAS另存为也可。8.过程结束。如何查看Dir()函数更加详细的说明,可直接在VBA编辑器中输入Dir,右键点击Dir,然后在快捷菜单中选择“定义”,在打开的“对象浏览器”中,右键单击Dir,然后选择“帮助”,即可查看Dir的详细帮助及示例。本文转自windyli 51CTO博客,原文链接:http://blog.51cto.com/windyli/280988,如需转载请自行联系原作者 -
vba中有多线程吗_通过VBA来找到excel库文件的路径
2020-12-14 15:40:41都知道excel中有一个库文件,一些对excel有深入了解的有可能会需要使用这个excel的库文件,你知道excel的库文件在哪里吗,一般来说excel的库文件放在了安装目录下,但是到了不是自己的电脑下就找不到库文件了,我们...都知道excel中有一个库文件,一些对excel有深入了解的有可能会需要使用这个excel的库文件,你知道excel的库文件在哪里吗,一般来说excel的库文件放在了安装目录下,但是到了不是自己的电脑下就找不到库文件了,我们可以通过VBA来找到excel库文件的路径。
我们在excel中写下的VBA语句来显示EXCEL库文件的路径。Public Sub EXCEL库文件路径() MsgBox "Application.LibraryPathEnd Sub 运行这个VBA之后,会在EXCEL中显示一个对话框,标明EXCEL库文件的路径。
我们在excel中利用VBA找库文件路径的命令是Application.LibraryPath,其中LibraryPath就是EXCEL库文件路径,在VBA中,我们可以快速的掌握VBA的语法,因为VBA大部分使用了英文原词,所以说有点英文基础的朋友,都会很轻松掌握excel的VBA的。
-
vba中VSSDatabase.open打不开 err.number代码429
2016-07-12 09:10:01问题是VB编写中使用Open命令登陆SourceSafe只对6.0a 版本(Visual Studio 6.0 +SP5)起作用,对于6.0d 版本(Visual Studio 6.0 +SP6)不能登陆,好像兼容性不好,但是我查了所有资料和网上搜索,都找不到对于新版本... -
vba 中调用win 32 的api接口
2014-10-30 02:26:58※ 下面问题本人也在网上找了很久的答案,可是均不行,希望各位看官能帮帮忙。谢谢。 其中 i 找了win32的返回值为字符串的win32 api的VBA接口调用 =》 测试成功,方法这里...//那么请问 : 在VBA中怎么调用这个接口 -
ajax 获取文件夹下所有文件名称_文件太多找不到咋整?用excel制作文件管理器,所有版本皆可使用...
2020-12-20 12:25:26Hello,大家好,之前跟大家分享了使用excel中的power query功能制作一个文件管理器,但是很多分析反应自己的excel版本不够高,无法使用,今天就跟大家分享如何使用宏表函数制作文件管理器,他也是可以实现文件刷新的...Hello,大家好,之前跟大家分享了使用excel中的power query功能制作一个文件管理器,但是很多分析反应自己的excel版本不够高,无法使用,今天就跟大家分享如何使用宏表函数制作文件管理器,他也是可以实现文件刷新的,这个的操作也不难,下面就让我们来看下他是如何设置的
一、什么是宏表函数以及FILES函数
宏表函数是早期低版本excel的产物,它是vba的前身,现在已经被vba完全取代了,但是我们仍然可以使用它,只不过需要通过定义名称来使用。我们只做文件管理器需要用到FILES这个宏表函数
FILES函数:返回指定目录下的文件名
第一参数:path,文件路径
他仅仅只有这一个参数,在函数的参数中我们可以使用通配符,excel中的通配符有两个
?:问号代表任意单个字符
*:星号代表任意多个字符
二、定义名称
想要使用宏表函数我们就必须要定义名称,所以第一步就需要定义名称,首先我们先复制文件路径,然后我们点击定义名称,将名称设置为:ww(这个可以自行设置),然后在引用位置中输入函数:=FILES("F:文件*.*")&T(RAND())点击确定
简单的跟大家介绍下这个函数,在这里我们定义的函数分为两个部分
第一部分:FILES("F:文件*.*"),这个宏表函数的作用是获取文件的路径,在这里后面的星点星,是通配符,前面的一个星代表文件名称,后面的星代表文件的扩展名
第二部分:T(RAND()),这个函数的作用是使宏表函数能够自动的刷新数据,因为宏表函数本质上也是vba,vba是无法刷新数据的,我们使用重新再运行一次
二、制作文件管理器
紧接着我们在文件路径中输入函数; =IFERROR("F:文件"&INDEX(ww,ROW(A1)),"")来获取文件路径
在文件名中输入函数:=IFERROR(INDEX(ww,ROW(A1)),""),来获取文件名
在超链接中输入函数:=HYPERLINK(A2,B2),来制作一个自动跳转的超链接
简单的跟大家介绍下函数,获取文件路径的函数他可以分为三个部分
第一部分就是文件夹路径:"F:文件",在这里我们使用链接符号将它与文件名字链接在一起
第二部分获取文件名称:INDEX(ww,ROW(A1)),在这里我们使用index函数获取文件名称,将第一参数设置为刚才定义的名称,将第二参数设置为ROW(A1),这样的话当我们向下拖动函数的时候就会获得一个123456…的序列,来保证我们提取到每个工作表明恒
第三部分:使用IFERROR函数来屏蔽错误值,因为在这里我们使用的是函数来获取的文件名称,所以我们需要向下多拉一些公式,才能保证添加文件后能自动获取文件,比如,文件有10个,尽量拉20个公式,让公式的数量大于文件个数即可
三、注意事项
因为是使用宏表函数来获取的文件路径,所以我们需要将文件的格式另存为xlsm格式,也就是可以保存vba代码的格式。当我们香文件夹中添加新的文件的时候,需要双击文件路径已经文件名这两列来刷新数据
以上就是我们使用宏表函数来制作文件管理器的方法,使用这种方法无视excel版本,全部都可以使用
怎么样?你学会了吗?我是excel从零到一,关注我持续分享更多excel技巧
-
vba 位 前 相似 筛选_在Excel中使用VBA来筛选数据
2021-01-14 15:36:58问题大概是这样的,一个很大的Excel文件,其中有些行是重复的,也就是说,有2行是完全一样的,而有些行是不重复的,现在的问题是要找出所有不重复或者重复的行,你没有听明白。你大概考虑了一下,用“VLOOKUP”查找... -
vba小收获---初探...解vbaproject密码
2011-06-28 11:50:00以前我们就接触过vba,今天又再接触,问题出现在...运行选择表中的众多信息中(考试座位表),出现 我们于是想办法了。 1\首先破解文件,,xls文件破解其...经过细致检查后,发现就是一个程序出错,话找不到工程或者库文... -
VBA一招解决宏病毒
2020-12-29 17:56:16比如:关闭了Excel后,还有一个空白的页面需要关闭,比如每次换一个Excel页面,都有弹一个窗口说“XX找不到”等等,我们的Excel文件中充斥着各种各种不威胁表格数据存储但是很烦人的宏病毒,今天教大家设置以下即可... -
在Excel中使用VBA来筛选数据
2004-11-27 15:34:00问题大概是这样的,一个很大的Excel文件,其中有些行是重复的,也就是说,有2行是完全一样的,而有些行是不重复的,现在的问题是要找出所有不重复或者重复的行,你没有听明白。你大概考虑了一下,用“VLOOKUP”查找... -
解决WPS下安装了VBA后出现的问题——卸载
2019-07-24 17:57:59首先在控制面板下面是找不到VBA的,所以用这个方法卸载不了; 主要是安装的时候也不知道它安在了什么位置,所以我直接在电脑文件下全局搜索vba,将找到的文件都删了,最后成功删除vba,如果在搜索处理的结果中担心有... -
ArcMap10.2无VBA宏(M)环境
2019-09-05 21:01:12ArcMap10.2环境中的“自定义”菜单下,没有相应的VBA开发环境菜单。...倘若实在找不到,在此共享(仅测试ArcMap10.2版本)https://pan.baidu.com/s/1XUXKoCM1HY5_gkfq24VZDg密码:qy2t 1.安装VBAOF11.msi... -
VBA每日一练(2),将txt 的部分/全部内容 导入到EXCEL
2019-11-20 15:50:301 最直接的办法,应该是把 TXT 文件拖入到EXCEL,或用EXCEL打开? 2先把1个TXT读入进来 3把多个TXT读入到EXCEL的多个 SHEET 第1版 找网上的代码学习自己魔改了一下,还有不少问题 错误1:又忘了变量赋值和... -
【VBA研究】Excel信息对比及单元格颜色设置
2019-09-10 14:57:15找不到当然也会记录。为此做了以比较通用的工具,工具可以实现一个文件工作表中的号码对比另一个文件中一个或所有工作表中的号码,同时还可以比较 最多6列附加信息。如果发现不一致,则记录原表信息和不一致的附加... -
VBA Excel 插入图片(非引用方式)
2017-05-03 16:32:52引用的方式插入图片ActiveSheet.Pictures.Insert(imgPath)这种方式插入的图片只是引用而已,当图片被删除、移动时,excel文件中的图片将会找不到资源位置。非引用方式插入图片worksheet.Shapes.AddPicture("C:\\GW... -
python写excel宏_使用python执行excel的VBA(宏)
2020-11-21 01:26:50录制宏,在菜单中找到宏功能区,本人的宏放在视图菜单里image.png开始录制image.png停止录制image.png如果在菜单中找不到宏可以点击【文件】找【选项】去【自定义功能区】中导入指定菜单就OK啦image.png2、将excel... -
excel 2007 vba与宏完全剖析_Excel怎么保护自己的劳动成果?强制用户启用宏,再加上这一步...
2020-11-23 11:53:08知识改变命运,科技成就未来。当Excel工作簿中含有VBA代码时,用户在使用时需要启用宏,否则工作簿...Excel科幻电影效果,文件倒计时销毁功能,网友直呼太科幻Excel工作表打开一次后自动销毁文件,回收站中都找不到... -
python 拷贝文件内容 保存到word_python 怎么用docx读取word的某一页然后放到新的word文档中?...
2020-12-23 11:56:53python-docx库找不到相关的页面对象,网上查找多说是word是流动分页的,文件内容本身并不存储分页结果,具体分页情况都是等到所有的图文渲染后才能确定。后来在vba中发现了Rectangles对象,其中有页面属性,故使用... -
的vba宏无法加载的解决办法_Excel怎么保护自己的劳动成果?强制用户启用宏,再加上这一步...
2021-01-12 14:04:21知识改变命运,科技成就未来。当Excel工作簿中含有VBA代码时,用户在使用时需要启用宏,否则工作簿...Excel科幻电影效果,文件倒计时销毁功能,网友直呼太科幻Excel工作表打开一次后自动销毁文件,回收站中都找不到... -
vba判断某单元格是否有边框时,返回错误的结果。
2019-04-14 22:22:054,在百度上搜索了,找不到结果。自建新表格测试是正常返回的。 5,截图 这张sheet最后一行有边框的应该是51行,但返回值是错的。 ![图片说明]... -
python处理多个excel文件-python多个excel文件合并成一个sheet
2020-11-01 11:55:21这就需要把多个文件夹下面的excel文件合并到一个sheet中,之前的解决的办法是用VBA把多个excel文件合并成一个表的多个sheet,再把多个sheet合并成一个sheet这种办法对数据量不多的可以应付,但是毕竟不能跟直接把多个... -
python合并多个excel工作簿_python多个excel文件合并成一个sheet
2021-01-13 00:57:23运营人员需要历年的订单数据,这就需要把多个文件夹下面的excel文件合并到一个sheet中,之前的解决的办法是用VBA把多个excel文件合并成一个表的多个sheet,再把多个sheet合并成一个sheet这种办法对数据量不多的可以... -
python-docx 复制一页_python 怎么用docx读取word的某一页然后放到新的word文档中?...
2020-12-24 14:28:38python-docx库找不到相关的页面对象,网上查找多说是word是流动分页的,文件内容本身并不存储分页结果,具体分页情况都是等到所有的图文渲染后才能确定。后来在vba中发现了Rectangles对象,其中有页面属性,故使用... -
网管教程 从入门到精通软件篇.txt
2010-04-25 22:43:49如果不能在启动目录(默认为 %systemroot%System32)中找到该文件,将试着在 Windows 安装 CD 中找到它。如果有多引导系统的计算机,必须保证是在包含 Windows 的驱动器上使用该命令。 Diskpart 创建和删除硬盘... -
MYSQL中文手册
2013-03-11 21:21:348.6. mysqlbinlog:用于处理二进制日志文件的实用工具 8.7. mysqlcheck:表维护和维修程序 8.8. mysqldump:数据库备份程序 8.9. mysqlhotcopy:数据库备份程序 8.10. mysqlimport:数据导入程序 8.11. ... -
mysql官方中文参考手册
2009-04-11 11:59:1813.4.2. 不能回滚的语句 13.4.3. 会造成隐式提交的语句 13.4.4. SAVEPOINT和ROLLBACK TO SAVEPOINT语法 13.4.5. LOCK TABLES和UNLOCK TABLES语法 13.4.6. SET TRANSACTION语法 13.4.7. XA事务 13.5. 数据库管理语句 ... -
mysql5.1中文手册
2008-01-09 09:54:20通过非安装Zip文件安装MySQL 2.3.7. 提取安装档案文件 2.3.8. 创建选项文件 2.3.9. 选择MySQL服务器类型 2.3.10. 首次启动服务器 2.3.11. 从Windows命令行启动MySQL 2.3.12. 以Windows服务方式... -
mso image browser.xlsm
2019-01-30 23:19:23这个工作簿能够列出 Excel 中的 1800...现在在他的官网 http://spreadsheetpage.com 上已经找不到这个文件了,网上也很难找到了。有关这个文件更详细的介绍可以看这个网页 http://book.51cto.com/art/200903/113988.htm