diff --git a/components/fpspreadsheet/fpspreadsheet.pas b/components/fpspreadsheet/fpspreadsheet.pas
index 289105590..4bf91bcd2 100755
--- a/components/fpspreadsheet/fpspreadsheet.pas
+++ b/components/fpspreadsheet/fpspreadsheet.pas
@@ -3779,7 +3779,7 @@ begin
     begin
       r := ACell^.Row;
       c := ACell^.Col;
-      RemoveCell(r, c);
+      RemoveAndFreeCell(r, c);
       ChangedCell(r, c);
     end else
       WriteBlank(ACell);