Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

2003 > 2007 Formatting Problems

0 views
Skip to first unread message

George

unread,
Sep 4, 2008, 9:14:44 AM9/4/08
to
Hi

I have wrote a little program which adds
a new slide and then formatting a text
element on it (bold, yellow). This workes
fine in ppt 2003. But in ppt 2007 the
background of the text frame is now black,
the font *not* bold and the color of the
font ist black.

Can anybody help me (see the used code
below).

Many thanks for help

Best Regards, George

--------------------------------

With ActiveWindow.Selection.TextRange.ParagraphFormat
.LineRuleWithin = msoTrue
.SpaceWithin = 1
.LineRuleBefore = msoTrue
.SpaceBefore = 0
.LineRuleAfter = msoTrue
.SpaceAfter = 0
End With

With ActiveWindow.Selection.TextRange
.ParagraphFormat.Alignment = ppAlignLeft
With .Font
.Name = "Arial Narrow"
.Size = 25
.Bold = msoTrue
.Italic = msoFalse
.Underline = msoFalse
.Shadow = msoFalse
.Emboss = msoFalse
.BaselineOffset = 0
.AutoRotateNumbers = msoFalse
.Color.SchemeColor = ppForeground
.Color.RGB = RGB(Red:=247, Green:=181, Blue:=18)
End With
End With

With ActiveWindow.Selection.ShapeRange
.Fill.Transparency = 0#
.TextFrame.MarginLeft = 0#
.TextFrame.MarginRight = 0#
.TextFrame.MarginTop = 0#
.TextFrame.MarginBottom = 0#
End With


John Wilson

unread,
Sep 4, 2008, 9:37:01 AM9/4/08
to
Hi George

I sense the Recorder at work!!

Try posting what layout you need the inserted slide to be and which part
needs to be yellow and maybe someone will pop up with proper code!
--
Amazing PPT Hints, Tips and Tutorials

http://www.pptalchemy.co.uk/powerpoint_hints_and_tips_tutorials.html
_______________________________

We''re at PPTLive - see you there?
www.pptlive.com

George

unread,
Sep 5, 2008, 1:49:48 AM9/5/08
to
Dear John

Thanks for your answer.

When I collected the code for a new
request, I have found out, that the textframe
was not selected, when executing the
formating (in ppt 2003 it worked ...).

I was able to fix the problem myself.
Many thanks for your help.

Best Regards, George

"John Wilson" <john AT technologytrish.co DOT uk> schrieb im Newsbeitrag
news:1AB79204-876A-4E30...@microsoft.com...

0 new messages