function AddRectangle(Row1, Col1, Row2, Col2: Integer): TXLSShape; function AddOval(Row1, Col1, Row2, Col2: Integer): TXLSShape;