System Manual: Siemens SIMATIC HMI (WinCCv7.0: Scripting VBS, ANSI-C, VBA)

Подождите немного. Документ загружается.

● ToolbarItem Object

● Further information about the desktop language is provided in the WinCC documentation

"Setting up multilingual projects" under "Language terms in WinCC".

Project language

You can change the configuring language with VBA using the "CurrentDataLanguage"

property.

In this example the configuring language is changed to "English":

Sub ChangeCurrentDataLanguage()

'VBA1

Application.CurrentDataLanguage = 1033

MsgBox "The Data language has been changed to english"

Application.CurrentDataLanguage = 1031

MsgBox "The Data language has been changed to german"

End Sub

All language-dependent properties such as ToolTipText are affected by the change.

Configuring for more than one language in VBA

There are two possible ways for you to carry out configuring for several languages with VBA.

● Language switching: Text properties of objects.

● Text language lists: Text properties of user-defined menus and toolbars, and objects.

Language change

You can change the language-dependent properties (e.g. "Text") of objects with VBA. To do

this,

assign the text to the corresponding property and then change the configuring language

in order to assign the text in the other language.

LanguageTexts listing

You can save the multilingual texts for the respective object directly in the associated listing

of the "LanguageTexts" type. To do this, enter the language ID for the language and the

associated text.

The full list of language codes is available in the WinCC documentation (Index > Language

ID).

In this example a German label and an English label are assigned to the button "myButton":

Sub AddLanguagesToButton()

'VBA2

Dim objLabelText As HMILanguageText

Dim objButton As HMIButton

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

System Manual, 11/2008,

1571

Set objButton = ActiveDocument.HMIObjects.AddHMIObject("myButton", "HMIButton")

'Set defaultlabel:

objButton.Text = "Default-Text"

'Add english label:

Set objLabelText = objButton.LDTexts.Add(1033, "English Text")

'Add german label:

Set objLabelText = objButton.LDTexts.Add(1031, "German Text")

End Sub

See also

LanguageTexts Object (Listing) (Page 1893)

LanguageFonts Object (Listing) (Page 1890)

How to Assign Help Texts to Menus and Toolbars (Page 1586)

How to Create Menus in Multiple Languages (Page 1580)

VBA Reference (Page 1664)

4.3.2.3 Creating Customized Menus and Toolbars

Configuring Menus and Toolbars

Introduction

You can "liven up" user-defined menus and toolbars so that they respond to certain program

situations

in the Graphics Designer. For example, if an icon is not available because no object

is selected, you can gray out the icon. A check mark before a menu item can indicate, for

example, whether a selection is activated.

The following illustration shows you the configuration possibilities, using the example of a user-

defined menu:

Active (yes/no) (1)

Activates the entry or dims it. You can use the "Enabled" property for user-defined menus,

menu items and icons:

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

1572

System Manual, 11/2008,

'VBA13

Application.ActiveDocument.CustomMenus(1).MenuItems(1).Enabled = False

Marked with check mark (yes/no) (2)

Marks the menu item with a check mark. You can only use the "Checked" property for user-

defined menu items:

'VBA14

Application.ActiveDocument.CustomMenus(1).MenuItems(2).Checked = True

Shortcut (3)

Defines a key combination for a menu item or an icon. You can only use the "Shortcut" property

for user-defined menu items and icons:

'VBA15

Application.ActiveDocument.CustomMenus(1).MenuItems(3).Shortcut = "Ctrl+G"

Visible (yes/no) (4)

Displays or hides the item. You can use the "Visible" property for user-defined menus, menu

items and toolbars and for their icons:

'VBA16

Application.ActiveDocument.CustomMenus(1).MenuItems(4).Visible = False

Creating Customized Menus and Toolbars

User-defined menus and toolbars in the Graphics Designer

You can use user-defined menus and toolbars in the Graphics Designer in order to execute

VBA macros. A distinction is drawn here between application-specific and picture-specific

menus and toolbars, which have the following properties:

● Application-specific menu/toolbar: Always visible when the Graphics Designer is open. You

should use application-specific menus and toolbars when the VBA macros that are to be

executed from them have to be accessible at all times.

