在Excel中通过VBA调用COM加载项

2024-04-15

我有一个用 VSTO 编写的 COM 加载项,我想使用 VBA 宏来调用它。对于加载项,我需要启动它,输入一些文本(自动),然后运行应用程序。该加载项都是按钮,我无法轻松访问代码,因为其中一些代码是加密的(它是第三方)。遗憾的是,当单击此加载项时,记录功能不会拾取任何活动,并且我无法将其添加到 VBA 上的引用列表中。我已经尝试了几种方法来做到这一点,但到目前为止没有一种方法有效。

这是我的代码。正如所写的,它在倒数第二行代码上抛出运行时错误 91 代码。如果我在最后一行列表周围添加括号,则会出现语法错误(预期:=)。我不确定问题是什么?

Sub Test()
    Dim addIn As COMAddIn
    Dim automationObject As Object
    Dim SQL_CODE As String
    Dim PW As String
    Dim Name As String
    Set addIn = Application.COMAddIns("Orion2010")
    SQL_CODE = "SELECT startdatetime, tli, serialnumber, keyname FROM vmfgoperationdata WHERE serialnumber in ( '90102072B030H' , '90102072003BF') and operationname = 'Part Scanning')"
    PW = "password"
    Name = "na\npiotrowski"
    Set automationObject = addIn.Object
    automationObject.Utility.RefreshData Name, PW, SQL_CODE
End Sub

None

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

