Access 2013/2016 不支持树形视图控件,给出错误消息“用户定义的类型未定义”

2024-05-01

我有一个 VBA 项目,可以完美运行到 Windows 7(32,64 位)和 Office 2010。但是当我尝试在 Office 2013 或 2016 上运行它时。它不会加载树视图控件并在以下位置给出错误:

私有 SelectedNode 作为 MSComctlLib.node

我已经尝试过的事情是:

  1. 彻底关注了这个帖子http://thesmileycoder.com/treeview-working-in-access2013/ http://thesmileycoder.com/treeview-working-in-access2013/

  2. 在 SYSTEM32 和 SYSWOW64 文件夹上重新注册 MSCOMCTL.OCX/MSCOMCT2.OCX 多次。

任何帮助表示赞赏!


感谢您澄清您使用的是 Office 64 位。

你应该看到这个article https://support.office.com/en-gb/article/Choose-the-32-bit-or-64-bit-version-of-Office-ca3253e5-ac01-4242-8a64-b56111a6f32d

具体来说,该部分:

32 位版本的 Office 中包含的大部分内容也包含在 64 位版本的 Office 中。

以下是 64 位版本 Office 中没有的一些内容。

ActiveX 控件库、ComCtl- 该库包含用于构建解决方案的 ActiveX 控件。它最常用于 Microsoft Access、Microsoft Excel 和 Microsoft Word。

SharePoint 列表控件 SharePoint 技术中的列表视图在 64 位版本的 Office 中不可用。

其次是:

ActiveX 控件库、ComCtl- 使用这些控件的任何解决方案都不起作用。其中一些控件没有好的替代方案。

EDIT和这个page https://msdn.microsoft.com/en-us/library/office/ee691831%28v=office.14%29.aspx2010 年更详细地说明了这一点:

Office 2010 中的本机 64 位进程无法加载 32 位二进制文​​件。这包括MSComCtl的常用控件(TabStrip、Toolbar、StatusBar、ProgressBar、TreeView、ListViews、ImageList、Slider、ImageComboBox)和 MSComCt2 的控件(Animation、UpDown、MonthView、DateTimePicker、FlatScrollBar)。这些控件由以前版本的 Microsoft Office 安装,并由 32 位 Office 2010 安装。替代方案必须是当代码迁移到 64 位 Office 2010 时,发现使用这些控件的现有 Microsoft Office VBA 解决方案。64 位 Office 2010 不提供 64 位版本的通用控件。

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

