![]() Set oEnumerator = ActiveModelReference.Scan(oScanCriteria) Set oScanCriteria = New ElementScanCriteria Set oLevel = ActiveDesignFile.Levels(lvlName) The purpose of the code is to set the linestyle, color, lineweight and then lastly two settings which are classified under Line Style Parametra and known as Scale and Corner Mode.Īs background, I'm far more familiar with C# than VBA and that might be causing me to miss something, but the solution that I have feels similar to the C# approach highlighted in the link above (which I very serendipitously found): Private Sub AdjustStyleToByLevel(lvlName As String) However, the account I created for the forums doesn't seem to be working. I was originally planning to ask this question on the Bentley forums for programming as they had a similar answer for a C# question which I was using to model mine on. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |