Παναγιώτης Δημοσιεύτηκε Αύγουστος 10 , 2009 Share Δημοσιεύτηκε Αύγουστος 10 , 2009 Οι ενδιαφερόμενοι για τσεκάρετε και αυτό (δεν το έχω δοκιμάσει) http://www.jefferypsanders.com/autolisp_cad2file.html Link to comment Share on other sites More sharing options...
frightnight Δημοσιεύτηκε Σεπτέμβριος 2 , 2009 Share Δημοσιεύτηκε Σεπτέμβριος 2 , 2009 Ένα παρα πολυ εύχρηστο και freeware προγραμματάκι για να μεταφέρεις xyz+(ονομασία layers) απο dxf σε txt (και απο εκει στο excel) ειναι το dxf2xyz 2.0.Δυστυχώς νομίζω υποστηρίζει μεχρι autocad 2004. http://www.guthcad.com.au/freestuff.htm Link to comment Share on other sites More sharing options...
gvarth Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 Share Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 Παιδιά καλημέρα Ουσιαστικά θέλουμε να κάνουμε κλίκ σε κάποιες γραμμές του σχεδίου μας και με κάποιο τρόπο να έχουμε τις συντεταγμένες των γραμμών αυτών στο Excel για χρήση επιμετρήσεων ; Αν τα επιμετρητικά αυτά αποτελέσματα μας τα έδινε το ίδιο το Autocad , θα είμαστε εντάξει ; Τα αποτελέσματα αυτά τα θέλουμε οργανωμένα κατά Layer ; Σκοπεύω να ξεκινήσω κάτι , απλά θα ήθελα να καταλάβω με σαφήνεια το τι ζητάμε ... Ευχαριστώ Γιώργος Βαρθαλίτης Link to comment Share on other sites More sharing options...
frightnight Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 Share Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 συντεταγμένες των γραμμών αυτών στο Excel για χρήση επιμετρήσεων ; Στατικά προγράμματα που πολλές φορες εχουν δυσκολη εισαγωγη φορέα,αυτό είναι μια διέξοδος...ισως και για επιμετρήσεις.. Link to comment Share on other sites More sharing options...
gvarth Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 Share Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 Στατικά προγράμματα που πολλές φορες εχουν δυσκολη εισαγωγη φορέα,αυτό είναι μια διέξοδος...ισως και για επιμετρήσεις.. Απλά , έχοντας ασχοληθεί με τη Visual Basic for Applications και σε περιβάλλον Excel αλλά και στο Autocad (2002 ή νεώτερο) , αναρωτιόμουν με ποιό τρόπο θα μπορούσα να συνεισφέρω γιαυτό και ρωτούσα για τα ζητούμενα ... Θέλουμε λοιπόν κάποια μεθοδολογία , απλή για τον τελικό χρήστη , η οποία να επιτρέπει να επιλέξουμε κάποια ανοικτή/κλειστή polyline και μετά να μπορούμε να έχουμε τις συντεταγμένες της στο Autocad ; Χρειαζόμαστε πληροφορίες για το Layer που αυτή ανήκει ; Τι άλλο θέλουμε ; Link to comment Share on other sites More sharing options...
frightnight Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 Share Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 Χρειαζόμαστε πληροφορίες για το Layer που αυτή ανήκει ; Τι άλλο θέλουμε ; Δεν υπάρχει κατι συγκεκριμένο.Ο καθένας μετα τακτοποιει τα δεδομενα ειτε με functions ειτε με vbasic,για import txt σε αλλο προγραμμα,πραξεις μεσα στο excel,η ξανα στο autocad..η απαιτηση για το καθενα ειναι διαφορετικη Link to comment Share on other sites More sharing options...
gvarth Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 Share Δημοσιεύτηκε Σεπτέμβριος 3 , 2009 Δεν υπάρχει κατι συγκεκριμένο.Ο καθένας μετα τακτοποιει τα δεδομενα ειτε με functions ειτε με vbasic,για import txt σε αλλο προγραμμα,πραξεις μεσα στο excel,η ξανα στο autocad..η απαιτηση για το καθενα ειναι διαφορετικη Ωραία, Θα ξεκινήσω κάτι απόψε το απόγευμα. Αμεσα ελπίζω θα υπάρξει μια πρώτη προσέγγιση και μετά το βελτιώνουμε ... Παιδιά καλημέρα Μια πρώτη προσέγγιση του θέματος που ανεβάζω, λειτουργεί για PolyLines 2D και δημιουργεί στο root directory του σκληρού δίσκου το αρχείο DataExport.txt (ASCII) με περιεχόμενα όπως ενδεικτικά παρακάτω φαίνονται : New PolyLine ! Layer : TestLayer 8 16 12 16 12 17 11 17 11 23 10 23 9 17 8 17 New PolyLine ! Layer : Test-2 Layer ... ... ... Πως θα το αξιοποιήσουμε : 1. Αρχικά κατεβάζουμε στο PC μας το EntitySelections.txt , το μετονομάζουμε σε EntitySelections.zip (δυστυχώς το σύστημά μου δεν με αφήνει να ανεβάσω zip ) και αφού το αποσυμπιέσουμε τοποθετούμε ΟΛΑ τα αρχεία μαζί σε κάποιο φάκελλο (έστω C:\AcadVBA ) και στη συνέχεια φορτώνουμε το Autocad 2. Στο Autocad μπορούμε να φορτώσουμε το αρχείο παράδειγμα "Entities.dwg" . Από το menu tools του Autocad , επιλέγουμε macro και στη συνέχεια VBA Manager. Στο παράθυρο διαλόγου που εμφανίζεται , βρίσκουμε το φάκελλο όπου κατεβάσαμε τα αρχεία (στο 1ο βήμα) και επιλέγουμε το αρχείο EntityNames και πατάμε Open . Ακολούθως , πατάμε πάνω στο κουμπί 'EnableMacros' έτσι ώστε να ενεργοποιηθούν οι macroεντολές. 3.Πατάμε το Close 4. Ενεργοποιούμε το macro το οποίο θα "σαρώσει" την επιφάνεια εργασίας μας και θα φτιάξει για εμάς το αρχείο DataExport.txt με τις συντεταγμένες των PolyLines που περιέχει το σχέδιό μας. Η ενεργοποίηση γίνεται με τον συνδυασμό πλήκτρων Alt-F8 (κρατάμε πατημένο το Alt και πατάμε το F 8 ) . Μετά , στο παράθυρο διαλόγου που εμφανίζεται , πατάμε στο Run και δημιουργείται το εν λόγω αρχείο με τις συντεταγμένες . Θα χαρώ να το δείτε, να το δοκιμάσετε και να συζητήσουμε τις προτάσεις σας. Φιλικά Γιώργος Ξεκίνησε μια νέα προσέγγιση σύμφωνα με την οποία τα δεδομένα των Polylines να "πηγαίνουν" κατευθείαν στο Excel , να οργανώνονται σε στήλες και στη συνέχεια ο καθένας να επεξεγάζεται τα δεδομένα αυτά όπως θεωρεί καλύτερο. Εδώ , ο μηχανισμός μεταφοράς των συντεταγμένων , υλοποιείται με λίγο διαφορετικό τρόπο. Έχουμε ανοιγμένα ΤΑΥΤΟΧΡΟΝΑ και το αρχείο ImportfromPolylines.xls όπου θα δούμε τελικά να εμφανίζονται οι συντεταγμένες των Polylines που διαλέξαμε αλλά και το Autocad με ανοιγμένο το σχέδιο απ' όπου θα επιλέξουμε με το mouse τις Polylines που μας ενδιαφέρουν. Στο συνημμένο αρχείο και αφού το αποσυμπιέσουμε, σαν παράδειγμα θα βρούμε το : PolylinesTest.dwg Αρχικά μεταβαίνουμε στο Excel και στο Worksheet ΟΔΗΓΙΕΣ υπάρχει σύντομη περιγραφή σχετικά με την όλη διαδικασία μεταφοράς των συντεταγμένων από το Autocad στο Excel. Στο Ίδιο αρχείο και στο Worksheet Polylines , υπάρχει "κουμπί" με την ένδειξη Import Coordinates . Κάνουμε "κλίκ" με το mouse πάνω του και μετά πάμε στο Autocad που ήδη είναι ανοικτό και επιλέγουμε τις Polylines που μας ενδιαφέρουν. Μόλις τις επιλέξουμε , πατάμε ENTER και πάμε στο Excel όπου στο φύλλο εργασίας Polylines βρίσκονται οι συντεταγμένες των κορυφών για τις Polylines που επιλέχτηκαν , καθώς και πληροφορίες για το αν η κάθε Polyline είναι ανοικτή/κλειστή καθώς και το Layer που ανήκει η κάθε μία. Αν κρίνετε ότι σας ενδιαφέρει, κατεβάστε το συνημμένο , μετονομάστε το σε ImportCoordsfromAcad.rar , αποσυμπιέστε το σε κάποιο φάκελλο του δίσκου και πειραματιστείτε ... Χαρά μου να ακούσω απορίες/παρατηρήσεις/σχόλια και να προσπαθήσω φυσικά να εξελίξω την όλη διαδικασία με βάση αυτά . Παρατήρηση : Για κάποιο λόγο ο server δεν μου επιτρέπει να ανεβάσω rar , zip αρχεία . Συγνώμη για την ταλαιπωρία. Entity Selections.txt ImportCoordsfromAcad.txt Link to comment Share on other sites More sharing options...
Παναγιώτης Δημοσιεύτηκε Σεπτέμβριος 7 , 2009 Share Δημοσιεύτηκε Σεπτέμβριος 7 , 2009 Πολύ ωραία δουλειά gvarth. Εκανα μια μικρή προσθήκη στο πρόγραμμα και πλέον είναι δυνατή και η ανάγνωση του μήκους και του εμβαδού των polyline που διαλέγονται. Όταν οι polylines είναι ανοικτές το εμβαδό που υπολογίζεται είναι αυτό που σχηματίζεται όταν ενώσουμε το πρώτο σημείο της γραμμής με το τελευταίο (όπως και στο autocad). Επίσης άλλαξα λίγο την εμφάνιση ενώ πλέον με το που εκτελείται η μακροεντολή καθαρίζει (διαγράφει) τις πρώτες 5 στήλες μεχρι την τελευταία γραμμή του φύλλου εργασίας ανεξαρτήτως έκδοσης του excel. Αν ενδιαφέρεται κάποιος είναι σχετικά εύκολο να υπολογίζεται και το μήκος των επιμέρους ευθυγράμμων τμημάτων (μέσω excel - vba) ImportCoordsfromAcad2.zip Link to comment Share on other sites More sharing options...
gvarth Δημοσιεύτηκε Σεπτέμβριος 7 , 2009 Share Δημοσιεύτηκε Σεπτέμβριος 7 , 2009 Πολύ ωραία δουλειά gvarth. Εκανα μια μικρή προσθήκη στο πρόγραμμα και πλέον είναι δυνατή και η ανάγνωση του μήκους και του εμβαδού των polyline που διαλέγονται. Όταν οι polylines είναι ανοικτές το εμβαδό που υπολογίζεται είναι αυτό που σχηματίζεται όταν ενώσουμε το πρώτο σημείο της γραμμής με το τελευταίο (όπως και στο autocad). Επίσης άλλαξα λίγο την εμφάνιση ενώ πλέον με το που εκτελείται η μακροεντολή καθαρίζει (διαγράφει) τις πρώτες 5 στήλες μεχρι την τελευταία γραμμή του φύλλου εργασίας ανεξαρτήτως έκδοσης του excel. Αν ενδιαφέρεται κάποιος είναι σχετικά εύκολο να υπολογίζεται και το μήκος των επιμέρους ευθυγράμμων τμημάτων (μέσω excel - vba) Πολύ χρήσιμες οι προσθήκες σου Παναγιώτη. Ευχαριστώ που ασχολήθηκες και το εμπλούτισες με νέες δυνατότητες. Link to comment Share on other sites More sharing options...
iovo Δημοσιεύτηκε Οκτώβριος 17 , 2009 Συγγραφέας Share Δημοσιεύτηκε Οκτώβριος 17 , 2009 Υπάρχει η δυνατότητα να εισάγεται στο Εxcel και το Layer της Polyline? Το λέω αυτό γιατί θα ήταν έυκολο μετά να γίνουν προμετρήσεις και επιμετρήσεις σε μια κάτοψη που θα επεξεργαστεί ελαφρώς με polyline. Edit: Aκυρο ...πείτε πώς δεν ρώτησα... Link to comment Share on other sites More sharing options...
Recommended Posts
Δημιουργήστε ένα λογαριασμό ή συνδεθείτε προκειμένου να αφήσετε κάποιο σχόλιο
Πρέπει να είστε μέλος για να μπορέσετε να αφήσετε κάποιο σχόλιο
Δημιουργία λογαριασμού
Κάντε μια δωρεάν εγγραφή στην κοινότητά μας. Είναι εύκολο!
Εγγραφή νέου λογαριασμούΣύνδεση
Εάν έχετε ήδη λογαριασμό; Συνδεθείτε εδώ.
Συνδεθείτε τώρα