Microsoft KB Archive/321117

= Visio2002: Text Colors Set in the ShapeSheet Are Displayed As Black =

Article ID: 321117

Article Last Modified on 3/29/2007

-

APPLIES TO


 * Microsoft Visio 2002 Standard Edition
 * Microsoft Visio 2002 Professional Edition

-



This article was previously published under Q321117





SYMPTOMS
When you open a Microsoft Visio 2000 saved diagram in Visio 2002, shapes that contain custom ShapeSheet formulas to specify text color may display the text in the color black.



CAUSE
Visio 2000 handles and resolves the color table differently from the way that Visio 2002 handles it. Visio 2002 is not updating or resolving the inherited formula to the new color table. This behavior occurs because of the new color table schema in Visio 2002.



WORKAROUND
To work around this behavior, use one of the following methods.

Method 1: Move the Visio Drawing Through the XML Filter
You can save a Visio drawing as an XML file, and then open it again in Visio without any loss of information. To save a Visio 2000 drawing that exhibits these symptoms through the Visio 2002 XML filter, follow these steps:
 * 1) Open a Visio 2000 .vsd drawing file in Microsoft Visio 2002.
 * 2) On the File menu, click Save As, select XML Drawing (*.vdx) under Save as type, and then click Save.
 * 3) On the File menu, click Close to close the drawing.
 * 4) Reopen the .vdx file that you created in step 2. On the File menu, click Open, select the .vdx drawing, and then click Open or use the Most Recently Used (MRU) list.

The text colors from the ShapeSheet now appear in the drawing.
 * 1) On the File menu, click Save As, select Drawing (*.vsd) under Save as type, and then click Save.

Method 2: Use VBA to Update Stale ShapeSheet Formulas
Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers 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 requirements. The following Visual Basic for Applications code sample calls the ActiveDocument.Clean method to update the stale formulas.

Public Sub CleanDocument

If Not Visio.Application.ActiveDocument Is Nothing Then Visio.Application.ActiveDocument.Clean End If

End Sub For additional information about the Clean method, visit the following Microsoft Web site:

Clean method

Information about the Clean method is also available in the Microsoft Visio 2002 Software Development Kit (SDK).



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



MORE INFORMATION
For more information about XML, type xml in the Ask a question box or the Answer Wizard, and then press ENTER to view the topics.

For additional information about the Visio 2002 Software Developers Kit (SDK), click the following article number to view the article in the Microsoft Knowledge Base:

319658 Description of the Visio 2003 Software Developers Kit (SDK)

