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

Hi,

 

I don't want to be rude, but it's easier for everyone if you provide what you already do have.

We can't see how your variables are declared, so to give a fully working example that works in your case without error is quite difficult.

Anyway, i'm glad to help you out if there should be any problems building your code Smiley Wink

 

You can use this piece of ilogic, just place your code where the line is commented

Dim oDrawDoc as drawingdocument = ThisDrawing.Document
Dim oSheet As sheet 
For Each oSheet In oDrawDoc.sheets
'Place your code to align dimensions here
'maybe this line is also needed, did not test it
ActiveSheet = ThisDrawing.Sheet(osheet.Name)
Next osheet

  

If you think this answer fullfilled your needs, improved your knowledge or leads to a solution,
please feel free to "kudos"