Skip to content

Instantly share code, notes, and snippets.

@l2m2

l2m2/check_ppt.vbs

Created October 11, 2021 06:36
Show Gist options
  • Save l2m2/b3fa04acc9cd876911baf81e51a6eae8 to your computer and use it in GitHub Desktop.
Save l2m2/b3fa04acc9cd876911baf81e51a6eae8 to your computer and use it in GitHub Desktop.
Download ZIP
检查PowerPoint组件是否可用
Raw
check_ppt.vbs
Set objPPT = CreateObject("PowerPoint.Application")
If IsNull(objPPT) Then
MsgBox("Create PowerPoint.Application Failed.")
Else
MsgBox("Create PowerPoint.Application OK.")
objPPT.Quit
End If
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment