Export Koordinate vum CAD zu txt
Loosst eis unhuelen datt mir Punkte vum CAD Format exportéieren, op eng Komma getrennte Lëscht fir op eng total Statioun eropzelueden an e Site ze maachen. Virdru hu mer gesi wéi se se aus Excel oder txt importéieren mat AutoCAD y mat Microstation, loosst eis kucken wéi se se exportéieren.
Et gi verschidde Weeër fir et ze maachen, sou wéi d'Kéi ze zielen, Dir kënnt d'Been zielen an se op véier deelen oder Dir kënnt d'Kéi just zielen. Loosst eis e puer Weeër kucken:
1 Maacht mat Microstation (dgn zu txt)
An dem Beispill hunn ech e Plot, dat fënnef Schwäizer huet, an ech muss d'Koordinate an eng txt Datei exportéieren.
Fir dëst hunn ech d'Punkten an eng Dicke gesat déi siichtbar sinn. Denkt drun datt d'Linnegewiicht an der Microstation dynamesch sinn, sou datt se direkt erkennbar sinn.
Éischt Schrëtt: Aktivéiert de Koordinatenexportinstrument (wann et net aktiv ass), dofir wielt mir
Handwierksgeschir
Këschte
Aktivéiert de leschte Kommando (xyz)
Dann hu mir de Panel zougeschalt an hätten sou op dës Manéier aktivéiert
Zweet Schrëtt: Wielt d'Punkten déi mir exportéieren wëllen, wielt dann de Kommando "Export Koordinaten", dat ass den Up Pfeil, a fëllt d'Konditiounen aus:
-Date vun der Datei
-File name
-Order vun den Koordinaten
-Primary Eenheeten
-Decimals
-Separator
-View
-Prefix / Suffix
-Einzielplaz
De Panel erlaabt Iech d'Optiounen ze wielen, wann nëmmen déi gewënscht Zeechnungen (eenzel), d'Zeechnungen an en Zait (Zait) oder all d'Datei (all)
Den Endergebnis ass e .txt Datei, dat Dir vun excel opmaachen kann.
An méngem Fall hunn ech hien eng Zuel hunn, d'Checkbox op der richtiger Säit ze kontrolléieren
Am Fall wou d'Datei scho gëtt, gëtt eng Fënster opgeworf, wann Dir wëllt ersetzen oder schreiwen (add oder addend).
Fir ze identifizéieren wat d'Punkte sinn, zielt d'Mikrostéierung Iech Zuelen an all Punkt mat der Faarf, der Zeilennummel an der Gréisst vum Text, deen Dir aktiv ass.
2 Maacht et mat AutoCAD
Virun eisem CivilCAD kennen (Softdesk) benotzt mir eng DOS-Applikatioun, déi nach ëmmer do genannt gëtt dxf2csv. Dir kënnt et probéieren, wann Dir Iech gär mat Nostalgie gefoltert, 🙂 et ginn och e puer Apps"net fräi", an ech si sécher datt et e puer gratis muss sinn, awer an dësem Fall wäerte mir gesinn wéi et mat Softdesk8 gemaach gëtt, et ass ähnlech am CivilCAD.
Fir d'Punkte siichtbar ze maachen, hunn ech d'Format mam Format/Format Point/ Point Style geännert. Fir datt d'Dicke vun de Linnen sichtbar ass, musst Dir "Lts" aktivéieren, mat engem Wäert manner wéi 1 bis mir den Ënnerscheed gesinn.
Éischt Schrëtt: Öffnen Sie e Projet oder schreiwen eng nei
AEC
Softdesk Programmer (Datei eroflueden)
Projekt erstellen
Assignéiert de Numm vum Projet, dann ok
Mir wielen d'Zuel, wou d'Nummerennummer startet
Lueto ok, dann ok
mir wielen "cogo", dann ok
Zweet Schrëtt: Gitt d'Punkten op d'Datebank: Dofir gi verschidde Weeër, an dësem Fall wäerte mir automatesch maachen: Points / set points / automatisch, dann wäerte mir all Linn vum Polygon wielen.
D'Signal dat aginn ass ass Punkte / Setzpunkte / Lëscht verfügbar Punkten. Et sollt +6 weisen, dat heescht datt et scho 5 Punkten an d'Datebank aginn.
Drëtt Stuf: Exportéiert Punkten.
Fir déi Punkten ze exportéieren déi mir maachen:
-Pointen / Import-Export / Export exportéieren
Kuckt d'Exportformat aus, an dësem Fall PNE (Punkt, Norden, Osten)
- Mir hu den Destinatordateur vun der Datei gewielt an de Numm geschriwwen
-No Kommandobar wäerte mir d'Exportoptiounen auswielen (duerch Selektioun, no Range ... an dësem Fall benotzen mir alles, all)
- Ready, d'Datei ass fort, an dësem Fall gëtt duerch Ofbau getrennt, awer déiselwecht kann mam Excel geöffnet ginn
Wann d'Punkten op Gréissten geschriwwe sinn, déi ze grouss sinn, musst Dir d'metresch Eenheeten änneren, well déi Englesch Standardherde sinn (AEC / Setup Zeechnunge / Eenegkeet Wénkel / Wiel Métric)
Dës Kéier haten d'Punkten keng Héicht, mir kucken dat Thema an enger anerer Lëscht, wann mir iwwer Kontournéiert schwätzen.
Toleréiert meng Insistenz, ee weess en Makro fir Atokad deen méi einfach a gratis ass?
Fannt een et op eng aner Manéier?
Dofir braucht Dir CivilCAD oder Civil3D. Béid sinn spezialiséiert Module, déi op AutoCAD schaffen.
AutoCAD alleng erlaabt Iech et net ze maachen.
Entschëllegt mech fir meng Initiatioun, ech muss wëssen, wéi Dir passéiert an / oder Schnëtt an Autocad direkt mat der Héicht a Distanzen liesen (Streckbreedung) all 20 mt. Longitudinal a gläichzäiteg ech an d'Berechnung vum Volume vun Fëllungen an Ausgruewungen direkt an Autocad
Och dëst Post ass excellent ginn et vill Ënnerstëtzung Handwierksgeschir der Aarbecht ze vereinfachen an och gutt Ënnerstëtzung fir Civilcad ginn wat ganz praktesch ass ze benotzen, mä déi wichteg Saach ass d'Origine vun all Konzept ze wëssen
Verspriechen mat dëser Applikatioun
och XYZ-DXF existéiert wat ass déi bescht
Gudde Schrëtt weider léieren eis
Hallo Kovos, an dësem Beitrag Mir erkläre wéi et mat Softdesk8 ze maachen. Ech hunn kommentéiert datt mir net duerch dësen Blog recommandéiert Weeër fir piréiert Software erwerben, an dësem Datum hunn ech dat gesot Vuze Et funktionéiert dofir, awer et ass op Äert Risiko.
Wéi kommen ech d'Niveaubunnen vun Aautocad zeechnen? Wéi benotzen ech d'Softdesk8?
Hallo Jorge Luis,
Als éischt, an der totaler Statioun exportéieren d'Punkte op .txt Format, am léifsten: x Koordinate, y Koordinate, Héicht, Beschreiwung.
da wielt se mat Excel an de Choix vun der Datei .txt
Dir wielt déi Optioun, déi duerch Komma begrenzt ass, fir datt Dir d'Säulen trennen kann
fir se an excel ze hunn, recommandéiert Dir se benotze kënnt dësem Tool, déi d'Excel op dxf exportéiert
Ech brauch d'Schrëtt fir d'Statiounspunkte kënnen ze exportéieren fir ze exceléieren ... Merci
Urgent
Well Daniel, dat war deen eenzegen deen ech kann beweise wéi et funktionéiert, et ass en VBA awer et interagéiert mat Excel op der Fléie
http://geofumadas.com/cuadro-de-rumbos-y-distancias-en-excel-interactivo-con-microstation/
Ech géif et schätzen. Et ass fir meng Dissertatioun an ech muss just dëse maachen fir de Fortschrëtt ze behalen. MERCI gëllt
Daniel, léije mech e vba, deen ech e puer Zäit benotzt hunn an erop fir Iech ze probéieren
gitt mer dësen Dag
Neen, deen nëmmen fir Punkten z'importéieren.
Ech gesitt eng Vba an ech wäert et eroplueden fir Iech ze probéieren
¿¿¿WÉI MAACHEN ECH D'KOORDINATEN VUM EXCEL AAN MIKROSTATIOUN IMPORTÉIEREN A MÄI LINNEN ZEINEN; IWWERT DEN TOOL BOXER APP> XYZtext> IMPORT KOORDINALEN ???????
DASS ASS SECH MÉIGLECH DASS APPLIKATIOUN IWWERT ???
GUTTAG, GALVAREZHN
Merci, mä méng Fro ass:
Ech hunn eng Datebank an Excel, wou ech d'Origine Koordinaten an Destinatioun Koordinaten hunn, an ech wëll et d'Linnen an Autocad molen. """MEE""" Ouni kopéieren a pechen, awer éischter d'Operatioun ass automatesch, dat heescht, mat engem Makro oder e puer Code fir d'Interface ze kreéieren, oder vläicht bannent AUTOCAD oder MICROSTATION ET GASS DAT INTERFACE déi Daten aus Excel AUTOCAD importéiert oder MICROSTATION wann et de Fall ass
Wat gitt Dir Iech Galvarezhn
??????????? MERCI gëllt
Hi Daniel, déi selwecht Prozedur erklärt hei
http://geofumadas.com/como-importar-puntos-de-excel-a-autocad/
Et ass fir Iech, awer aplaz de Punkt-Kommando
aktivéieren den Zeilbefehl oder plaine
Amplaz vun de Punkten déi Dir eng Zeil zeechnen
Wat
Ech sinn en THESISIERT an ech sinn op der Sich no, wéi ech automatesch Zeilen an AutoCAD aus enger Datebank an Excel ze linnen hunn, dh datt d'Koordinaten ORIGINÉIEREN an Koordinate DESTINATIOUNEN
MEE HËLT NET MÉI WÄERTSPROGRAFFEN, MUSS LINES A DIREKT E SPILLRAUM OPSCHREIWEN ODER GESETZENESTE PUNKTEN
MERCI
Dëst lëschte kann et maachen
(defun c: txt-xyzs ()
(setq a (ssget)
n (Sslength a)
i 0
f (oppen (getstring "\nDateiname: ") "w")
)
(widderhuelen n
(setq Name (ssName ai)
Ent- (beetze name)
tp (cdr (assoc 0 ent))
)
(wann (= "TEXT" tp)
(wann (a (= (cdr (assoc 71 ent)) 0) (= (cdr (assoc xNUMX ent)) 72))
(progn
(setq ip (cdr (assoc 10 ent))
x (RTL (Auto IP) 2 2)
an (rtos (cadr ip) 2 2)
z (rtos (caddr ip) 2 2)
(cdr (assoc 1 ent))
)
(princ (strcat x "," y "," z "," s "\n") f)
), lénks gerechtfäegte Text
(progn
(setq ip (cdr (assoc 11 ent))
x (RTL (Auto IP) 2 2)
an (rtos (cadr ip) 2 2)
z (rtos (caddr ip) 2 2)
(cdr (assoc 1 ent))
)
(princ (strcat x "," y "," z "," s "\n") f)
), aner wéi de Link gerechtfäerdegt
); wann
); wann
(wann (= "MTEXT" tp)
(progn
(setq ip (cdr (assoc 10 ent))
x (RTL (Auto IP) 2 2)
an (rtos (cadr ip) 2 2)
z (rtos (caddr ip) 2 2)
(cdr (assoc 1 ent))
)
(princ (strcat x "," y "," z "," s "\n") f)
), lénks gerechtfäegte Text
), wann mtext
(setq i (1 + i))
), widderhuelen
(no F)
)