Access to PowerPoint Text Orientation in Shape

M

Mike C

My access db creates a pp presentation but I can't seem to get the text
orientation in the shape I'm adding to align left. Seems simple but I'm
stuck. Help! Thanks!!


With .Shapes.AddShape(1, ChartTitleLeft, 0, ChartTitleWidth, 45)
.Name = Forms!Dashboard!ProductIMS2Desc & "Title"
' .Fill.Transparency = 0.5
.Fill.Visible = False
.Line.Visible = msoFalse
With .TextFrame
.MarginBottom = 0
.MarginLeft = 0
.MarginRight = 0
.MarginTop = 0
.Orientation = msoTextOrientationHorizontal
With .TextRange
.Text = SlideTitle
With .Font
.Size = 20
.Color.RGB = RGB(255, 255, 255)
.Bold = 1
End With
End With
End With
End With
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

VBA - (re-) Set a Table Style 2
PPT 2003: How to set background color for text in a textbox? 4
Place Text box at Mouse Pointer Position on a page 0
VBA created shapes sometimes break ranks 2
Text Overflow 4
Adding Text Boxes to New Page 4
from excel to word 0
What's the macro code to make the selected item 75% of its size, wantto keep proportions 2

Top