I wanna kick AutoCAD to Excel from the size of the pipe and the vent channel can perf

[MTTLP]

I wanna kick AutoCAD to Excel from the size of the pipe and the vent channel can perform deviant lisp lisp

 

pose no pipe diameter pipe length (m)

1 21/2" 5,6

 

hvac

pose no channel size 1 channel size 2 c hannel length (m)

1 40 40 5,6

[MTTLP]

autocad to excell pleass help

[Lt Dan's legs]

http://web2.airmail.net/terrycad/LISP/GetExcel.lsp

[MTTLP]

Thanks can you tell me the name of the command

[Lt Dan's legs]

Open the lsp file. It has a few functions

[MTTLP]

I need a solution

[Tiger]

See here on how to use a LISP-routine.

[MTTLP]

I want you to transform the data in the autocad to excel format if it is possible?

I know using lips

[fixo]

Try to use CSV file instead, omething like this:

(defun c:tocsv(/ file lst data datum dia ent1 ent2 ent3 leng pos)
 ;;list to file
(defun wrs (file lst  / filename atts blockname en obj ss)
        (setq filename (open file "W"))
        (foreach x lst 
          (write-line x filename)
        )
        (close filename)
(princ)
)
 (setq file (strcat (getvar "dwgprefix")(vl-filename-base (getvar "dwgname"))".csv"));<-- you may want to change the file name here

 (setq data (list (strcat  "pos no" "\t" "pipe diameter" "\t" "pipe length (m)")))

 (setq lst nil)
 (while (setq ent1 (entsel "\nSelect position text (or press Enter to stop): "))
   (progn
     (setq pos (cdr (assoc 1 (entget (car ent1)))))
(setq ent2 (entsel "\nSelect diameter text: "))
     (setq dia (cdr (assoc 1 (entget (car ent2)))))
     (setq ent3 (entsel "\nSelect length text: "))
     (setq leng (cdr (assoc 1 (entget (car ent3)))))
     (setq datum (strcat pos "\t" dia "\t" leng))
     (setq data (cons datum data ))    
   )   
   )
 (setq data (reverse data))
 (wrs file data)
 (princ)
 )
(princ "Start command with: TOCSV")
(prin1)

 

~'J'~

[MTTLP]

Thank you have a beautiful but

I like the image ATCA separate cells

I would like to measure with which to measure the exposure number automatically ATCA lisp

I and 2 when measuring 1.nokta point between the low

ATCA and continue taking measurements to Excel

 

Düzenlemeleri geri al

 

 

 

 

 

 

 

 

 

[ATTACH=CONFIG]34452[/ATTACH]

[fixo]

Invalid Attachment specified. If you followed a valid link, please notify the administrator

I don't completely understand what you means

Your attachment is invalid, try upload a sample drawing instead,

better yet in 2007 version

 

~'J'~

[SLW210]

I don't completely understand what you means

Your attachment is invalid, try upload a sample drawing instead,

better yet in 2007 version

 

~'J'~

 

Link works fine for me fixo. I have attached the image for you.

[MTTLP]

thank you

I do not know much English do not understand

excuse me

 

By measuring the dimensions one by one the names of the parts autocad to excel I want to transfer

[MTTLP]

 

ok

[MTTLP]

help me pleas

[ReMark]

Are you using attributes or fields or neither?

[MTTLP]

hvac and fire systems project project

I want to use

1 measure of channel size and channel point, and 2 scaling between the point I want to lisp will pass on excelle

[Lt Dan's legs]

use the EATTEXT command

[MTTLP]

ı know lisp

[MTTLP]

arkadaşlar kolay gelsin sizden birşey isyetecem

metraj cıkartıyorum autocad deki poz numarasını, çapı ve uzunlugunu ben seçerek excele aktaracak bir lisp istiyorum

 

21/2"

---------------------------------

(5m)

poz no boru çapı boru uzunluğu (m)

1 21/2" 5

2

ve böle devam etmesini istoyurum

böle bir lisp istiyorum.