Gruppe
Extern
Problem
Die Programmversion der in Zelle B1 genannten Anwendung wird gemeldet. WindowsScriptingHost muss installiert sein.
StandardModule: Modul1
Sub ProgrammVersion()
Dim objFSO As Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
MsgBox objFSO.GetFileVersion(Range("B1").Value)
End Sub