Hello everybody.
My question is very easy: is there a way to have a code sample for ExecuteSheetOperation ? I have read about Strucs and Enum, but I can't find any code sample for this.
I have the following code:
Public Sub CheckFonts()
Dim prj As IAucObject
Dim ws As IAucWorksheet
Dim sh As Aucotec.Sheet
Set prj = Application.Selection(1).Project
Set ws = prj.Project.EquipmentFolder.OpenWorksheet("Sheets")
For i = 1 To ws.RowCount
Set sh = ws.GetObjectItem(i)
sh.Open aucSheetOpenVisio
'select all symbols inside sheet
'set Arial Font for all simbols inside sheet
sh.Close
Next i
End Sub
Thanks in advance for your great support.
Best regards
Franco Silveri
My question is very easy: is there a way to have a code sample for ExecuteSheetOperation ? I have read about Strucs and Enum, but I can't find any code sample for this.
I have the following code:
Public Sub CheckFonts()
Dim prj As IAucObject
Dim ws As IAucWorksheet
Dim sh As Aucotec.Sheet
Set prj = Application.Selection(1).Project
Set ws = prj.Project.EquipmentFolder.OpenWorksheet("Sheets")
For i = 1 To ws.RowCount
Set sh = ws.GetObjectItem(i)
sh.Open aucSheetOpenVisio
'select all symbols inside sheet
'set Arial Font for all simbols inside sheet
sh.Close
Next i
End Sub
Thanks in advance for your great support.
Best regards
Franco Silveri