● Picture-specific menu/toolbar: Is linked with a specific picture and remains visible as long

the picture is visible. You should use picture-specific menus and toolbars when the VBA

macros used there are relevant only for that particular picture.

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

System Manual, 11/2008,

1573

Positioning of user-defined menus and toolbars

In the case of user-defined menus, the "Position" parameter determines the final positioning

in the menu bar. However:

● application-specific menus are always positioned to the right of the "Window" menu in the

Graphics Designer, whereas

picture-specific menus are always positioned to the left of the "Help" menu in the Graphics

Designer.

However, application-specific toolbars are not treated "with preference": In this case, the

positioning

is determined by the order in which you insert the toolbars. Toolbars are positioned

beneath the Graphics Designer toolbar:

Figure 4-1 Figure: User-defined menus and toolbars. (1) Application-specific, (2) picture-specific

In the illustration above, first the picture-specific menus and toolbars are inserted, then the

application-specific ones.

Properties of user-defined menus and toolbars

In the case of user-defined menus and toolbars you can use hyphens to divide entries, for

example according to certain categories. As well as this you can also create submenus in a

user-defined menu.

The following configuration options are available to you for user-defined menus and toolbars

(and their entries):

● Visible (yes/no): Displays or hides the item (visible property).

● Active (yes/no): Activates the entry or dims it (enabled property).

● Marked with check mark (yes/no) - only available for menu item (Checked property).

● Shortcut: Key combination for calling a menu item (ShortCut property).

● Statustext: Text that is displayed in the status bar (StatusText property).

● Tooltip text - only available for an icon (ToolTipText property).

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

1574

System Manual, 11/2008,

You can hide a menu item, for example, if the macro cannot be executed at a certain time. In

this way you can prevent inadvertent wrong operation.

You can create all texts and labels of user-defined menus and toolbars in multiple languages

so that the user-defined menus and toolbars can also react to a language change.

See also

How to Assign VBA Macros to Menus and Toolbars (Page 1589)

How to Assign Help Texts to Menus and Toolbars (Page 1586)

How to Add a New Icon to the Toolbar (Page 1584)

How to Create a New Application-Specific Toolbar (Page 1582)

How to Create Menus in Multiple Languages (Page 1580)

How to Add a New Menu Item to the Menu (Page 1577)

How to Create Picture-Specific Menus and Toolbars (Page 1602)

How to Create a New Application-Specific Menu (Page 1575)

Configuring Menus and Toolbars (Page 1572)

Executing VBA Macros in Graphics Designer (Page 1566)

How to Create a New Application-Specific Menu

Introduction

Application-specific menus remain visible even when all pictures in Graphics Designer are

closed. You can use the Started event, for example, in order to insert an application-specific

menu at an early stage.

Position the VBA code either

● in the "GlobalTemplateDocument" if you want the menu to be available in all projects, or

● in the "ProjectTemplateDocument" if you want the menu to be available in the current

project.

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

System Manual, 11/2008,

1575

Procedure

