[Webinar] Streamline your web hosting managementRegister Today


VBA Powerpoint 2003/2007 - Align text inside a textbox/Shape

Posted on 2009-12-29
Medium Priority
Last Modified: 2013-11-25
Got this code:
Dim s As Slide
Set s = ActivePresentation.Slides.Add(1, ppLayoutBlank)
Dim t As Shape
Set t = s.Shapes.AddTextbox(msoTextOrientationHorizontal, 10, 10, 100, 100)

t.TextFrame.TextRange.Text = "asd"

Now i want to align the text inside the textbox to the left (default is center).
Any ideas, i am totally lost.
Question by:Skullkid
1 Comment

Accepted Solution

Skullkid earned 0 total points
ID: 26138849
Found the solution:
t.TextFrame.TextRange.ParagraphFormat.Alignment = ppAlignLeft

Featured Post

Receive 1:1 tech help

Solve your biggest tech problems alongside global tech experts with 1:1 help.

Question has a verified solution.

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

Setting the Scene PowerPoint is a creative tool in the right hands but it also includes a much underutilised programming dimension. In this beginner level article, we're going to show you some of some key elements of programming PowerPoint using th…
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…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
How can you see what you are working on when you want to see it while you to save a copy? Add a "Save As" icon to the Quick Access Toolbar, or QAT. That way, when you save a copy of a query, form, report, or other object you are modifying, you…
Suggested Courses

591 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