Access 2013/2016 不支持树形视图控件,给出错误消息“用户定义的类型未定义” 的相关文章

  • VBA 错误处理有哪些好的模式? [关闭]

    Closed 这个问题是基于意见的 help closed questions 目前不接受答案 VBA 中有哪些好的错误处理模式 特别是 在这种情况下我应该做什么 some code some code where an error mig
  • VBA改变复杂的公式

    我使用带有单选按钮的代码 请参阅最后一个代码 将新行插入到第 15 行 这会将旧数据向下推 同时将相同的公式复制到之前曾经存在过的第 15 行 在第 15 行中 单击该按钮 单击该按钮后 我可以在 E15 中输入 3 位数据 然后按 Ent
  • 检查excel 2010 vba中是否存在目录

    我正在让用户输入一些信息MyBarcode and MyScan将用于创建目录 如果该目录存在 我想显示一条指示该目录的消息 然后返回到用户可以输入数据的步骤 这vba位于下面 除了我需要一些帮助的目录检查之外 似乎可以正常工作 我希望这是
  • 根据每日价格时间序列计算每周收益

    我想根据每日价格的时间序列计算共同基金的每周回报 我的数据如下所示 A B C D E DATE WEEK W DAY MF PRICE WEEKLY RETURN 02 01 12 1 1 2 7587 03 01 12 1 2 2 76
  • 升级到 Office 365 专业增强版后 Excel VBA 运行速度极慢

    我粘贴部分代码如下 这段代码是解析从HTTP请求得到的JSON字符串 根本没有工作表 工作簿操作 在office升级到office365专业增强版之前 效率还是蛮高的 但升级后 解析一个不到2秒的json 却要花费几分钟 我个人不明白根本原
  • WorksheetFunction 数组大小限制

    我正在尝试使用以下百分位数函数计算 VBA 内数组 arr1 中包含 100000 个值的数据集的 99 5 百分位数 Pctile Application WorksheetFunction Percentile arr1 0 995 P
  • 如何从示例中给出的某些输入自动生成某些 Excel 字符串?

    基本上我想要在Excel中执行以下操作 如果我在表 1 中输入以下内容 我需要它 A B C 1 Name Size Color 2 Shirt S M L Red Green 3 Trouser 32 34 White Black Gre
  • 为什么我的应用程序会触发另一个应用程序的安装程序?

    当使用旧版 VB6 应用程序并在该应用程序中打开某些特定表单时 会弹出属于 Microsoft Navision 安装在同一台计算机上 的 Windows Installer 如附图所示 每次都会发生这种情况 但仅限于这台机器 VB6应用程
  • 使用用户定义函数的 VBA 数据验证

    我有一个用户定义的函数 我想在自定义数据验证中使用它 我的函数工作正常 但是当我在数据验证中使用它时 每次都会出错 有代码 Public Function AlphaNumeric pValue As Boolean Dim LPos As
  • 将 Dir 与旧文件后缀一起使用

    最近问的一个question https stackoverflow com questions 68282702包括代码 strFilename Dir fPath xls 它 成功 用于查找以xls and xlsx 我的问题是 为什么
  • VBA中如何四舍五入到小数点后两位?

    在单元格 B2 中 在进行计算之前 我的变量值为 297 123 在 VBA 中 我想将其四舍五入为 297 12 请参阅下面的代码了解我的尝试 两者都将燃油评估为 297 我做错了什么 Dim fuel As Integer Dim li
  • Excel VBA 中.Delete 和.Clear 的区别?

    有什么区别Worksheets 1 Cells Delete and Worksheets 1 Cells Clear 我问这个是因为我一直用 Clear清除我的工作表内容 但在我之前的帖子中我发现Worksheets 1 Cells De
  • 将图表导出为图像有时会生成空文件

    I m doing a macro that exports all the charts in the sheet and then opens Outlook and attaches them However I ve noticed
  • 不建议在 VB.Net 中使用 Mid()、Instr()、LBound()、UBound() 等吗?

    我有 C 背景 但现在主要使用 VB Net 在我看来 上述函数 以及其他函数 例如 UCase LCase 等是 VB6 及之前版本的遗留物 在 VB Net 中使用这些函数是不受欢迎的 还是纯粹取决于个人喜好 我个人的偏好是远离它们 但
  • VBA 激活 Internet Explorer 窗口

    我正在制作一个宏 用于打开 Internet Explorer 导航并登录网站 一切正常 但我需要将 IE 窗口放在前面并激活它 这样我就可以使用SendKeys在上面 我发现网站和视频在名为的命令上有不同的方法AppActivate我已经
  • 从网站上的表格中抓取数据,而无需搜索标签

    这是这个问题的延续使用 InStr 搜索引号 空格 冒号等 https stackoverflow com questions 52673819 using instr to search for quotes spaces colons
  • 文本到行 VBA Excel

    我有一个电子表格 其中包含大约 4000 行数据 其中一列数据具有唯一的订单号 我希望使用 作为分隔符将其分隔 所以本质上我想要 Name Order Date Jane 123 001 111 08 15 2013 Gary 333 12
  • 如何模拟“焦点”和“打字”事件

    尝试模拟 onfocus 和打字事件 但它不起作用 Sub Login MyLogin MyPass Dim IEapp As InternetExplorer Dim IeDoc As Object Dim ieTable As Obje
  • 无法在我的抓取工具中设置超时选项以防止无限循环

    我已经使用 IE 在 vba 中编写了一个脚本 在其搜索框中的网页中启动搜索 通过点击搜索按钮根据搜索填充结果 网页加载它是searchbox几秒钟后它就会打开 但是 我的下面的脚本可以处理这个障碍并以正确的方式执行搜索 现在 我有一个稍微
  • 在 Excel 表格中选择多列的代码

    我是 Excel VBA 新手 我需要修改我的代码 以便我能够进一步进行 我想在 Excel 表格中选择多个表格列 这是我的代码 Dim ws As Worksheet Dim tbl As ListObject Set ws Sheets

