M
MeSteve
I am using this to automatically shrink text in a PPT show after creating a
text box. The problem is that sometimes it works, sometimes it doesn't and I
cannot figure out what is causing the intermittancy.
With oProjDesc
With TextFrame
....
End With
With .TextFrame2
.AutoSize = msoAutoSizeTextToFitShape
End With
End With
text box. The problem is that sometimes it works, sometimes it doesn't and I
cannot figure out what is causing the intermittancy.
With oProjDesc
With TextFrame
....
End With
With .TextFrame2
.AutoSize = msoAutoSizeTextToFitShape
End With
End With