时间戳

首页 > 解决方案 > vba/Office：如何从“应用程序”对象中获取服务器名称作为字符串？

vba - vba/Office：如何从“应用程序”对象中获取服务器名称作为字符串？

问题描述

有没有办法使用 vba 从“应用程序”对象中获取服务器名称作为字符串？

代码示例如下：

Option Explicit
Sub Test()
    Dim SrvrName As String
    SrvrName = Application.ServerName 'Pseudocode
End Sub

输出示例为：“Excel.Application”、“Outlook.Application”、“Word.Application”等。

我需要将此字符串传递给外部 vbscript 文件。此字符串必须根据使用的应用程序动态更改。

标签： vbaobjectoffice-interop

解决方案

我想你是在追求这个TypeName()功能。

Sub test()
Dim oExcelApp as Variant
Set oExcelApp = Application
MsgBox TypeName( oExcelApp ) 'Outputs: "Application"
End Sub

推荐阅读