Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
f_calebh
in reply to: WCrihfield

This is my fix.  We have what we call a "revision history sheet" on all our drawings and it's always the last sheet, so this is how I handled it:

 

Dim oDDoc As DrawingDocument = ThisDrawing.Document
Dim oSheet As Inventor.Sheet

'Activate All Sheets in Document
For Each oSheet In oDDoc.Sheets
	oSheet.Activate
Next

'set oSheet as the last sheet in a document
oSheet = oDDoc.Sheets(oDDoc.Sheets.Count)