ClearSheet(StartCell : Text[10];EndCell : Text[10]) XlWrkSht.Range(StartCell + ':' + EndCell).ClearContents;
ClearSheet(Sheetname : Text[100];StartCell : Text[10];EndCell : Text[10]) XlWrkSht := XlWrkBk.Worksheets.Item(Sheetname); XlWrkSht.Range(StartCell + ':' + EndCell).clear;