【タスクスケジューラーで時間指定し、起動ファイルを実行する】

　・全般タブ　名前と説明

　・トリガー　時間と日時指定

　・操作　　　プログラム/スクリプト　bat ファイルを参照

　　　　　　　引数の追加　

　　　　　　　開始　　　

【batファイル】

　・起動用Exceをbatから開く

----------------------------------------------------------------------

@echo off

start "" "C:00 全般\個人フォルダ\13_金属相場\1_相場更新相場起動ファイルbat.xlsm"

exit /B 0　　

-----------------------------------------------------------------------

【起動用Excel】

Private Sub Workbook_Open()

    Dim xWb As Workbook

    Dim wbName As String

    Set xWb = Workbooks.Open("\\個人フォルダ\13_金属相場相場起動ファイル\金属相場更新ファイルver2.xlsm")

 

Application.Run "金属相場更新ファイルver2.xlsm!実行.相場実行"

Workbooks("相場起動ファイルbat.xlsm").Close SaveChanges:=False

End Sub

※ファイルを開きのプログラム実行

 

Private Sub Workbook_Open()

    Dim xWb As Workbook

    Dim wbName As String

       Set xWb = Workbooks.Open("\\個人フォルダ\13_金属相場相場起動ファイル\金属相場更新ファイルver2.xlsm")

Dim objSh As String

objSh = xWb.Worksheets("実行").CodeName

Application.Run xWb.Name & "!" & objSh & ".CommandButton2_Click"

Workbooks("相場起動ファイルbat.xlsm").Close SaveChanges:=False

End Sub

※ファイルを開き、シート上のコマンドボタンをクリックする

 

★タイムスケジュール　→　bat　→　起動Excel.xlsm 　→　更新用Excel.xlsm

この方法はパソコンさえ起動していれば、データの更新が可能になる。