Omlouvám se za špatné vyjádření
mám k uzavření sešitu tento kod
sesitZdroj.Activate
Application.DisplayAlerts = False
ActiveWorkbook.Saved = True
ActiveWorkbook.Close SaveChanges:=False
cil.Activatecitovat
mám k uzavření sešitu tento kod
sesitZdroj.Activate
Application.DisplayAlerts = False
ActiveWorkbook.Saved = True
ActiveWorkbook.Close SaveChanges:=False
cil.Activatecitovat