Skip to content

Instantly share code, notes, and snippets.

@bohops

bohops/Excel_VBA_Macro_JScript

Created September 2, 2020 20:41
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save bohops/2255f320f9dd67e9e41b30455954b1a7 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save bohops/2255f320f9dd67e9e41b30455954b1a7 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Excel_VBA_Macro_JScript
Sub Workbook_Open()
RunMe
End Sub
Function RunMe()
Dim ScriptEngine
Set ScriptEngine = CreateObject("MSScriptControl.ScriptControl")
ScriptEngine.Language = "JScript"
ScriptEngine.Eval ("var shell = new ActiveXObject('WScript.Shell');shell.Popup('text');")
End Function
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment