[Archived] MicroStation V8i VBA Forum v8i Standards Checker

v8i Standards Checker

With considerable assistance from Bentley Tech Support, Illinois DOT now employs a module that checks for standard cells in dgn files. I haven't been able to get element Id to display in the report. The mvba is attached. Looking for help.

SCSimpleCellCheck.mvba

Parents

Offline Yongan.Fu Fri, Apr 10 2009 7:41 AM
Does this MVBA file coded by yourself ?

Open your MVBA project, goto class module, goto BadCell subroutine, change one line as following:

'Replaced problem description and name of cell.
Set scp = rpt.AddProblem(cellname & "|" & DLongToString(elmID), "Bad Cell", False)
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel

Reply

Offline Yongan.Fu Fri, Apr 10 2009 7:41 AM
Does this MVBA file coded by yourself ?

Open your MVBA project, goto class module, goto BadCell subroutine, change one line as following:

'Replaced problem description and name of cell.
Set scp = rpt.AddProblem(cellname & "|" & DLongToString(elmID), "Bad Cell", False)
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel

Children

Bob Peterson Fri, Apr 10 2009 1:20 PM in reply to Yongan.Fu

I have worked with vba for several years but I used a Bentley example for the Standards Checking and Ken Suh, BSI Tech Support, provided great assistance in tailoring the code. Thank you for your prompt responses.
Cancel
Vote Up 0 Vote Down

Sign in to reply

Cancel