在Excel中通过VBA调用COM加载项 的相关文章

  • 将所有工作簿工作表复制到新工作簿 VBA

    我正在使用此代码将工作簿中的每张工作表复制到新工作簿中 它工作正常 但它颠倒了工作表的顺序 是否有办法阻止它这样做 Sub copy copies all the sheets of the open workbook to a new o
  • 需要在Excel中合并3列

    我有 3 列 A B C 我需要合并这 3 列 并且我已经应用了 forumala A1 B1 C1输出为 E 列 我需要输出为 D 列 下面的公式将达到您想要的结果 TEXTJOIN TRUE A1 C1 Textjoin 的工作方式类似
  • 调用退出后应用程序未退出

    我有一个小问题 我似乎无法弄清楚 我正在将 DataGridView 它的内容 保存到 xls 文件中 我这样做没有任何问题 除了在我的任务管理器中它仍然显示它正在运行 我已致电 xlApp Application Quit 这被声明为 D
  • 具有多个条件(全部等于相同值)的 IF 语句的替代方案

    还有比这更好的方法吗 假设所有变量都为零 If var1 0 Or var2 0 Or var3 0 Or var4 0 Or var5 0 Or var6 0 Then do something End If 你可以用Select Cas
  • 强力查询历年产品利润对比

    我有一个数据集 其中包含公司 产品 利润和年份 公司每年都会销售少量产品并获得利润 公司没有必要在明年销售相同的产品 他们可能会省略以前的产品并添加新的少量产品 我只想对两年的产品进行逐个比较 如下所示 我的数据集是 Company Pro
  • 实体框架、dll、excel

    我用C 编写了Excel使用的dll 该dll是COM注册的 我与 Excel 的连接没有问题 该 dll 使用实体框架 5 从 SQL Server 数据库检索数据 如果我通过控制台应用程序运行该 dll 则该 dll 工作正常 但是当我
  • 运行时错误“1004”:无法获取 WorksheetFunction 类的 Combin 属性

    我在 Excel 2013 的工作簿中有 VBA 函数 可以根据泊松分布计算 p 值 当 的时候events下面代码中的变量超过 1029 我得到运行时错误 1004 无法获取 WorksheetFunction 类的 Combin 属性
  • 通过 PHP 检测 excel .xlsx 文件 mimetype

    我无法通过 PHP 检测 xlsx Excel 文件的 mimetype 因为它是 zip 存档 文件实用程序 file file xlsx file xlsx Zip archive data at least v2 0 to extra
  • 如何处理 Workbook.SaveAs 覆盖确认上的“否”或“取消”?

    我希望在 VBA 脚本开始修改内容之前提示用户保存工作簿 当 另存为 对话框出现时 如果用户单击 取消 我会引发自定义错误并停止脚本 如果他们单击 保存 并且文件名已存在 我希望询问他们是否覆盖 这是我的代码 Function SaveCu
  • 如何使用 Excel.UriLink.16 更改 Excel URL 的文件关联?

    我正在尝试更改文件关联 以便在另一个浏览器中打开 Excel 单元格中的 URL 根据使用 CMD ftype命令与Excel UriLink 16 我应该能够使用以下命令从 powershell 通过 cmd 执行此操作 To chang
  • 基于多个动态过滤条件过滤Excel范围

    我想过滤数据集 考虑几个可以根据可能值列表动态更改的过滤条件 我有过滤条件team其具有以下值 Team A Team B ALL 其中 ALL 是代表所有团队的通配符 对于第二个标准release 如果我想在过滤器中包含多个版本 则值之间
  • MS Access 中的舍入

    VBA Access 中舍入的最佳方法是什么 我目前的方法是利用Excel方法 Excel WorksheetFunction Round 但我正在寻找一种不依赖Excel的方法 请注意 VBA Round 函数使用 Banker 舍入 将
  • 我需要代码在两行之间复制并粘贴到另一张表中,并给出任何值?

    例如 我有 50 行数据 第一行有学生的名字 我需要代码将数据从 RAM 复制到 RAMESH 在这之间我有 20 行 我需要代码来复制行并将其粘贴到另一张纸中 它不应该问我名字 默认情况下 它必须采用 RAM 和 RAMESH 名称 好的
  • For...VBA 中的下一个循环超出限制

    我正在使用一个For Next循环填充数组 如下所示 ReDim array 1 to 100 1 to 100 For i 1 to 100 Next i But the i计数器似乎总是转到 101 而不是停止在 100 因此 这会在我
  • 如何使用 Excel Interop 获取筛选行的范围?

    我正在为我的项目使用 Excel Interop 程序集 如果我想使用自动过滤器 那么可以使用 sheet UsedRange AutoFilter 1 SheetNames 1 Microsoft Office Interop Excel
  • 如何使用Matlab将数据保存到Excel表格中?

    我想将数据以表格形式保存在 Excel 工作表中 它应该看起来像 Name Age R no Gpa Adnan 24 18 3 55 Ahmad 22 12 3 44 Usman 23 22 3 00 每次当我执行我的文件时类数据 m 下
  • 如何使用 VBA 将 mm/dd/yyyy 更改为 dd/mm/yyyy

    我在使用 VBA 将 mm dd yyyy 转换为 dd mm yyyy 日期格式时遇到问题 我有一个这样的表 仅供参考 该表是从报告工具自动生成的 字符串操作 或任何 Excel 函数可以提供帮助吗 希望知道如何解决这个问题的人可以给我一
  • VBA XML V6.0 如何让它等待页面加载?

    我一直在努力寻找答案 但似乎找不到任何有用的东西 基本上 我是从一个网站上拉取的 当您在该页面上时 该网站会加载更多项目 我希望我的代码在加载完成后提取最终数据 但不知道如何让 XML httprequest 等待 Edited Sub p
  • 如何在字符串vba中包含引号

    我想存储以下文本 Test1 Monday Test Abcdef 全部在字符串中包含引号 我知道要在字符串中包含引号 我必须包含 之前 但在这里这不是一个很好的解决方案 因为我在文本中有太多这样的解决方案 知道如何一次完成这一切吗 您有两
  • 字典、集合和数组的比较

    我正在尝试找出字典与集合和数组相比的相对优点和功能 我发现了一篇很棒的文章here http www experts exchange com articles 3391 Using the Dictionary Class in VBA

