Microsoft KB Archive/285406

= PPT2002: Icon That Is Added Programmatically Displays a Label When No Label Is Specified =

Article ID: 285406

Article Last Modified on 1/29/2007

-

APPLIES TO


 * Microsoft PowerPoint 2002 Standard Edition

-



This article was previously published under Q285406





SYMPTOMS
When you use a Microsoft Visual Basic for Applications (VBA) macro to add an OLE object to a Microsoft PowerPoint presentation, a label may be added to the object's icon even though no label is specified.



CAUSE
This behavior occurs when the following conditions are true:
 * The OLE object is displayed as an icon.

-and-
 * You specify the icon label as &quot;&quot;.

-or-
 * You do not specify the icon label.

When no label is specified, or the label is specified as an empty string (&quot;&quot;), PowerPoint uses the name stored in the icon as a label. The following sample code exhibits this behavior: Sub A With ActivePresentation.Slides(1).Shapes .AddOLEObject ClassName:=&quot;PowerPoint.Show&quot;, DisplayAsIcon:=msoTrue, IconLabel:=&quot;&quot; End With End Sub



WORKAROUND
Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific needs. If you have limited programming experience, you may want to contact a Microsoft Certified Partner or the Microsoft fee-based consulting line at (800) 936-5200. For more information about Microsoft Certified Partners, please visit the following Microsoft Web site:

https://partner.microsoft.com/global/30000104

For more information about the support options that are available and about how to contact Microsoft, visit the following Microsoft Web site:

http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS

To work around this issue, specify the icon label to be a space. For example, change the preceding sample code to the following: Sub A With ActivePresentation.Slides(1).Shapes .AddOLEObject ClassName:=&quot;PowerPoint.Show&quot;, DisplayAsIcon:=msoTrue, IconLabel:=&quot; &quot; 'Note the space for the IconLabel property End With End Sub



STATUS
Microsoft has confirmed that this is a problem in the Microsoft products that are listed at the beginning of this article.

Additional query words: PPT prb

Keywords: kbbug kbpending KB285406

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.