Close All Open Excel Files With VBA Open Close File issue unsolved

[fixer]

vba is placed in a seperate file 1.xlsm
now what i need
there can be 2-3 or it can be 4 files opened along with this 1.xlsm
i will be in 1.xlsm file & i will ran the macro
now what i need is when i ran the macro it should go to next open file and use ALT+ F4(this is shorcut key to close the excel file) and that will be close and then again go to next open file and use ALT+ F4 and again if there is a file then do the same do till all files are closed except 1.xlsm
and i wanted to inform u sir by doing ALT+ F4 only my file is closing and i want to close all the file by this way only sir
So plz have a look into this problem and help me in solving this problem
we have to solve this problem only by vba only sir so plz help sir & mam

[Excel Fox]

Try this

Sub CloseAllOtherWorkbooks()
'
' CloseAllOtherWorkbooks Macro
' Keep this workbook open and close all other workbooks in this instance
'
' Keyboard Shortcut: Ctrl+q
'
    Dim wbk As Workbook
    Dim strBookNames() As String
    Dim lngBooksCount As Long
    
    For Each wbk In Application.Workbooks
        If wbk.Name <> ThisWorkbook.Name Then
            lngBooksCount = lngBooksCount + 1
            ReDim Preserve strBookNames(1 To lngBooksCount)
            strBookNames(lngBooksCount) = wbk.Name
        End If
    Next wbk
    For lngBooksCount = 1 To lngBooksCount
        'Change to True if the files have to be saved before closing
        Workbooks(strBookNames(lngBooksCount)).Close False
    Next lngBooksCount
    Set wbk = Nothing
    Erase strBookNames
    
End Sub

[fixer]

Thnx ExcelFox for helping me in solving this problem
Actually i downloaded the file and i open the macro file and i ran it but its not working i tried many code to close the file but its not closing
when i close the file and then i open then it is closing the code is perfect no doubt
i learned that once i download the file and it opens by default then macro will not work until its close and reopen again
i searched on google there was alt+F4 which is closing that file but i think if we use that also in the vba code then it will also not work i will manage it

[Excel Fox]

Not sure I understand that. So you're saying the code I sent works, right?

[fixer]

No doubt ur code is perfect sir