#1
|
|||
|
|||
Lyric slide show - using a variable to pull text from next slide
Hi, I have something I was wondering and if it's possible.
I have a slideshow that is simply song lyrics for a floor prompter. Each slide has 3 text text boxes - a SONG TITLE, LYRIC BODY and NEXT boxes. Currently, I have each box manually filled, and the NEXT box has the title of the next slide (to cue singer to what song is coming up next). Since this slideshow is changed often for different song orders, I was wondering if there was a way to have that NEXT box actually PULL the SONG TITLE from the next slide into it's own box. This would save having to retype the titles into the NEXT box by hand after re-ordering slides every time. Any info will be appreciated, as will any other suggestions for semi-automating this. Thanks! BTW, I'm using Office 2013 on Windows 8, playing back on a Surface Pro (landscape rotated). |
#2
|
|||
|
|||
Probably just a few lines aof code but you need to be exact in your needs.
Are the boxes actually named "SONG TITLE", LYRIC BODY" and "NEXT" (in the selection pane)? Are there any other type of slide? Assuming the answers are YES and NO! Sub getNext() Dim i As Integer Dim strNext As String For i = 1 To ActivePresentation.Slides.Count - 1 strNext = ActivePresentation.Slides(i + 1).Shapes("SONG TITLE").TextFrame.TextRange ActivePresentation.Slides(i).Shapes("NEXT").TextFr ame.TextRange = strNext Next i ActivePresentation.Slides(ActivePresentation.Slide s.Count).Shapes("NEXT").TextFrame.TextRange = "END" End Sub You might also like to know we have a merge addin (not free but cheap) that would completely automate this (fill in ALL the boxes) from a CSV file made in Excel for any number of sets. Simple Merge |
#3
|
|||
|
|||
Thanks for the great info! Let me see if I can make that work...
|
#4
|
|||
|
|||
Ok, not sure how to insert the code. On each slide, I have 3 text boxes, labeled:
LYRICS TITLE NEXT I have lyrics in the lyrics box, the song TITLE in the TITLE box, and I did have the name of the next slide/song in the NEXT box. Do I need to make a separate object to run the VB script to pull in the title? When I try to run the macro, I get a "Item TITLE not found in the Shapes collection". Sorry I'm slow on this, just never used VB scripting before... would love to make this work though! Thanks again. |
Thread Tools | |
Display Modes | |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Text typed on slide x ports to slide y automatically? | Thinker | PowerPoint | 5 | 07-26-2012 11:59 PM |
slide show inside a slide | wbeasley | PowerPoint | 0 | 03-16-2012 09:50 PM |
slide image wont copy with text to new slide | lewis.mulhollen | PowerPoint | 1 | 12-17-2011 03:17 AM |
PP 2010 .avi file plays during slide show, but causes the slide show to loop to begin | VictorS | PowerPoint | 0 | 10-16-2010 10:23 AM |
Slide show in HD? | wharfedale | PowerPoint | 1 | 05-17-2010 01:54 AM |