Text field that will populate other fields

JohnWilson · #1 11-22-2012, 03:54 AM

This is only possible if you can code or know a coder.

Sample code

Code:

Sub copyTitles()
Dim oshp As Shape
Dim osld As Slide
Dim strtext As String
If ActivePresentation.Slides(1).Shapes.HasTitle Then _
strtext = ActivePresentation.Slides(1).Shapes.Title.TextFrame.TextRange
For Each osld In ActivePresentation.Slides
If osld.Shapes.HasTitle Then osld.Shapes.Title.TextFrame.TextRange.Text = strtext
Next
End Sub

see www.pptalchemy.co.uk/vba.html for how to use code

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Populate fields from Access	Bill H	Word	2	06-11-2012 07:57 AM
MSWord forms use list to populate successive text fields	2surgeons	Word	4	03-05-2012 07:19 PM
Form Fields - Create blank form text field with if statement?	LAssist2011	Word	5	12-14-2011 03:02 PM
Macro to populate a text form field based on dropdown selection	koloa	Word	0	10-20-2011 11:52 AM
Auto populate text	help i'm stuck!	Word	1	08-13-2010 11:52 AM