1、autolisp对Excel表的数据无法直接读取,需要将Excel保存为.csv的格式读取。
2、(setq str_list nil)(if (setq path (findfi盟敢势袂le "C:\\Users\\帆歌达缒ASUS\\Desktop\\工作簿1.csv")) (progn (setq file (open path "r")) (while (setq str (read-line file)) (setq str_list (append str_list (list str))) ) ))(print str_list)(princ )再用这段函数读取到CAD,命令行显示如图所示。
3、接下来再根据所需要格式用lisp函数对表进行编辑获取所需数据格式。