Microsoft Office Forums

Go Back   Microsoft Office Forums > >
Reload this Page Page Count
Register FAQ

Reply
 
Thread Tools Display Modes
  #1  
Old 05-22-2022, 08:56 AM
Purfleet Purfleet is offline Page Count Windows 10 Page Count Office 2019
Expert
  
Join Date: Jun 2020
Location: Essex
Posts: 345
Purfleet is a splendid one to beholdPurfleet is a splendid one to beholdPurfleet is a splendid one to beholdPurfleet is a splendid one to beholdPurfleet is a splendid one to beholdPurfleet is a splendid one to beholdPurfleet is a splendid one to behold
Default
try the below

Quote:
Sub PageCount()

Dim Pagesx As Variant

Pagesx = ActiveWorkbook.Worksheets("Sheet1").PageSetup.Page s.Count

Debug.Print Pagesx



End Sub
Reply With Quote
Reply

Tags
page count

« Previous Thread | Next Thread »


Similar Threads
Thread Thread Starter Forum Replies Last Post
Showing page numer and total page count in TOC Ulodesk Word 5 02-12-2014 01:03 PM
Page Count page count increases on its own -inserts white pages itsema Word 1 03-06-2013 12:48 PM
Page Count Increasing Exponentially BobF Word 3 03-23-2012 12:20 PM
Page Count Word: count total page of each section salmonrose Word 1 10-15-2011 05:10 AM
Mac Word problem - page count hover Peophin Word 0 12-18-2009 01:02 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 10:52 PM.

Contact Us - Privacy Statement - Top

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft