在 Excel 中声明 PtrSafe 兼容性

2024-04-19

我在VBA中使用这个语句

Private Declare PtrSafe Function GetTimeZoneInformationAny Lib "kernel32" Alias _
  "GetTimeZoneInformation" (buffer As Any) As Long

这适用于:

  • Win 64 位、Excel 2010 64 位
  • Win 64 位、Excel 1010 32 位

然而我的客户报告了这个词的编译错误PtrSafe。他正在使用 Excel 2010。

我不知道为什么会发生这种情况。有任何想法吗?


好的,我已经重写了这个:

#If VBA7 Then
Private Declare PtrSafe Function GetTimeZoneInformationAny Lib "kernel32" Alias "GetTimeZoneInformation" (buffer As Any) As Long
#Else
Private Declare Function GetTimeZoneInformationAny Lib "kernel32" Alias "GetTimeZoneInformation" (buffer As Any) As Long
#End If

这在 Excel 2010 64 位中的第二行上产生了编译错误,并且该行保持红色,但当我再次编译时,错误不再显示。这是 Excel 的行为方式吗?

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

在 Excel 中声明 PtrSafe 兼容性 的相关文章

  • CSV 实际上是....分号分隔值...(在 AZERTY 上导出 Excel)

    我在这里有点困惑 当我使用 Excel 2003 将工作表导出为 CSV 时 它实际上使用分号 Col1 Col2 Col3 shfdh dfhdsfhd fdhsdfh dgsgsd hdfhd hdsfhdfsh 现在 当我使用 Mic
  • 如何使用 PHP 将数据添加到现有 Excel 文件?

    我有一个包含表单和控件的 Excel 文件 由于不可能使用 PHP 从头开始 创建包含表单 控件和 VBA 代码的 Excel 文件 因此我想我可以将空 Excel 文件上传到服务器 更新它 然后让用户下载它 我知道有一些非常好的 PHP
  • 如何使用循环自动填充表单上的文本框?

    所以我有一个表 其中包含我试图在表单上显示的总计列表 我需要从总计表中获取 10 个总计并显示在表单上的 10 个文本框中 这10个文本框分别是 A1 A2 A3 及其使用DLookup查找 ID 字段编号 这似乎是一个语法问题Me TEX
  • 快速查询listobject vba的方法

    我使用 Excel 2016 需要从列表对象中获取值 有几列 例如三 我需要获取column1中的值 其中column2 smth column3 smth 我怎样才能快速做到这一点 如果您想要 VBA 中的 SQL 语法和速度 那么您需要
  • MS Access DAO 连接在退出时放弃更改

    因此 我有一个 Access 表单 我在其中使用此 VBA 代码以及与 MySQL 数据库的 DAO 连接 一切都很好 但如果用户关闭表单而不单击 保存 按钮 新记录无论如何都会保存 所以我正在寻找的是 是否有任何方法可以在关闭事件时阻止将
  • 公式仅显示具有值的单元格并删除空白行

    我有一个两列宽的列表 其中有空白行 然后我尝试创建第二个列表 该列表仅显示 B 列中包含文本的行 如果 C 列也有一个值 同时删除空白行 例如 这是我的清单 表 1 是我的列表 列表 2 是我希望它的外观 我正确地使用了这个公式 IF RO
  • 读取Excel文件时的Pandas数据框和字符编码

    我正在阅读一个包含多个数值和分类数据的 Excel 文件 name string 列包含外语字符 当我尝试查看 name string 列的内容时 我得到了我想要的结果 但外来字符 在 Excel 电子表格中正确显示 以错误的编码显示 这是
  • 如何禁用Excel自动识别数字和文本

    我使用 Python 生成了 CSV 文件 但是当我在Excel中打开它时 如果可以转换 Excel会自动将字符串识别为数字 e g 33E105变成33 10 105 这实际上是一个ID 而不是一个数字 如何在打开 CSV 文件时在 Ex
  • 当我在 Excel 中运行宏时标题被切断

    我在主电子表格中设置了一个标题 在其中运行不同的宏以对信息进行不同的排序 当我运行宏时 标题的底部部分被切断 我的标题确实包含图像 不确定这是否与之有关 我还在所有宏中运行以下代码部分来格式化第一行信息 Rows 1 1 WrapText
  • 在 PHP 中复制 Excel 循环引用公式

    我正在尝试在 PHP 中复制 Excel 循环引用公式 在 Excel 中我有 A19 A25 A22 result 8771 65 A22 A19 14 1 result 1236 80 A25 10000 但是 当我尝试用 PHP 计算
  • 确定 IE 中的 HTML 按钮是否被禁用

    我最近正在做一些 VBA 工作 我需要签入网页以单击按钮 如果启用 如果禁用则不要单击 但 我不知道如何让 VBA 检查禁用的按钮 这是按钮代码
  • 使用变量 Criteria VBA 自动筛选

    我试图使用变量在工作表上放置自动过滤器 但它不起作用 Dim Criteria As Object i 1 Set Criteria ActiveSheet Cells i 1 MsgBox Criteria Value this retu
  • Power Query 按组的列总和作为新列

    所以我对电源查询很陌生 我只是浪费了一个多小时来寻找可以在许多其他程序中轻松完成的事情 我只想创建一个新列来总结另一列 例如 检查百分比是否正确 如果不正确则将其归一化 我不想分组并减少表格 我一直在左右搜索 并尝试使用诸如 Group S
  • 如何连接引用单元格的百分比[重复]

    这个问题在这里已经有答案了 我知道在引用日期时如何使用连接和文本功能 但无法弄清楚如何在引用单元格的连接公式中显示百分比 您也可以使用 TEXT 函数来实现此目的 例如 CONCATENATE A1 TEXT B1
  • VBA Excel 2010 - 直接从剪贴板粘贴

    我正在尝试直接从剪贴板粘贴到 Excel 文档中并进行转置 Dim DataObj As MSForms DataObject Set DataObj New MSForms DataObject DataObj GetFromClipbo
  • Access 2013/2016 不支持树形视图控件,给出错误消息“用户定义的类型未定义”

    我有一个 VBA 项目 可以完美运行到 Windows 7 32 64 位 和 Office 2010 但是当我尝试在 Office 2013 或 2016 上运行它时 它不会加载树视图控件并在以下位置给出错误 私有 SelectedNod
  • 强制 Access 忘记链接表的用户名和密码

    我有一个通过链接服务器连接到 SQL Server 的 MS Access 数据库 链接表是使用修改后的添加的AttachDSNLessTable程序 stConnect ODBC DRIVER stDriverName SERVER st
  • 通过电子邮件搜索将 Excel 2003 中的数据行复制并粘贴到不同的工作表

    在任何人发表任何言论之前 我已经浏览了几篇与此类似想法相关的帖子 采用不同的搜索条件 然后对其进行修改 但我无法让宏正常工作 这可能是由于我缺乏编程知识 我想做的就是 search的电子邮件地址工作表1如果找到 则将整行复制到下一个空闲行工
  • 无法设置 PageSetup 类的 PaperSize 属性

    我正在尝试使用 VB NET 打印 Excel 电子表格 但出现错误 无法设置 PageSetup 类的 PaperSize 属性 这是我的代码 Dim oldCI As System Globalization CultureInfo S
  • vba powerpoint按名称选择幻灯片

    我正在尝试按名称选择一张幻灯片 我通过大纲添加了标题 下面是不起作用的代码 在幻灯片集合中找不到爱达荷州项目 ActivePresentation Slides Idaho Select 幻灯片的名称和标题占位符中的文本彼此无关 除非您已重

随机推荐