clear page breaks

FL.bas

@@ -1646,3 +1646,16 @@ Sub pricegroup_upload_db2()
 
 
 End Sub
+
+Sub clear_page_breaks()
+
+    Dim b As Workbook
+    Dim s As Worksheet
+
+    For Each b In Workbooks
+        For Each s In b.Worksheets
+            If s.DisplayPageBreaks Then s.DisplayPageBreaks = False
+        Next s
+    Next b
+    
+End Sub