diff --git a/components/fpspreadsheet/xlsbiff2.pas b/components/fpspreadsheet/xlsbiff2.pas
index f31e80182..5c9471b3f 100755
--- a/components/fpspreadsheet/xlsbiff2.pas
+++ b/components/fpspreadsheet/xlsbiff2.pas
@@ -1732,7 +1732,7 @@ var
   s: ansistring;
   len: Integer;
 begin
-  s := UTF8ToAnsi(AString);
+  s := ConvertEncoding(AString, encodingUTF8, FCodePage);
   len := Length(s);
 
   { BIFF Record header }