Solved

Update bulleted text with a variable

Posted on 2014-02-21
5
215 Views
Last Modified: 2014-03-04
Let's say that I have 3 intended audiences: Water drinkers, Beer drinkers and Milk drinkers. I would like to have a text box control where I can enter in the work Milk and then have that word updated in the bulleted items of the show such as this

Milk drinkers are the smartest people
Other drinkers are envious of Milk drinkers
All the cool people drink Milk

You get the idea. I want the bulleted items to act as if the word Milk (or whatever word or phrase I supply) were always typed in as one would regularly do with a presentation.

Is such a thing possible
0
Comment
Question by:glenn_grubb
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
5 Comments
 
LVL 23

Expert Comment

by:JSRWilson
ID: 39879135
How would you know where to insert the word?

Fairly easy to code but there would have to be some way of finding the insertion points or word to replace.

One way would be to store the last replace word in a tag. How good is your coding?
0
 

Author Comment

by:glenn_grubb
ID: 39880750
Figured it out myself! I can now use VBA to go to a specific line in a specific textbox on a specific slide and change that text to what I want. Will post the code when I clean it up.
0
 
LVL 23

Expert Comment

by:JSRWilson
ID: 39880798
Surely that would mean writing different code for each textbox though plus you will never be able to alter the presentation? Lets's hope there aren't too many things to change!

Maybe the code in this will help too.
0
 

Accepted Solution

by:
glenn_grubb earned 0 total points
ID: 39893437
I know the specific lines I need to change on the specific slides.

First I set a reference to the slide I want to change
Set Kinetic_1 = ActivePresentation.Slides("Kinetic1")

Now I change the line of text in the specific textbox I want to change (this is the formula for kinetic energy applied to a specific approach speed of an aircraft)

    Kinetic_1.Shapes("Kinetic1Text").TextFrame.TextRange.Lines(4).Text = "Ek = ½(2460)(" & Knots & "^)"


Since I named the slides and textboxes, I can add other slides and the code will continue to work.
0
 

Author Closing Comment

by:glenn_grubb
ID: 39902799
I asked for an answer first hoping it would come quickly, when it didn't, I continued to research until I found the answer suitable to the task. I took a little code from here and some from there until I could work out my own solution... sort of a teach a man to fish  kind of scenario
0

Featured Post

Instantly Create Instructional Tutorials

Contextual Guidance at the moment of need helps your employees adopt to new software or processes instantly. Boost knowledge retention and employee engagement step-by-step with one easy solution.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Technology opened people to different means of presenting information, but PowerPoint remains to be above competition. Know why PPT still works today.
PowerPoint is the go-to presentation software for millions of users around the world. Many presentations use basic text features but you can really make special text jump out of your slide by applying this bubble text design process. This article ha…
It’s easy to embed any of your public Prezi presentations on your website or social network to share with others. Learn how simple it is in this tutorial.
Progress

724 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question