1. Open the VBA editor in Graphics Designer (<ALT+F11> or "Tools" > "Macros" > "Visual

Basic Editor")

2. In Project Explorer, open the document in which you want to write the VBA code:

3. To create a user-defined menu in the Graphics Designer, you can for example insert a

"CreateApplicationMenus()"

procedure in the document. In this example, two user-defined

menus are created:

Sub CreateApplicationMenus()

'VBA3

'Declaration of menus...:

Dim objMenu1 As HMIMenu

Dim objMenu2 As HMIMenu

'Add menus. Parameters are "Position", "Key" und "DefaultLabel":

Set objMenu1 = Application.CustomMenus.InsertMenu(1, "AppMenu1",

"App_Menu_1")

Set objMenu2 = Application.CustomMenus.InsertMenu(2, "AppMenu2",

"App_Menu_2")

End Sub

4. Start the procedure with <F5>.

Result

The two menus "App_Menu_1" and "App_Menu_2" are inserted to the right of the "Window"

menu:

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

1576

System Manual, 11/2008,

See also

Creating Customized Menus and Toolbars (Page 1573)

InsertMenu Method (Page 1763)

How to Assign VBA Macros to Menus and Toolbars (Page 1589)

How to Assign Help Texts to Menus and Toolbars (Page 1586)

How to Create Menus in Multiple Languages (Page 1580)

How to Add a New Menu Item to the Menu (Page 1577)

Configuring Menus and Toolbars (Page 1572)

Organizing VBA Code in a WinCC Project (Page 1562)

How to Add a New Menu Item to the Menu

Requirements

You must have created the user-defined menu first.

Introduction

You can insert three different types of menu items in the user-defined menu:

● Menu entry: To call VBA macros.

● Separator line: For clearer design of user-defined menu.

● Submenu: Same as user-defined menu (e.g. command structuring).

The "Position" parameter determines the order of the menu items within the user-defined

menu.

The "Key" parameter is a unique identification of the menu item. This parameter is used if you

use the "MenuItemClicked" event for calling VBA macros.

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

System Manual, 11/2008,

1577

Procedure

1. Open the VBA editor in Graphics Designer (<ALT+F11> or "Tools" > "Macros" > "Visual

Basic Editor")

2. In Project Explorer, open the document in which you want to write the VBA code:

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

1578

System Manual, 11/2008,

3. To create menu items in a previously created user-defined menu, you can for example

insert

an "InsertMenuItems()" procedure in the document. In this example a number of menu

items are created in the user-defined menu "App_Menu_1":

Sub InsertMenuItems()

'VBA4

Dim objMenu1 As HMIMenu

Dim objMenu2 As HMIMenu

Dim objMenuItem1 As HMIMenuItem

Dim objSubMenu1 As HMIMenuItem

'Create Menu:

Set objMenu1 = Application.CustomMenus.InsertMenu(1, "AppMenu1",

"App_Menu_1")

'Next lines add menu-items to userdefined menu.

'Parameters are "Position", "Key" and DefaultLabel:

Set objMenuItem1 = objMenu1.MenuItems.InsertMenuItem(1,

"mItem1_1", "App_MenuItem_1")

Set objMenuItem1 = objMenu1.MenuItems.InsertMenuItem(2,

"mItem1_2", "App_MenuItem_2")

'Adds seperator to menu ("Position", "Key")

Set objMenuItem1 = objMenu1.MenuItems.InsertSeparator(3,

"mItem1_3")

'Adds a submenu into a userdefined menu

Set objSubMenu1 = objMenu1.MenuItems.InsertSubMenu(4, "mItem1_4",

"App_SubMenu_1")

'Adds a menu-item into a submenu

Set objMenuItem1 = objSubMenu1.SubMenu.InsertMenuItem(5,

"mItem1_5", "App_SubMenuItem_1")

Set objMenuItem1 = objSubMenu1.SubMenu.InsertMenuItem(6,

"mItem1_6", "App_SubMenuItem_2")

End Sub

4. Start the procedure with <F5>.

Result

The "InsertMenuItems()" procedure inserts the menu "App_Menu_1" with these menu items:

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

System Manual, 11/2008,

1579

See also

InsertSeparator Method (Page 1766)

InsertSubmenu Method (Page 1767)

InsertMenu Method (Page 1763)

How to Assign VBA Macros to Menus and Toolbars (Page 1589)

How to Assign Help Texts to Menus and Toolbars (Page 1586)

How to Create Menus in Multiple Languages (Page 1580)

How to Create a New Application-Specific Menu (Page 1575)

Configuring Menus and Toolbars (Page 1572)

Creating Customized Menus and Toolbars (Page 1573)

How to Create Menus in Multiple Languages

Introduction

You can create a user-defined menu that responds to a change of language. To do this you

need to define the necessary number of labels in other languages for the menu and for each

menu item.

The foreign-language label comprises the language ID (LCID) and the foreign-language text

(DisplayName).

The full list of language codes is available in the WinCC documentation (Index > Language

ID).

Procedure

1. Open the VBA editor in Graphics Designer (<ALT+F11> or "Tools" > "Macros" > "Visual

Basic Editor")

2. In Project Explorer, open the document in which you want to write the VBA code:

VBA for Automated Configuration

4.3 VBA in the Graphics Designer

MDM - WinCC: Scripting (VBS, ANSI-C, VBA)

1580

System Manual, 11/2008,