02-04-2015
10:46 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
02-04-2015
10:46 AM
Thank you for your help, Eelco.
I took a look at the Task Scheduler but didn’t get along with it at all.
Luckily, I now found a solution myself using iLogic:
Sub update_sheets()
Dim oapp As Inventor.Application
Set oapp = ThisApplication
Dim oDocument As Inventor.Document
Set oDocument = ThisApplication.ActiveDocument
Dim oSheet As Sheet
For Each oDocument In oapp.Documents.VisibleDocuments
Name = oDocument.FullDocumentName
For Each oSheet In oDocument.Sheets
' oSheet.Activate
oSheet.Update
Next
oDocument.Save
oDocument.Close
Next
End Sub