ブックが完全に閉じられたかどうか確認する
 ブックが完全に閉じられてから次の処理へ進みたいといった場合は、
Nameプロパティを使って該当のブックが完全に閉じられたかどうかを確認してから
次の処理へ進む方法があります。
 サンプルマクロでは、開かれているすべてのブックのNameプロパティを確認して
ブック「test.xls」が閉じられたかどうかを判断しています。

Sub Sample()

    Dim MyBook As Workbook
    Dim Myflg As Boolean

    Workbooks("test.xls").Close

    Do
        Myflg = False

        For Each MyBook In Application.Workbooks
            If MyBook.Name = "test.xls" Then
                Myflg = True
            End If
        Next

    Loop While Myflg = True

    MsgBox "test.xlsは完全に閉じました。次の処理を行います。"

End Sub

Excel97



戻る


Excel Word Access VBA! モーグ