excel-vba相关内容

打开adode pdf并通过添加文本框来编辑页面

我对使用Adobe进行vba编码非常陌生,无法使用任何代码。我首先需要打开文档中的pdf文件(使用Adobe Acrobat),然后通过添加一个或多个文本框来编辑第5页。我想知道这是否可行,是否有代码可以做到这一点。我有Adobe Acrobat XI Standard,它允许我手动编辑pdf并在需要的地方创建文本框。 任何帮助将不胜感激。 谢谢 解决方案 http ://www.a ..
发布时间:2020-06-01 00:42:17 其他开发

IsNumeric函数为空单元格返回true

我运行一个宏,该宏从PDF文件复制表格并将其保存在Excel中。 一些表包含空单元格,在我的分析中,我需要知道空单元格的数量。 我有一个遍历每一列的函数,以检查该单元格中的值是否为数字。 的麻烦是当我在一个空单元格上运行此函数时它返回true。我什至尝试使用Isblank()函数手动检查单元格,它返回“ false”。 (如果我在粘贴范围之外的任何单元格上尝试此操作,它将返回“ true”) ..
发布时间:2020-06-01 00:42:09 其他开发

将附件保存到硬盘

我正在尝试编写一个简单的任务:从Access(2013)数据库检索附件并将其保存到磁盘。目前,我希望代码从记录集中获取第一条记录并将附件保存到C:\maptest.pdf 它显示错误3265:找不到项目在这个集合中(但是数据库中的每个记录都有一个附件)。 有人知道我在做什么错吗? Private Sub CommandButton4_Click() Dim appAcc作为新 ..
发布时间:2020-06-01 00:16:29 其他开发

在VBA事件中准备的阵列。如何从另一个事件中提取其内容?

