Jump to content

Επιμετρήσεις σωλήνων, αεραγωγών και καλωδίων AutoCAD add-in


1 Screenshot

About This File

Με αυτό το add-in - γραμμένο σε VBA - θα μπορείτε να μετρήσετε το συνολικό μήκος των γραμμών ενός layer. Έτσι, αν έχετε σε ένα layer πχ όλες τις σωληνώσεις ή τα καλώδια μιας εγκατάστασης θα μπορείτε με το πάτημα ενός κουμπιού να βρείτε άμεσα το συνολικό τους μήκος.

 

Οδηγίες χρήσης:

  1. Ξεζιπάρετε το αρχείο και στην συνέχεια ανοίξτε το AutoCAD.
  2. Στην γραμμή εντολών γράψτε VBAMAN.
  3. Στο μενού που θα εμφανιστεί πατήστε το κουμπί που γράφει Load.
  4. Περιηγηθείτε και βρείτε το παρόν αρχείο με τίτλο Total Length Of Lines Per Layer.dvb.
  5. Επιλέξτε να ενεργοποιήσετε τις μακροεντολές (enable macros) και στην συνέχεια πιέστε το κουμπί κλεισίματος (Close).
  6. Στην συνέχεια πηγαίνετε στο μενού Tools > Macros ή εναλλακτικά πατήστε ALT + F8 ή απλά γράψτε VBARUN στην γραμμή εντολών.
  7. Στο μενού που θα εμφανιστεί πατήστε το κουμπί Run. Θα εμφανιστεί η φόρμα του add-in (βλέπε εικόνα).
  8. Στην φόρμα, πατήστε το κουμπί Select Lines και στη συνέχεια επιλέξτε τις γραμμές που θέλετε από το σχέδιο σας (πχ αυτές που αντιστοιχούν στις σωληνώσεις – καλώδια). Μόλις βγείτε από το mode επιλογής (είτε πατώντας οπουδήποτε στο σχέδιο εκτός από γραμμές, είτε κάνοντας δεξί κλικ, είτε απλά πατώντας enter) θα δείτε ότι το listbox αριστερά θα περιέχει όλα τα layers που επιλέξατε, ενώ το μεσαίο listbox θα περιέχει τα μοναδικά layers που επιλέξατε.
  9. Τέλος, πατώντας το κουμπί Calculate Length στο δεξί Listbox θα εμφανιστούν τα συνολικά μήκη των γραμμών των μοναδικών layers, ενώ στο textbox από κάτω θα βρίσκεται το άθροισμά τους. Όλες οι τιμές στρογγυλοποιούνται σε 2 δεκαδικά ψηφία.

 

Εφόσον το add-in είναι φορτωμένο δεν χρειάζεται να επαναλάβετε και τα 9 βήματα, παρά μόνο να συνεχίσετε από το 6 και μετά.

 

Υπενθυμίζω ότι όσοι έχετε AutoCAD 2010 ή νεώτερο και δεν έχετε εγκατεστημένη την VBA μπορείτε να την κατεβάσετε από το site της Autodesk.

 

Τέλος, εδώ μπορείτε να βρείτε μια άλλη έκδοση του add-in στην οποία τα αποτελέσματα εγγράφονται σε καινούργιο βιβλίο του excel.

 

Ελπίζω να σας χρησιμεύσει... :wink:

 Share


User Feedback

Recommended Comments

μπράβο και απο μένα

αν και σχεδόν άσχετος με autocad, με τις οδηγίες σου είναι παιχνίδι

το μήκος είναι σε m ή in ?

αν θέλεις, όποτε ευχερεις μου απαντάς

 

και πάλι μπράβο σου και ευχαριστώ

Link to comment
Share on other sites

gvarth, σε ευχαριστώ. Όντως, σε παρόμοιο μήκος κύματος κινηθήκαμε.. Χαίρομαι που σου έδωσα ιδέες.. :wink:

 

dib, σε ευχαριστώ για τα καλά σου λόγια.

Το μήκος είναι στις σχεδιαστικές μονάδες του AutoCAD.

 

Για δοκιμή αν θες σχεδίασε πχ 2 γραμμές, χρησιμοποιήσε την εντολή dimension και μετρησε τες.

Στη συνέχεια δοκίμασε και το add-in. Θα δεις ότι το άθροισμα του μήκους των γραμμών (εφόσον είναι στο

ίδιο layer) θα είναι ίσο με αυτό που σου βγάζει το add-in.

Με αυτό τον τρόπο προσωπικά τσέκαρα την εγγυρότητα των αποτελεσμάτων που βγάζει.

Link to comment
Share on other sites

Χρήσιμη εφαρμογή μπράβο. Έκανα όλα τα βήματα αλλά όταν πατάω select line, μου βγάζει μήνυμα: Compile error in nidden module:fLayerLength... 

Μήπως μπορεί κάποιος να με βοηθήσει?

Ευχαριστώ εκ των προτέρων 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.