Data Structure
Networking
RDBMS
Operating System
Java
MS Excel
iOS
HTML
CSS
Android
Python
C Programming
C++
C#
MongoDB
MySQL
Javascript
PHP
Physics
Chemistry
Biology
Mathematics
English
Economics
Psychology
Social Studies
Fashion Studies
Legal Studies
- Selected Reading
- UPSC IAS Exams Notes
- Developer's Best Practices
- Questions and Answers
- Effective Resume Writing
- HR Interview Questions
- Computer Glossary
- Who is Who
How to Count the Page Numbers of Pdf Files in Excel?
You've come to the correct place if you've ever needed to figure out how many pages there are in a PDF file and wanted an easy way to track this information in Excel. This article will teach you how to use Excel's robust features to extract and record the page numbers of PDF files in a quick and efficient manner. Having a rapid and automated approach to count the page numbers can be very helpful for anyone working with huge amounts of PDF files, whether they are researchers, professionals, or students. We'll use Excel to automate this procedure rather than manually reading through each PDF file and counting the pages.
This tutorial will walk you through each step, from setting up the Excel worksheet and installing the appropriate software to extracting and storing the page numbers from various PDF files. By the end, you'll have an Excel spreadsheet that can retrieve and update your PDF documents' page counts automatically. So let's get started and see how to use Excel to count the pages in PDF files. Prepare to streamline your processes and increase production!
Count the Page Numbers of Pdf Files
Here we will first insert a VBA module and then run it to complete the task. So let us see a simple process to learn how you can count the page numbers of PDF files in Excel.
Step 1
Consider any Excel sheet.
First, right-click on the sheet name and select View Code to open the VBA application.
Right click > View code.
Step 2
Then click on Insert and select Module, then copy the below code into the text.
Insert > Module > Copy.
Code
Sub Test()
Dim I As Long
Dim xRg As Range
Dim xStr As String
Dim xFd As FileDialog
Dim xFdItem As Variant
Dim xFileName As String
Dim xFileNum As Long
Dim RegExp As Object
Set xFd = Application.FileDialog(msoFileDialogFolderPicker)
If xFd.Show = -1 Then
xFdItem = xFd.SelectedItems(1) & Application.PathSeparator
xFileName = Dir(xFdItem & "*.pdf", vbDirectory)
Set xRg = Range("A1")
Range("A:B").ClearContents
Range("A1:B1").Font.Bold = True
xRg = "File Name"
xRg.Offset(0, 1) = "Pages"
I = 2
xStr = ""
Do While xFileName <> ""
Cells(I, 1) = xFileName
Set RegExp = CreateObject("VBscript.RegExp")
RegExp.Global = True
RegExp.Pattern = "/Type\s*/Page[^s]"
xFileNum = FreeFile
Open (xFdItem & xFileName) For Binary As #xFileNum
xStr = Space(LOF(xFileNum))
Get #xFileNum, , xStr
Close #xFileNum
Cells(I, 2) = RegExp.Execute(xStr).Count
I = I + 1
xFileName = Dir
Loop
Columns("A:B").AutoFit
End If
End Sub
Step 3
Then click F5 to run the module, select the folder containing the pdf files, and click Ok.
F5 > Select Folder > Ok.
Then you can see that page numbers will be displayed along with the PDF names. This is how you can count the page numbers of PDF files in Excel.
Conclusion
In this tutorial, we have used a simple example to demonstrate how you can count the page numbers of PDF files in Excel to highlight a particular set of data.
707 Views
