【VBA】指定のブックが開いていたら閉じる

Public Sub CloseOpenedBook(ByVal fullPath As String)
    Dim fileName As String
    fileName = GetFileNameFromFullPath(fullPath)
    If IsBookOpened(fullPath) Then Call CloseBookByName(fileName)
End Sub