From 99b1438dfe6a9f1a8cfca711d862a8ac940c2836 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 25 Mar 2016 12:59:32 +0000
Subject: [PATCH] RxFPC:TRxDBGridExportSpreadSheet - fix formula expression
 string

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4599 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/trunk/rxdbgridexportspreadsheet.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/rx/trunk/rxdbgridexportspreadsheet.pas b/components/rx/trunk/rxdbgridexportspreadsheet.pas
index aa093ea35..8c2a8632d 100644
--- a/components/rx/trunk/rxdbgridexportspreadsheet.pas
+++ b/components/rx/trunk/rxdbgridexportspreadsheet.pas
@@ -370,7 +370,7 @@ begin
         end;
 
         FWorksheet.WriteFormula(FCurRow, FCurCol,
-          Format('=%s(%s%d:%s%d)', [SF, GetColString(D), FFirstDataRow, GetColString(D), FLastDataRow]));
+          Format('=%s(%s%d:%s%d)', [SF, GetColString(D), FFirstDataRow+1, GetColString(D), FLastDataRow+1]));
       end
       else
       begin