Windows 10 Pro_x64 + Excel2013_x86 VBA で JScript を少し試してみる

Windows 10 Pro_x64 + Excel2013_x86 VBA で JScript を少し試してみる
　
VBA だと like "[]" で単純な正規表現風の比較はできるのだが
もう少し柔軟性が欲しいので試してみる
※C:\windows\syswow64\regsvr32 C:\ChakraCore.dll はエラーを吐いてNG
　
参考にしたのは以下のサイト
VBAでJScriptの正規表現を使う
JavaScript エンジン Chakra を無理矢理使う
・ツール->参照設定　より以下をチェックする
　Microsoft Script Control 1.0

Private Sub CommandButton1_Click()

'

    Dim js      As New ScriptControl

    Dim result  As String

    '

    '   Microsoft Script Control 1.0を

    '   チェックしない場合は以下のコードになる

    '   Dim js As Object

    '   Set js = CreateObject("ScriptControl")

    '

    js.Language = "JScript"

    '

    'スクリプトを定義する(JScript)

    '

    Dim script As String

    script = "'abcdefg'.match(/a/)"

    '

    'ヒットした文字を出力

    '

    result = js.Eval(script)

    Debug.Print result

End Sub