Solved

Update bulleted text with a variable

Posted on 2014-02-21
5
211 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

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

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

In this post we will learn how to connect and configure Android Device (Smartphone etc.) with Android Studio. After that we will run a simple Hello World Program.
Today, the web development industry is booming, and many people consider it to be their vocation. The question you may be asking yourself is – how do I become a web developer?
Learn how to download your full Prezi presentation for offline presenting. Prezi doesn’t have to be viewed and shared in a web browser, even with a free account you can download your full presentation to share with others. Be sure to download any vi…
In this fourth video of the Xpdf series, we discuss and demonstrate the PDFinfo utility, which retrieves the contents of a PDF's Info Dictionary, as well as some other information, including the page count. We show how to isolate the page count in a…

696 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