此问题应适用于任何发生事件的VBA: 我已经在MS Access的Form_Load()事件中填充了一个数组。现在,我想从ListBox_DblClick()事件中提取,取消引用该数组的内容。 我将该数组调到表单模块顶部(如果是Excel,那将是一个工作表模块)它们都共享; 感谢任何帮助: Dim ArrWhatever()作为字符串 函数ThisArr(tmpVal ..
发布时间:2020-06-01 00:16:00 其他开发

硒发现元素VBA阻止例程

这是我打开网站并搜索对象的代码。可能会发生找不到对象的情况,因此我必须对它的存在进行设置搜索,以便执行或不执行操作。我正在尝试这种方式,但是如果我要查找的对象会导致例程崩溃...。 Dim bot As新的SeleniumWrapper.WebDriver bot.SetProfile“ C:\Users\USER\AppData\Local\Google\Chrome\UserDat ..
发布时间:2020-06-01 00:15:12 其他开发

查找对象库VBA的VBIDE.Reference.Name

我找到了如何使用VBA编程添加参考, 这说明了如何使用库的名称以编程方式添加对象引用, 并带有示例“ VBScript_RefExp_55”。 我的问题是如何找到在此代码中用于不同对象库的引用名称? 例如PowerPoint库? 解决方案 我用它来获取我的参考文献信息: 私有子ListProjectReferencesList() Dim i As Long ..
发布时间:2020-06-01 00:12:56 其他开发

从VBA搜索Outlook电子邮件

给定的代码成功运行。它在Outlook“已发送邮件”文件夹中搜索电子邮件主题。搜索基于特定时间段内的特定日期进行。例如,下面的代码查找2018年7月20日12:00 AM至11:59 PM之间发送的电子邮件标题``星期五发送的电子邮件''。 除了现有的搜索条件外,如何过滤发送给特定用户的电子邮件。我要检查[收件人]字段。如果[收件人]有收件人x @ email.com,y @ email.c ..
发布时间:2020-06-01 00:12:24 其他开发

VBA Excel-访问中的UPDATE记录

我遇到问题。 我想使用EXCEL中的VBA更新Access数据库中表中的现有记录。 我的代码: sqlik =“在访问中有效的更新查询” 设置ZAP_QUERY2 = baza.CreateQueryDef(“”,sqlik) 与ZAP_QUERY2 ![abc] = Edit_Form.abc.Text ![bcd] = Edit_Form .bcd.Tex ..
发布时间:2020-06-01 00:11:16 其他开发

VBA是否包含注释块语法?

在VBA中,有一种简短的方法可以注释掉一段代码,就像Java使用 /*...*/ 一样? 解决方案 尽管没有语法,但仍可以使用内置的块注释按钮来关闭: 如果尚未查看“编辑”工具栏,请右键单击该工具栏并启用“编辑”工具栏: 然后,选择一个代码块,然后点击“评论栏”按钮;或已被注释掉,请使用“取消注释块”按钮: 快速简便! ..
发布时间:2020-06-01 00:10:56 其他开发

变量变化触发事件

是否可以通过更改变量来触发事件?例如。 这将触发事件 Dim t As Integer Dim Fire as Boolean Private Sub Test t = 0 0 Fire = True IIf Fire,t = 1,t = 2 结束子 在事件处理程序中 选择案例t 案例0 '做某事 案例1 '做某事 案例2 '做 ..
发布时间:2020-06-01 00:09:32 其他开发

如何破坏物体

在此代码中,似乎 Set Object = Nothing 并没有破坏 Fs 对象: Sub Test2() Dim Fs作为新FileSystemObject Set Fs = Nothing MsgBox Fs.Drives .Count'这行有效 End Sub 最后一行没有错误!多数民众赞成表示 Fs 对象仍然存在,对吧?。 那么如何销毁这个 ..
发布时间:2020-06-01 00:09:29 其他开发

VBA:Zip文件输出重命名

当我解压缩时,我正在尝试重命名文件的输出。我试过重命名为 test.xls ,但是它抛出一个对象变量未设置错误。除了扫描 .datecreated 文件夹中的所有文件之外,还有其他方法吗?如果有办法重命名解压缩文件,那将是最佳选择。 Set oApp = CreateObject(“ Shell.Application” ) oApp.NameSpace(“ C:\Users\ ** \ ..
发布时间:2020-06-01 00:08:41 其他开发

使用vba从多个子文件夹复制文件

我已经看过一些文档,但是到目前为止,我无法为我的特定项目复制任何东西。 我的代码指向一个目录包含60个左右的子文件夹。这些子文件夹中有多个.PDF / .XLS等文件。如果文件未嵌入子文件夹中,则以下代码可以正常工作,但是我需要做的是能够遍历子文件夹并拉动文件本身进行移动。另外,有没有办法最终通过通配符名称提取文件?预先感谢您的帮助。 Dim FSO As Object Dim ..
发布时间:2020-06-01 00:08:11 其他开发

自定义按钮事件处理类

1)我有一个带有一些按钮的窗体(它在Access中,但我想它也适用于Excel)。 2)我有一个自定义类,可以帮助我调试该表单(以及将来可能添加的表单)。 该类仅记录表单事件触发时的时间,例如加载,卸载,脏,退出等。 我希望该类具有记录事件的能力。 我知道这可以通过使用标准模块并在其中加载公共集合来完成。或者直接使用表单的事件。 但是如果可能的话,我想将其 all 封 ..
发布时间:2020-06-01 00:08:08 其他开发

IsNull,IsEmpty,= Empty和空字符串(即“”)之间有什么区别?为什么我要使用变体

我试图了解什么是Null以及什么是Empty变量。他们是一样的吗?空字符串如何放入? 创建MS Access表时,为什么字段具有“允许零长度字符串”选项? 我一直在努力将Access数据库中的数据加载到变量中(例如,使用DAO或ADO),我发现自己必须声明所有使用Variant的变量。对我来说这似乎是错的。 没有人有任何很好的示例代码来演示这些代码之间的区别,您能解释为什么我会使 ..
发布时间:2020-06-01 00:06:42 其他开发