Deleting Cell entries then save and overwrite template

[RPIJG]

I'd like to be able to delete the entries in certain cells, then sav
the file as a template (overwriting an existing template), that wa
some information I have entered will be saved in the template whil
other information is removed. How would I go about doing this

 

[Tom Ogilvy]

Open the workbook you want to use, make the changes, do File => Save As,
specify the name of the old template and specify file type in the dropdown
as .xlt.

 

[RPIJG]

ok, that answers my question but I didn't qualify my question wel
enough, I'd like to do this programmatically, sorry

 

[Tom Ogilvy]

sPath = "C:\Myfiles\"
ActiveWorkbook.Saveas Filename:=sPath & _
"MyOldTemplate.xlt", FileFormat:=xltemplate

 

[RPIJG]

and for deleting cell contents, I was using this


Code

 

[Tom Ogilvy]

for your existing code, Selection is misspelled

you could just do

Range("D13:H13").Clearcontents