Window Caption in CATIA V6

In CATIA V5, you can use a VBA macro to display a caption at the bottom of the window:

Sub CATMain()

CATIA.Statusbar = “The Document is Loading…”

End Sub

To create the same window caption requires a bit of extra code for the CATIA V6 macro:

Sub CATMain()

Dim myWindow As String

myWindow = CATIA.ActiveWindow.Caption

CATIA.ScriptCommand = CatScriptCommandStart

CATIA.Statusbar = “The Document is Loading…”

Msgbox “the rest of the code goes here”

CATIA.ScriptCommand = CatScriptCommandStop

End Sub

Add a Comment

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.