0

我尝试编写 VBA 来连接 yo Hyperion Essbase 以连接到多个工作表并且连接成功

X = EssVConnect("[Macro.xls] Sheet1, sheet2,sheet3 ", "Uname", "Pwd", "Server", "Applicationname", "DB")
            If X = 0 Then
            MsgBox ("Essbase connect is successful")
            Else
            MsgBox ("Essbase connection failed.")
            End If

但是要断开与多张工作表的连接，它不能使用下面的代码，它会返回值 0 而不是 -4

Y = EssVDisconnect("Sheet1, sheet2, sheet3")
            If Y = 0 Then
            MsgBox ("Essbase connect is successful")
            Else
            MsgBox ("Essbase connection failed.")
            End If

请告诉我我必须做哪些更改才能断开与连接的数据库的连接

4

1 回答 1

0

我从未尝试在一个命令中连接和断开多张工作表，但如果您的连接命令有效，我认为断开连接也应该有效。不过，您在断开连接字符串中省略了工作簿的名称。尝试以与在连接字符串中相同的方式列出工作表：

Y = EssVDisconnect("[Macro.xls] Sheet1, sheet2, sheet3")
于 2015-08-31T18:56:16.857 回答