powerpoint printing

Guessed · #1 06-26-2019, 04:11 PM

For Word, I would put a linked content control into the footers and then the code could simply change that document property before each print. Put in a linked CC by going Insert > Quick Parts > Document Property > Subject (for example)

Code:

Sub PrintABunch_Word()
  Dim i As Long, sFoot as string
  sFoot = "ABC0300219"
  For i = 1 To 200
    ActiveDocument.BuiltInDocumentProperty("Subject") = sFoot & Format(i, "000")
    ActiveDocument.PrintOut
  Next i
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
VB Printing command in PowerPoint	blake20	PowerPoint	2	07-28-2015 04:22 AM
Powerpoint 2011 printing problems	jerryny	PowerPoint	0	03-31-2015 09:17 PM
Printing hi res images from powerpoint to pdf output?	miriamallen	PowerPoint	0	02-29-2012 09:54 AM
Powerpoint printing issues	DWeuve	PowerPoint	0	10-04-2011 08:14 AM
Powerpoint printing issue	eidius	PowerPoint	1	01-13-2011 07:38 AM