fWorkbook.Application.Workbooks.Open(
Filename:=TemlateName('InventList2.xls'),
ReadOnly:=true,
Password:='template'
);