Multiple Excel docs opened but i need only one of them closed

[michael0120]

i have a code that get, set, save and close an excel document.
my problem is when i have other excel open, all of them closes

here is my current code which is not mine, i copied it from some one else.

Private Sub Command1_Click()
 
    Dim xlApp As Excel.Application
    Dim xlbook As Excel.Workbook
    Dim xlsheet As Excel.Worksheet
 
    Set xlbook = GetObject("D:\Templates\MayBank.xls")
    Set xlApp = xlbook.Parent
 
 
    xlApp.Visible = False
    xlApp.Windows("MayBank.XLS").Visible = True
    Set xlsheet = xlbook.Sheets("Sheet1")
 
 
    xlsheet.Cells(1, 9) = Text1.Text
    xlsheet.Cells(3, 2) = cboCompany.Text
    xlsheet.Cells(3, 9) = Text2.Text
    Label1 = xlsheet.Cells(5, 1)
 
    xlbook.Application.DisplayAlerts = False
    xlbook.SaveAs "D:\Templates\MayBank.xls", FileFormat:=xlExcel8, AccessMode:=xlExclusive, ConflictResolution:=Excel.XlSaveConflictResolution.xlLocalSessionChanges
    xlbook.Close

[michael0120]

nevermind, i got what i wanted to work..

[Rabbit]

Please use code tags when posting code or formatted data.

Can you post how you solved the problem in case someone else has the same issue?