diff --git a/source/exportgrid.pas b/source/exportgrid.pas
index 514fa8d9..11f1bc96 100644
--- a/source/exportgrid.pas
+++ b/source/exportgrid.pas
@@ -742,8 +742,11 @@ begin
                 Data := FormatNumber(Data);
                 Data := UnformatNumber(Data);
               end;
-              else
-                Data := esc(Data);
+              else begin
+                Data := StringReplace(Data, '\', '\\', [rfReplaceAll]);
+                Data := StringReplace(Data, '''', '\''', [rfReplaceAll]);
+                Data := '''' + Data + '''';
+              end;
             end;
 
             if chkIncludeColumnNames.Checked then