特定ワークブックを閉じる

BOOK_NAMEとCOPY_BOOK_NAMEだけを開いていたら閉じる

Dim num As Long
For num = Workbooks.Count To 0 Step -1
If StrComp(Workbooks(num).Name, BOOK_NAME) = 0 Or StrComp(Workbooks(num).Name, COPY_BOOK_NAME) = 0 Then
Workbooks(num).Close
End If
Next

後ろから見ていかないとエラーになる。

最初、StrCompではなく、「=」で文字列の比較をやろうとしたらエラーがでました。