+ Reply to Thread
Results 1 to 4 of 4
  1. #1
    Forum Newbie
    Using
    AutoCAD 2013
    Join Date
    Dec 2013
    Posts
    1

    Default HOw to Export GPS Coordinates to CSV

    Registered forum members do not see this ad.

    Dear All,

    Good Day,

    I am looking for a method to export all the GPS coordinates which have been assigned to each point along with the properties of that point to an excel csv.
    In our drawings, there are multiple columns and each column has four points and each point has X,Y,Z coordinates. I want to export all this information to an excel sheet.

    Any idea?

    Thank You

  2. #2
    Quantum Mechanic ReMark's Avatar
    Computer Details
    ReMark's Computer Details
    Operating System:
    Windows 7 Pro 64-bit
    Computer:
    Thinkmate
    Motherboard:
    Intel DX58SO2 LGA1366 X58
    CPU:
    Intel i7-960 Quad-core 3.20GHz 8MB cache
    RAM:
    12GB (3x4GB) PC3-106000 DDR3
    Graphics:
    nVidia Quadro K4200, 4GB GDDR5
    Primary Storage:
    150GB Velocipraptor 10,000 rpm
    Secondary Storage:
    none
    Monitor:
    Dell P24LLH - 24" wide screen LCD
    Discipline
    See details...
    ReMark's Discipline Details
    Occupation
    CAD Draftsman/Designer...chemical manufacturing.
    Discipline
    See details below.
    Details
    I work for a specialty chemical manufacturer. I do a little bit of everything from P&IDs to civil to architectural and structural.
    Using
    AutoCAD 2018
    Join Date
    Nov 2005
    Location
    Norwalk, CT USofA
    Posts
    46,357

    Default

    One possibility might be the DATAEXTRACTION command.
    "I have only come here seeking knowledge. Things they wouldn't teach me of in college." The Police

    Eat brains...gain more knowledge!

    I'm now a full member of the Society for the Promotion of Mediocrity in CAD. Standards? We don't need no stinkin' standards! Take whatever advice I offer and do the opposite.

  3. #3
    Super Moderator SLW210's Avatar
    Computer Details
    SLW210's Computer Details
    Operating System:
    Windows 7 PRO 64-bit
    Computer:
    IBM Lenovo
    Motherboard:
    ACPI x64
    CPU:
    Pentium(R) i5 4570 @ 3.2GHz
    RAM:
    8 GB RAM
    Graphics:
    Nvidia Quadro 600 1GB
    Primary Storage:
    300 GB
    Secondary Storage:
    650GB
    Monitor:
    2x ThinkVision 24"
    Discipline
    Multi-disciplinary
    SLW210's Discipline Details
    Occupation
    Design Draftsman
    Discipline
    Multi-disciplinary
    Details
    Mostly do drafting related to manufacturing. From doing site layouts with proposed updates, additions and renovations to be budgeted and submitted for bid, to updating and changing existing drawings to reflect maintenance and repair/revision work done on site.
    Using
    AutoCAD 2011
    Join Date
    May 2007
    Location
    South Florida, USA
    Posts
    11,718

    Default

    Have a look at "Similar Threads" at the bottom of this page.

    This one Export Coordinates from AutoCAD Help may help.
    “A narrow mind and a fat head invariably come on the same person” Zig Zigler



  4. #4
    Senior Member satishrajdev's Avatar
    Computer Details
    satishrajdev's Computer Details
    Operating System:
    Windows 7 - 64bit
    Computer:
    DELL
    RAM:
    8 GB
    Primary Storage:
    500 GB
    Monitor:
    DELL
    Discipline
    Surveying
    satishrajdev's Discipline Details
    Occupation
    CAD Engineer
    Discipline
    Surveying
    Details
    Design Survey Utilities (i.e. Bathymetry & Geophysical Survey) Design of Survey Planning. Preparation of Alignment Sheets. Programming in AutoCAD.
    Using
    AutoCAD 2014
    Join Date
    Apr 2012
    Location
    Aamchi Mumbai, India
    Posts
    430

    Default

    Registered forum members do not see this ad.

    Try this :-

    Code:
    (Defun C:ExportPMT (/ *error* Smode file dta i theEntity eb pnt    txv)
    
      (setvar "cmdecho" 0)
    
      (Defun *error* (msg)
        (if    (not (member msg
                 '("bad argument type: lselsetp nil"
                   "bad argument type: stringp nil"
                   "quit / exit abort"
                   "Function cancelled"
                  )
             )
        )
          (princ (strcat "\nError: " msg))
        )
        (princ)
        (prompt
          "\n........................................................"
        )
        (princ "\nStatus : Function cancelled")
      )
    
      (prompt
        (strcat "\n:: Routine created by Satish Rajdev. ::")
      )
    
      (initget 1 "P T")
      (setq Smode (getkword "\nSelect Mode ('P'Point/'T'Text or Mtext):"))
    
      (setq
        file (open (getfiled "Specify Output XYZ File" "c:/" "CSV" 1)
               "w"
         )
      )
    
      (if (= Smode "P")
        (progn
          (write-line
        "Easting (mE),Northing (mN),Elevation (m)"
        file
          )
          (while (= dta nil)
        (setq dta (ssget '((0 . "POINT")))
        )
        (if (= dta nil)
          (alert "Please select POINTS to continue...")
        )
          )
          (repeat (setq i (sslength dta))
        (setq theEntity (ssname dta (setq i (1- i))))
        (setq eb (entget theEntity))
        (setq pnt (cdr (assoc 10 eb)))
        (setq txv (rtos (caddr pnt) 2 3))
        (write-line
          (strcat (rtos (car pnt) 2 3)
              ","
              (rtos (cadr pnt) 2 3)
              ","
              txv
          )
          file
        )
          )
          (close file)
          (setq msg "CSV File is created with extracted POINT details")
          (alert msg)
        )
      )
    
      (if (= Smode "T")
        (progn
          (write-line
        "Easting (mE),Northing (mN),Text Value"
        file
          )
          (while (= dta nil)
        (setq dta (ssget '((0 . "TEXT,MTEXT")))
        )
        (if (= dta nil)
          (alert "Please select Text/Mtext to continue...")
        )
          )
          (repeat (setq i (sslength dta))
        (setq theEntity (ssname dta (setq i (1- i))))
        (setq eb (entget theEntity))
        (setq pnt (cdr (assoc 10 eb)))
        (setq txv (cdr (assoc 1 eb)))
        (write-line
          (strcat (rtos (car pnt) 2 3)
              ","
              (rtos (cadr pnt) 2 3)
              ","
              txv
          )
          file
        )
          )
          (close file)
          (setq msg "XYZ File is created with extracted TEXT/MTEXT details")
          (alert msg)
        )
      )
    
      (prompt
        "\n........................................................"
      )
      (prompt (strcat "\nStatus : " msg))
      (setq *error* nil)
      (setvar "cmdecho" 1)
      (princ)
    )
    
    (princ)
    (princ
      "\n:: Type \"ExportPMT\" to Run the Routine ::"
    )
    (princ)
    Best Regards,
    Satish Rajdev

    If you ride like there is no tomorrow... Don't worry, there won't be !!!!
    www.facebook.com/satish.rajdev

Similar Threads

  1. Export coordinates and blockname to excel
    By Wouter543 in forum AutoCAD Beginners' Area
    Replies: 1
    Last Post: 21st Mar 2012, 03:28 pm
  2. Export Coordinates from AutoCAD Help
    By Kcks in forum AutoLISP, Visual LISP & DCL
    Replies: 15
    Last Post: 4th Nov 2010, 11:25 am
  3. Export from Revit to 3ds Max loses coordinates
    By Autodesk in forum AutoCAD RSS Feeds
    Replies: 0
    Last Post: 4th Nov 2010, 02:30 am
  4. Export points coordinates and the text near it...
    By digitalghost in forum AutoCAD General
    Replies: 1
    Last Post: 30th Nov 2007, 04:52 pm
  5. How can I export X, Y coordinates of objects??
    By acatalin2003 in forum AutoLISP, Visual LISP & DCL
    Replies: 6
    Last Post: 16th Oct 2005, 07:32 pm

Tags for this Thread

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts