diff --git a/src/Handler/Utils/Table/Pagination.hs b/src/Handler/Utils/Table/Pagination.hs
index de94f9949..9a22aab88 100644
--- a/src/Handler/Utils/Table/Pagination.hs
+++ b/src/Handler/Utils/Table/Pagination.hs
@@ -393,6 +393,8 @@ data DBCsvMode
   | DBCsvExportExample
   | DBCsvAbort
 
+makePrisms ''DBCsvMode
+  
 data DBCsvDiff r' csv k'
   = DBCsvDiffNew
     { dbCsvNewKey :: Maybe k'
@@ -1034,7 +1036,8 @@ dbTable PSValidator{..} dbtable@DBTable{ dbtIdent = dbtIdent'@(toPathPiece -> db
             | PagesizeLimit l <- psLimit'
             , selectPagesize
               -> do
-                E.limit l
+                unless (has (_FormSuccess . _DBCsvExport) csvMode) $
+                  E.limit l
                 E.offset (psPage * l)
           Just ps -> E.where_ $ dbtRowKey t `E.sqlIn` ps
           _other  -> return ()