Here is what I put in my routine:

	if m.tlLockHeaderRow && we need to prevent headers from modifying
			** Code from Borislav Borissov
			loSheet.range(m.lcRange).select
			loExcel.Selection.Locked = .t.
*			loExcel.ActiveWorkbook.ActiveSheet.Protect(,.t.,,.t.)
    endif 	

With protect none of the cells could be edited. Without protect all cells including headers can be edited. Need more help to get it right.

Thanks again.