Has anyone else run into a comma problem in Powerpoint?

[Guest]

When hyperlinking to a slide that has a comma in the title, the edit
hyperlink box does not find the slide in the viewer. The title will be there
but not the view of the slide. If I remove the comma(s) the problem goes
away. This only happens in Office 2003 Powerpoint. I have used a seperatae
text box overlaid on the the titile text box for the commas. Is there any
other way to fix this problem other than to use another version of Office?

 

[Echo S]

Known bug.

Only workaround I know is to copy the title placeholder, paste it on the
slide, and remove the comma from the "real" title (placeholder) and drag it
off the edge of the slide.

That's no easier than what you're doing already, though.

 

[Hans W. Hofmann]

Known bug.

Only workaround I know is to copy the title placeholder, paste it on the
slide, and remove the comma from the "real" title (placeholder) and drag it
off the edge of the slide.

That's no easier than what you're doing already, though.

Put in some thing that looks like a comma. E.g. Unicode sign 010D

Sub CommaSimulation()
Dim ca As TextRange
ActiveWindow.Selection.TextRange.InsertSymbol _
FontName:="Arial", CharNumber:=32, Unicode:=msoTrue
Set ca = ActiveWindow.Selection.TextRange.InsertSymbol( _
FontName:="Arial", CharNumber:=1643, Unicode:=msoTrue)
ca.Font.Size = CInt(ca.Font.Size * 1.3)
ca.Font.BaselineOffset = -0.08
End Sub


Gruß HW


WebSite Excelenzen & Powerpoint interaktiv: www.lemitec.de/public
PowerPoint Anwendertage Fulda: http://www.ppt-user.de

 

[Steve Rindsberg]

Put in some thing that looks like a comma. E.g. Unicode sign 010D

Sub CommaSimulation()
Dim ca As TextRange
ActiveWindow.Selection.TextRange.InsertSymbol _
FontName:="Arial", CharNumber:=32, Unicode:=msoTrue
Set ca = ActiveWindow.Selection.TextRange.InsertSymbol( _
FontName:="Arial", CharNumber:=1643, Unicode:=msoTrue)
ca.Font.Size = CInt(ca.Font.Size * 1.3)
ca.Font.BaselineOffset = -0.08
End Sub

You have a beautifully devious mind, Hans. <g>

Building on your suggestion, what if the user doesn't want to change the face
to Arial and/or worries that a unicode version of Arial may not be present on
other computers? Start with your approach, veer slightly to the side and ...

Replace all commas in selected text with a right single quote then adjust
offset and size to suit. And do all of the commas in the chosen text in one
whoosh.

Sub DeComma()
Dim oRng As TextRange
Dim oCommaRng As TextRange
Dim dOffset As Double
Dim dMagnify As Double

' tweak these values as needed
dOffset = -0.4 ' Baseline Offset
dMagnify = 1.3 ' Increase font size by this much

Set oRng = ActiveWindow.Selection.ShapeRange.TextFrame.TextRange
' Does it contain commas?
While InStr(oRng, ",") > 0
Set oCommaRng = oRng.Characters(InStr(oRng, ","), 1)
oCommaRng.Text = "’"
' Single right quote, Alt+0146, not a normal straight apostrophe
oCommaRng.Font.BaselineOffset = dOffset
oCommaRng.Font.Size = oCommaRng.Font.Size * dMagnify
Wend

End Sub

 

[David M. Marcovitz]

I won't try to match the elegant solutions mentioned by others. I just want
to point out that the comma problem predates 2003. I think, but I'm not
sure, that this goes all the way back to 97.
--David

--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.loyola.edu/education/PowerfulPowerPoint/

 

[Echo S]

I won't try to match the elegant solutions mentioned by others. I
just want to point out that the comma problem predates 2003. I think,
but I'm not sure, that this goes all the way back to 97.

I thought this, too, but I couldn't repro it in PPT 2000. Didn't have 2002
around to check.