随机推荐

  • 连接字符串列中的唯一字符

    我有一个 data frame 其中有一个字符串列 city 它由用 分隔的连接字母组成 dt data frame id letters 1 6 city c A B B D A D G A C F G C D dt id city 1
  • 如何在nextjs中安装tailwind元素?

    我正在 nextjs 中为滑块安装顺风元素 但它在 nextjs 中不起作用 有任何解决方案可以轻松安装它 我遵循这个方法 1 1 https tailwind elements com quick start 当我添加此导入 tw ele
  • Svelte:如何等待组件渲染

    我正在制作一个基于套接字连接的简单应用程序 基本上 一个用户决定其他用户可以看到什么 功能之一是为其他用户启动计时器 因此 有一个带有timerState变量和startTimer函数的Timer组件 当用户连接到套接字时 计时器组件与整个
  • Angular Material如何使按钮与输入高度相同

    我有这个小表单 其中包含两个字段 轮廓外观 和一个按钮
  • 如何将 HashMap> 存储在列表中?

    我的哈希图将字符串存储为键 将数组列表存储为值 现在 我需要将其嵌入到列表中 也就是说 它将采用以下形式 List
  • 通过NVM为特定项目(文件夹)设置不同的节点版本

    我知道我可以通过以下方式更改节点版本nvm useCLI 命令 但是 我想为某个项目 文件夹 设置不同的特定节点版本 它已更改为nvm use命令但它恢复为default version每当我重新启动terminal or webstorm
  • 当条件满足时如何进入调试模式?

    有没有办法在满足一定条件时进入调试模式 例如 假设我想在以下行进入调试模式i 1变为真 using System namespace ConditionalDebug public class Program public static v
  • CodeIgniter - 为什么使用 xss_clean

    如果我正在清理我的数据库插入 并且还转义我编写的 HTMLhtmlentities text ENT COMPAT UTF 8 是否还需要使用 xss clean 过滤输入 它还有什么其他好处 xss clean http docs gip
  • 编写大 JSON 文件避免内存不足问题的最佳方法

    首先 请注意今天是我第一天GSON 我正在尝试使用编写 Json 文件GSON图书馆 我有几千个JsonObjects里面一个ArrayList 当写入 Json 文件时 它应该看起来与此类似 hash index 00102x05h06l
  • 在 docker 中使用 selenium 运行 django 测试

    为了执行测试 我通常运行一个单独的容器 docker compose run rm web bin bash 其中web是django的容器 我不时从 shell 执行 py test 为了能够使用 django 从容器访问 seleniu
  • GridSearchCV:每次函数完成循环时打印一些表达式

    假设你有一些功能function在Python中通过循环工作 例如 它可以是一个计算某个数学表达式的函数 例如x 2 对于数组中的所有元素 例如 1 2 100 显然这是一个玩具示例 是否可以编写这样的代码 每次function经过一个循环
  • Delphi XE2 中的 TDataModule.ClassGroup 伪属性到底有什么作用?

    我尝试将一个组件从一个数据模块复制并粘贴到 Delphi XE2 中的另一个数据模块中 该组件是一个 Fast Report 数据源链接组件 数据模块是全新的 刚刚在 XE2 中创建 其他人也遇到了同样的问题并报告了质量中心为106369
  • 如何更改操作栏上标题文本的大小?

    有一个ActionBar在每个 Android 4 0 应用程序上 它都有一个标题 我需要缩小这个尺寸 但我不明白我该怎么做 因为ActionBar不为其提供公共方法 Remark 我不想使用自定义视图 实际上 您可以对ActionBar
  • 如何获取javafx imageView中显示图像的宽度/高度?

    我需要获取 imegView 中显示图像的宽度 高度 并将其与 imageView getImage getWidth getHeight 中的原始图像大小进行比较 并在用户从应用程序 GUI 中调整其大小时监听更改 I get this
  • 从一系列图像创建视频?

    如何从一系列 png 图像创建视频 在 Android 中是否有可能任何人建议我这样做 是的 可以通过一系列图像生成视频 不完全是视频 而是类似视频 有一种所谓的 mpeg 流 它由多部分方式的 JPEG 图像组成 您可以从源 基本上是远程
  • “设备重置为出厂设置”是否会使数据无法恢复? [关闭]

    Closed 这个问题是无关 help closed questions 目前不接受答案 关于德克萨斯大学的结论 信息安全报告 https wikis utexas edu display ISO Google Android Harden
  • Firefox api - 从我的程序访问

    是否可以从我的程序访问 Firefox 信息 具体来说 我需要读取活动选项卡中打开的站点的 URL 这样的事情可能吗 我想我可以编写扩展来允许我做这样的事情 但我想知道某些 FF api 是否可行 使用MozRepl http wiki g
  • Javascript 函数无法返回元素

    所以我正在与手动表 http handsontable com 目前项目的 jQuery 插件 我已经编写了一些自定义函数来使用它 我目前遇到问题的函数是我编写的一个函数 用于返回当前选定的单元格 当用户仅选择一个而不是多个时 是的 已检查
  • 如何在“构建开始前删除工作区”部分中使用排除文件夹选项?

    我想从删除中排除 node modules 文件夹 但它会删除所有工作区 我已经尝试了很多带有 在目录上应用模式 选项和不使用它的模式 其中一些 node modules node modules 我也发现了一个问题https issues
  • Access 2013/2016 不支持树形视图控件,给出错误消息“用户定义的类型未定义”

    我有一个 VBA 项目 可以完美运行到 Windows 7 32 64 位 和 Office 2010 但是当我尝试在 Office 2013 或 2016 上运行它时 它不会加载树视图控件并在以下位置给出错误 私有 SelectedNod