I have attached file.
hope somebody helps..
give advice
comment
|
|
|
I have attached file.
hope somebody helps..
give advice
comment
You need to give us more information. What is wrong with the code? What do you want to do? Attach a sample dwg file to test the dvb on.
C:> ED WORKING.... ▒
The code is too lengthy I don't know some how please make it shorter.
Thanks.
You're right, it is too long. You need to refactor it. You have 6 bays. Create a subroutine that creates 1 bay and make it with an argument that takes an double for the length. Then you can just call the subroutine for each length, e.g.:
Also, consider using With statement, e.g.Code:CreateBay(4150)
An alternative is to create a dynamic block for 1 bay that can be stretched to the desired length.Code:With adim .TextHeight = 1 .Color = acByLayer .Layer = "0" .Update End With
C:> ED WORKING.... ▒