Question

我正在尝试从Excel调用GUIDFromString Access函数。

Dim accessApp
Set accessApp = CreateObject("Access.Application")

accessApp.OpenCurrentDatabase (ThisWorkbook.Path & "\" & "DB.accdb")

MsgBox accessApp.GUIDFromString("PassingAString")

accessApp.Quit

Set accessApp = Nothing

我尝试了不同的方法，但是都会产生错误。上面正在生成：

ActiveX component can't create object

（https://msdn.microsoft.com/en-us/vba/access-vba/articles/application-guidfromstring-method-access）

编辑：我刚刚看过这篇帖子（Password hash function for Excel VBA），使用的是克里斯的代码。

Answer 1

GUIDFromString仅适用于实际的GUID字符串。

访问中：

? GUIDFromString("some string")

ActiveX组件无法创建对象

? References(1).Guid
{000204EF-0000-0000-C000-000000000046}

? GUIDFromString("{000204EF-0000-0000-C000-000000000046}")
?  À  ?

这是一个字节数组，因此Debug.Print或MsgBox并不是很有意义，但是使用GUID字符串，该方法就可以工作。

从Excel调用访问功能

1 个答案: