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

Try this for Revision Number...

Dim app As Application = ThisApplication
Dim doc As DrawingDocument = app.ActiveDocument
Dim oSheet As Sheet
Dim oView As DrawingView 
Dim docM As Document
For Each oSheet In doc.Sheets
	oView = oSheet.DrawingViews(1)
	docM = oView.ReferencedDocumentDescriptor.ReferencedDocument
	oSheet.Name = "words to prepend here" & docM.PropertySets.Item("Inventor Summary Information").Item("Revision Number").Value & "words to apend here"
Next

 Sorry I don't see a marked up drawing... screen shots might help me understand what you want better. I was under the impression you would want the iProperty from the model because it went with the only part on that sheet. 

If I've helped you, please help me by supporting this idea.
Mass Override for Each Model State

Custom Glyph Icon for iMates