メールのワンクリックでエクセルに入力する方法

メールのURLをクリックするだけでエクセルの処理が動くプログラムを作っていきます。

今回は外枠であるURLをクリックすると自動でエクセルを起動して、終了する処理を作成します。

①以下のvbsを作成します。

'Excelを起動する
Set xlApp = CreateObject("Excel.Application")
'ワークブックを開く(パスを入力)
 xlApp.Application.Workbooks.Open("C:/path/hoge.xlsx")
'Excelを非表示に
xlApp.Application.Visible = false
'//////////////////////
'処理を入力
'//////////////////////
'Excelを終了する
xlApp.Quit
Set oXlsApp = Nothing

②作成したvbsとExcelをサーバに置きます。

③メールの本文にvbsのURLを入力します。