System Manual: Siemens SIMATIC HMI (WinCCv7.0: Scripting VBS, ANSI-C, VBA)
Подождите немного. Документ загружается.
Use "Selection"(Index) to return an object from the Selection listing:
Sub ShowNameOfFirstSelectedObject()
'VBA259
'Select all objects in the picture:
ActiveDocument.Selection.SelectAll
'Get the name of the first object of the selection:
MsgBox ActiveDocument.Selection(1).ObjectName
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1871
See also
Left Property (Page 2192)
Selection Object (Listing) (Page 1949)
HMIObjects Object (Listing) (Page 1884)
HMIDefaultObjects Object (Listing) (Page 1878)
AddHMIObject Method (Page 1719)
VBA Reference (Page 1664)
Editing Objects with VBA (Page 1606)
Width Property (Page 2408)
Visible Property (Page 2405)
Top Property (Page 2311)
ToolTipText Property (Page 2310)
PicUseTransColor Property (Page 2256)
PictureName Property (Page 2252)
PicTransColor Property (Page 2250)
PicReferenced Property (Page 2249)
PasswordLevel Property (Page 2244)
Operation Property (Page 2237)
Name Property (Page 2228)
Layer Property (Page 2160)
Height Property (Page 2139)
FlashRateBorderColor Property (Page 2120)
FlashRateBackColor Property (Page 2119)
FlashBorderColor Property (Page 2112)
FlashBackColor Property (Page 2111)
FillStyle Property (Page 2108)
FillingIndex Property (Page 2107)
Filling Property (Page 2106)
FillColor Property (Page 2104)
BorderWidth Property (Page 2045)
BorderStyle Property (Page 2043)
BorderFlashColorOn Property (Page 2042)
BorderFlashColorOff Property (Page 2040)
BorderColor Property (Page 2036)
BorderBackColor Property (Page 2035)
BackFlashColorOn Property (Page 2022)
BackFlashColorOff Property (Page 2021)
BackColor Property (Page 2017)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1872
System Manual, 11/2008,
Group Object
Description
Represents the object called "Group Object". The Group Object is an element of the following
listings:
● HMIObjects: Contains all objects of a picture.
● Selection: Contains all selected objects of a picture.
A group object is created from the objects selected in a picture. The objects in the Group Object
are also saved in the "GroupedHMIObjects" listing and index numbers are newly allocated.
You have unrestricted access to the properties of all objects in the Group Object.
Further information regarding group objects can be found in the WinCC documentation under
"Group Object".
VBA Object Name
HMIGroup
Usage
Use the CreateGroup Method with the Selection listing to create a new "Group Object" object
in a picture:
Sub DoCreateGroup()
'VBA260
Dim objGroup As HMIGroup
Set objGroup = ActiveDocument.Selection.CreateGroup
objGroup.ObjectName = "Group-Object"
End Sub
Use the following methods to edit an existing Group Object:
● Methode "Add(Index)": Adds a new object to the group object.
● Methode "Remove(Index)": Removes a object from the group object.
● "UnGroup()" method: Ungroups the group object (ungroup).
● "Delete()" Method: Deletes the group object and the objects that it contains.
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1873
Use "HMIObjects"(Index)" to return an object from the HMIObjects listing, where Index in this
case identifies the object by name:
Sub EditGroup()
'VBA261
Dim objGroup As HMIGroup
Set objGroup = ActiveDocument.HMIObjects("Group-Object")
MsgBox objGroup.ObjectName
End Sub
See also
Selection Object (Listing) (Page 1949)
HMIObjects Object (Listing) (Page 1884)
GroupedObjects Object (Listing) (Page 1877)
Ungroup Method (Page 1803)
Remove Method (Page 1784)
Delete Method (Page 1745)
Add Method (GroupedObjects Listing) (Page 1710)
How to Edit Objects in a Group Object with VBA (Page 1623)
How to Edit Group Objects with VBA (Page 1620)
VBA Reference (Page 1664)
Group Objects (Page 1618)
Editing Objects with VBA (Page 1606)
GroupDisplay Object
Description
Represents the "Group Display" object. The GroupDisplay object is an element of the following
listings:
● Objects: Contains all objects of a picture.
● Selection: Contains all selected objects of a picture.
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1874
System Manual, 11/2008,
VBA Object Name
HMIGroupDisplay
Usage
Use the Add method to create a new "Group Display" object in a picture:
Sub AddGroupDisplay()
'VBA262
Dim objGroupDisplay As HMIGroupDisplay
Set objGroupDisplay = ActiveDocument.HMIObjects.AddHMIObject("Groupdisplay",
"HMIGroupDisplay")
End Sub
Use "HMIObjects"(Index)" to return an object from the HMIObjects listing, where Index in this
case identifies the object by name:
Sub EditGroupDisplay()
'VBA263
Dim objGroupDisplay As HMIGroupDisplay
Set objGroupDisplay = ActiveDocument.HMIObjects("Groupdisplay")
objGroupDisplay.BackColor = RGB(255, 0, 0)
End Sub
Use "Selection"(Index) to return an object from the Selection listing:
Sub ShowNameOfFirstSelectedObject()
'VBA264
'Select all objects in the picture:
ActiveDocument.Selection.SelectAll
'Get the name from the first object of the selection:
MsgBox ActiveDocument.Selection(1).ObjectName
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1875
See also
MCText Property (Page 2222)
Height Property (Page 2139)
Selection Object (Listing) (Page 1949)
HMIObjects Object (Listing) (Page 1884)
AddHMIObject Method (Page 1719)
VBA Reference (Page 1664)
Editing Objects with VBA (Page 1606)
Width Property (Page 2408)
Visible Property (Page 2405)
UserValue4 Property (Page 2330)
UserValue3 Property (Page 2329)
UserValue2-Eigenschaft (Page 2328)
UserValue1 Property (Page 2328)
Top Property (Page 2311)
ToolTipText Property (Page 2310)
SignificantMask Property (Page 2290)
SameSize Property (Page 2276)
Relevant Property (Page 2272)
PasswordLevel Property (Page 2244)
Operation Property (Page 2237)
Name Property (Page 2228)
MessageClass Property (Page 2224)
MCKQTextFlash Property (Page 2221)
MCKQTextColorOn Property (Page 2220)
MCKQTextColorOff Property (Page 2220)
MCKQBackFlash Property (Page 2219)
MCKQBackColorOn Property (Page 2218)
MCKQBackColorOff Property (Page 2218)
MCKOTextFlash Property (Page 2217)
MCKOTextColorOn Property (Page 2216)
MCKOTextColorOff Property (Page 2215)
MCKOBackFlash Property (Page 2215)
MCKOBackColorOn Property (Page 2214)
MCKOBackColorOff Property (Page 2213)
MCGUTextFlash Property (Page 2213)
MCGUTextColorOn Property (Page 2212)
MCGUTextColorOff Property (Page 2211)
MCGUBackFlash Property (Page 2211)
MCGUBackColorOn Property (Page 2210)
MCGUBackColorOff-Eigenschaft (Page 2209)
LockText Property (Page 2202)
LockTextColor Property (Page 2203)
LockStatus Property (Page 2201)
LockBackColor Property (Page 2199)
Left Property (Page 2192)
Layer Property (Page 2160)
FontUnderline Property (Page 2131)
FontSize Property (Page 2130)
FontName Property (Page 2129)
FontItalic Property (Page 2128)
FontBold Property (Page 2126)
FlashRate Property (Page 2118)
CollectValue Property (Page 2066)
Button4Width Property (Page 2051)
Button3Width Property (Page 2051)
Button2Width Property (Page 2050)
Button1Width Property (Page 2049)
BackColor Property (Page 2017)
BackBorderWidth Property (Page 2016)
AlignmentTop Property (Page 2005)
AlignmentLeft Property (Page 2004)
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1876
System Manual, 11/2008,
GroupedObjects Object (Listing)
Description
A listing of the HMIObject objects that represent all the objects in the group object.
VBA Object Name
HMIGroupedObjects
Usage
Use the GroupedHMIObjects property to return the GroupedObjects listing. In the following
example all the objects in the first group object are output in the active picture. The group
object called "Group1" must first have been created:
Sub ShowGroupedObjectsOfFirstGroup()
'VBA265
Dim colGroupedObjects As HMIGroupedObjects
Dim objObject As HMIObject
Set colGroupedObjects = ActiveDocument.HMIObjects("Group1").GroupedHMIObjects
For Each objObject In colGroupedObjects
MsgBox objObject.ObjectName
Next objObject
End Sub
Use the Remove method, for instance, to remove an object from the group object. In the
following example the first object will be removed from the group object called "Group1":
Sub RemoveObjectFromGroup()
'VBA266
Dim objGroup As HMIGroup
Set objGroup = ActiveDocument.HMIObjects("Group1")
objGroup.GroupedHMIObjects.Remove (1)
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1877
See also
Item Method (Page 1772)
Group Object (Page 1873)
Remove Method (Page 1784)
Add Method (GroupedObjects Listing) (Page 1710)
How to Edit Group Objects with VBA (Page 1620)
VBA Reference (Page 1664)
Group Objects (Page 1618)
Parent Property (Page 2241)
GroupedHMIObjects Property (Page 2138)
Count Property (Page 2082)
Application Property (Page 2008)
HMIDefaultObjects Object (Listing)
Description
A listing of the following HMIObject objects:
Object VBA object name
Line HMILine
Polygon HMIPolygon
Polyline HMIPolyLine
Ellipse HMIEllipse
Circle HMICircle
Ellipse segment HMIEllipseSegment
Pie segment HMIPieSegment
Ellipse arc HMIEllipseArc
Circular arc HMICircularArc
Rectangle HMIRectangle
Rounded rectangle HMIRoundRectangle
Application window HMIApplicationWindow
Screen Window HMIPictureWindow
Static text HMIStaticText
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1878
System Manual, 11/2008,
Object VBA object name
I/O Field HMIIOField
Button HMIButton
Check box HMICheckBox
Radio box HMIOptionGroup
Round button HMIRoundButton
Bar HMIBarGraph
Slider object HMISlider
Graphic Object HMIGraphicObject
Status display HMIStatusDisplay
Text list HMITextList
Connector HMIObjConnection
Multiple row text HMIMultiLineEdit
Combo box HMIComboBox
List box HMIListBox
Polygon tube HMITubePolyline
T-piece HMITubeTeeObject
Double T-piece HMITubeDoubleTeeObject
Tube bend HMITubeArcObject
3D bar HMI3DBarGraph
Group display HMIGroupDisplay
Faceplate instance HMIFaceplateObject
VBA object name
HMIDefaultObjects
Usage
Use the DefaultHMIObjects property to change the default property values of the included
objects. In this example all the objects contained in the listing will be output:
Sub ShowDefaultObjects()
'VBA267
Dim strType As String
Dim strName As String
Dim strMessage As String
Dim iMax As Integer
Dim iIndex As Integer
iMax = Application.DefaultHMIObjects.Count
iIndex = 1
For iIndex = 1 To iMax
With Application.DefaultHMIObjects(iIndex)
strType = .Type
strName = .ObjectName
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
System Manual, 11/2008,
1879
strMessage = strMessage & "Element: " & iIndex & " / Objecttype: " & strType & " /
Objectname: " & strName
End With
If 0 = iIndex Mod 10 Then
MsgBox strMessage
strMessage = ""
Else
strMessage = strMessage & vbCrLf & vbCrLf
End If
Next iIndex
MsgBox "Element: " & iIndex & vbCrLf & "Objecttype: " & strType & vbCrLf & "Objectname: "
& strName
End Sub
VBA for Automated Configuration
4.4 The object model of the Graphics Designer
MDM - WinCC: Scripting (VBS, ANSI-C, VBA)
1880
System Manual, 11/2008,