之前我们都是在 外部PB里创建pdi图,如果可以在Excel里建立一个趋势图就更好了。
这个需要用到OLE对象。
安装好PI之后,会在Excel里加载一个pb的Ole对象,应该是叫Pi display Documnt之类
我们就来用它实现这个理想
For Each objX In Worksheets(1).OLEObjects
If objX.progID = "PIDisplayType" Then
PIObjExists = True
Exit For
Else
PIObjExists = False
End If
Next objX
If PIObjExists = False Then
Set objX = Worksheets(1).OLEObjects.Add("PIDisplayType")
End If
Set myobj = objX.Object
Set tndZ = myobj.Symbols.Add(pbSymbolTrend)
这样就建立了一个新的 趋势图