export multiple point selection to excell

[koenwas]

I would like to export the xy coordinates of multiple points to excell. Has anyone a routine which can do this ? I'm not familiar with either LISP or VBA so if you can give me some guideline how to import and use it this would be great.

 

[exit]

Hi,
first aid:


(DEFUN C:xyz_out ( / datei aws zaehler einfp pstr )
(SETQ datei (OPEN "c:\xyz.txt" "w&quot)
(SETQ aws (SSGET "x" '((0 . "POINT&quot)))
(SETQ zaehler 0)
(REPEAT (SSLENGTH aws)
(SETQ einfp (CDR(ASSOC 10 (ENTGET (SSNAME aws zaehler)))))
(SETQ pstr (STRCAT (RTOS(CAR einfp) 2 3) " " (RTOS(CADR einfp) 2 3) " " (RTOS(CADDR einfp) 2 3)))
(WRITE-LINE pstr datei)
(SETQ zaehler (+ zaehler 1))
); ende repeat
(CLOSE datei)
)


You will get a file „xyz.txt“ on c:
regards, Lothar


Win NT4.0(SP6),2000(SP3)
AC 2000i(SP2), ADT 3.0(SP3),
AC 2002, ADT 3.3,
AC 2004, ADT 2004