diff --git a/components/fpspreadsheet/source/visual/fpspreadsheetgrid.pas b/components/fpspreadsheet/source/visual/fpspreadsheetgrid.pas
index 4e44ea349..a1bb1e319 100644
--- a/components/fpspreadsheet/source/visual/fpspreadsheetgrid.pas
+++ b/components/fpspreadsheet/source/visual/fpspreadsheetgrid.pas
@@ -7360,7 +7360,7 @@ begin
     parser := TsSpreadsheetParser.Create(Worksheet);
     try
       try
-        parser.Expression := AExpression;
+        parser.LocalizedExpression[Worksheet.FormatSettings] := AExpression;
       except
         on E: Exception do begin
           AErrMsg := E.Message;