0

製造スケジュールの生産ノートを更新するプロジェクトに取り組んでいます。データを製造スケジュールに取り込むマクロを作成しましたが、ファイル内のマクロを 15 分ごとに自動的に実行する必要がありますが、ユーザーが製造スケジュールを開いている間のみです。特定の時間で「Application.OnTime」を使用してみましたが、これは、閉じている場合は製造スケジュールを開くようです。私はVBAにかなり慣れていないので、コードに関する支援をいただければ幸いです。私が使用しているコードはかなり基本的なものです:

Private Sub Workbook_Open()

'Application.OnTime TimeValue("08:00:30"), "Open_SFCDB"
'Application.OnTime TimeValue("08:16:30"), "Open_SFCDB"
'Application.OnTime TimeValue("08:32:30"), "Open_SFCDB"
'Application.OnTime TimeValue("08:48:30"), "Open_SFCDB"
'Application.OnTime TimeValue("09:04:30"), "Open_SFCDB"
......Etc, Etc for 24 hr period

'End Sub`
4

2 に答える 2

0

それをアクティブなワークブックにして、成功した場合にのみ続行してください。

On Error Resume Next
Workbooks("ManufacturingSchedule").Activate
If Err <> 0 then
   .... do your update etc ....
end if
于 2013-05-15T08:41:20.943 に答える