clear page breaks

2022-05-12 10:07:54 -04:00 · 2022-05-12 10:07:54 -04:00 · ed4c795a40
parent e2315d3a16
commit ed4c795a40
1 changed files with 13 additions and 0 deletions
--- a/FL.bas
+++ b/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