随机推荐

  • 计算每个会计年度的不同日期并在查询结果中显示所有日期

    CREATE TABLE customers id int auto increment primary key order date DATE customerID VARCHAR 255 INSERT INTO customers or
  • .split(" ") 与 .split() 之间有区别吗[重复]

    这个问题在这里已经有答案了 之间有根本的区别吗 split vs split 在Python中 我相信 split 的默认值是空格 因此两者应该相同 但我在 hackerrank 上得到不同的结果 根据docs https docs pyt
  • 如何修复传递参数报告 rdlc winform 时本地处理异常未处理的错误?

    我正在做大学项目 在这一点上 他们想要一个真正的证书 为此 我计划通过TextBox要报告的字符串 我在 google 上搜索了如何在 winform 中传递参数 然后我得到了这个一步一步的过程 我执行那个 Step 1 在 Visual
  • java:如何检查整个ArrayList的类型

    我知道如何硬编码一种算法来检查 arraylist 中每个对象的类型 但是有没有其他方法可以一次性检查 ArrayList 的类型 我的意思是我的应用程序只有三种类型的 arraylist 假设我有一个返回 ArrayList 的函数 它的
  • 为什么当我将 js 函数分配给局部变量时会失败?

    在 clojurescript 1 9 89 和 Chrome 50 0 2661 102 中 我可以创建如下日志语句 js console log works 但我无法创建这样的一个 def brokenlog js console lo
  • 在透明 JPanel 上绘画时留下痕迹

    我是一个相对较新的 Java 图形程序员 这是我正在尝试的一个简单程序 这是完整的代码 分为 3 个类 Class 1 import javax swing import java awt import java awt event pub
  • 捆绑包安装在 Nokogiri 停止

    我尝试在 Rails 应用程序上进行捆绑安装 但它卡在 安装 nokogiri 处 错误消息底部的说明显示 Make sure that gem install nokogiri v 1 5 5 succeeds before bundli
  • 用于提前退出循环的功能代码

    如何以函数式风格重构此代码 scala 惯用 def findFirst T objects List T T for obj lt objects if expensiveFunc obj null return obj null asI
  • NSString 地址问题

    我正在尝试将地址打印到字符串 但我在第一个 NSLog 中得到不同的地址 而在第二个 NSLog 中得到相同的地址 那么你能告诉我这是怎么回事吗 这真的让我很困惑 预先非常感谢您的努力 NSString str1 NSString allo
  • VS 2012 调试处理 时出现意外的符号读取器错误

    我在 Visual Studio 2012 中调试程序时遇到问题 当我尝试通过插入一些断点来调试代码时 它们似乎不起作用 当我将鼠标悬停在它们上时 会弹出一条消息 The breakpoint will not currently be h
  • Angular 6 不向 http 请求添加 X-XSRF-TOKEN 标头

    我读了the docs https angular io guide http security xsrf protection以及有关 SO 的所有相关问题 但 Angular CSRF 机制仍然对我不起作用 我无论如何都无法发出自动附加
  • PHP 相当于 JavaScript 的 substring()

    JavaScript 有两个方便的子字符串函数 substring from to and substr start length 这意味着我可以决定 当我从位置 X 开始获取子字符串时 我是否要指定结束的字符串位置或子字符串的长度 一个很
  • Android:无需可怕的(用户)权限即可获取用户ID?

    为了管理用户偏好 目前我正在获取谷歌用户名 实际上是他们在设备上注册的电子邮件地址 并使用它 的散列 作为 用户ID 来区分不同的用户 与所描述的内容相符的东西here https stackoverflow com a 4039018 4
  • 通过蓝牙检测附近的另一台 Android 设备

    好吧 我这里有一个有点奇怪的问题 我正在开发一款 Android 游戏 我希望 Android 手机能够检测到彼此的存在 搜索其他玩家的设备将知道其他玩家设备的蓝牙 MAC 地址 来自游戏数据库 但是设备不会配对 并且设备不会处于可发现模式
  • linux:禁用使用环回并通过一个组件的 2 个 eth 卡之间的线路发送数据[关闭]

    Closed 这个问题是无关 help closed questions 目前不接受答案 我有一个带有 2 个 eth 卡的计算机 通过跳线连接 从第一个到第二个的直接以太网电缆 Linux已安装 我想从第一个网卡向第二个网卡发送数据 我想
  • 是否可以替换 64 位编码图像中的颜色?

    有没有办法获取 64 进制字符串 例如 copyIcon background url data image png base64 iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8 9hAAAAW0lEQV
  • Windows 8 桌面上的 Chrome 浏览器:触摸支持错误

    Windows 8 桌面上的 Chrome 浏览器 版本 23 0 1271 97 被错误地识别为支持触摸事件 实际上它是一个桌面 也就是说 它不支持触摸事件 请参阅 Modernizr Touch 测试示例 http modernizr
  • IE8 中使用 Fancybox 的 jQuery 问题

    我最近收购了一个旧网站 我们谈论的是表格 图像地图 凡是你能想到的 我被要求将 Flash 画廊的旧链接放入灯箱中 我只是用了一个javascript openLightbox 在画廊链接 右上角 上 我知道我知道 但是这看起来并不不合时宜
  • tcp_max_syn_backlog 和 somaxconn 有什么区别?

    我一直在阅读一些关于 Linux 上的 TCP 实现的文章 我很困惑 它们之间有什么区别net ipv4 tcp max syn backlog and net core somaxconn和backlog作为参数传递给listen 系统调
  • 在Excel中通过VBA调用COM加载项

    我有一个用 VSTO 编写的 COM 加载项 我想使用 VBA 宏来调用它 对于加载项 我需要启动它 输入一些文本 自动 然后运行应用程序 该加载项都是按钮 我无法轻松访问代码 因为其中一些代码是加密的 它是第三方 遗憾的是 当单击此加载项