|
01.03.2014 08:06
husokz
|
Alıntı
waytooraider :
Tek kelimeyle harika.Elinize aklınıza sağlık.
Saygılarımla.
|
|
01.03.2014 08:06
husokz
|
|
üstadım yardımcı olursanız sevinirim!
acxl.VLX uzantılı lisp yüklüyorum, yüklesemde excel'e nasıl aktarılacağını çözemedim...
yani kısacası beceremdim,,, lütfen yardımcı olun!!!
|
|
02.03.2014 00:05
 ProhibiT
|
|
Appload komtunu kullanarak veya AutoCAD komut satırından (Load "acxL.cLx) girerek programı yükleyin. AutoCAD komut satırından ACXL girin.
|
|
04.11.2014 09:23
saidcan
|
|
Çok işe yarayan bir Lisp elinize sağlık.
|
|
03.06.2015 14:17
sisecam
|
|
Merhabalar;
Çok başarılı bir lisp oldu kısa ve öz ama ben istiyorumki;
autocad te ayrı ayrı textler olsun mesela proje adı gibi.
bunları benim seçeceğim excel dosyasında mesela tıkladığım 1 hücreye yazsın.
bu mümkünmüdür.
Konuyu hortlattım ama ..
teşekkür ediyorum.
saygılar.
|
|
07.07.2015 05:38
ysezgul
|
Alıntı
ProhibiT :
Kod:
(defun c:TExP (/ fL Tx n)
(setvar "cmdecho" 0) (command "_.undo" "group")
(setq fL (open (getfiled "Çıkış Kütüğü" "" "xls" 9) "w")
Tx (ssget (list (cons 0 "*Text"))) n -1)
(while (< (setq n (1+ n)) (sslength Tx))
(write-line (cdr (assoc 1 (entget (ssname Tx n)))) fL))
(close fL) (command "_.undo" "e") (prin1))
Seçilen objeler seçim sırasına göre veya gurup halinde seçilmişlerse, oluşturulma sırasının tersi sırada yazılırlar.
Excel ile dosyayı açarken bir hata mesajıyla karşılaşırsanız, Evet (Yes) seçerek devam edilmelidir.
Üstad,
peki seçim sırasını seçilen text objelerinin oluşturulma sırasına göre veya biraz daha özelleştirirsek text objelerinin üzerinden çizilecek bir fence'e bağlı hale getirmek çok mu zahmetli olacaktır?
|
|
07.07.2015 05:52
 Travaci
|
ysezgul
Objeleri seçmenizi istediğinde fence komutunu çalıştırabilirsiniz.
|
|
07.07.2015 06:08
ysezgul
|
|
çok teşekkür ederim. komut satırında görmeyince düşünemedim.
|
|
25.08.2015 14:31
mekserkan
|
Merhaba Şahin bey; rusça karakterli yazılarda excel e atarken "\U+0421\U+0442\U+0430\U+043A" tarzında kodlayarak atıyor. Bu konuda yardımcı olur musunuz?
Aşağıdaki paylaştığım lisp te de benzer sorunla karşılaşıyorum. Onda da soru işaretleri oluyr bütün rusça fontlar...
Bu arada çok cömert ve fedakar paylaşımlar yapıyorsunuz. Teşekkürler. :yes :yes :yes
Linkleri görebilmek için ÜYE olmalısınız.
|
|
29.01.2016 14:50
şahnaz
|
|
Herkese merhabalar
Prohibit Hoca nın verdiği ilk lispi kullandım. Fakat acemiliğimden olsa gerek Excel de "nil" diye bir ifade çıktı. Acaba neyi yanlış yapıyorum?
Durumumu özetlemem gerekirse 233 adet fore kazığım var ve bunların tüm koordinatlarını girmem lazım.
Şimdiden teşekkürler.
|
|
19.09.2016 18:07
macros55
|
|
elinize saglık çok iyi bir lisp.hocam lispe şöyle bir ilave yapmak olurmu excel dosyasına ilave etmezden önce soru olsun txt excel de A1 hanesinden satırla yoksa sütunla devam etsin.bazen enlem bazen boylam txt oluyor...önceden tşk-ler hocam
|
|
12.11.2016 08:00
onderasla
|
|
174410-txxl.rar linkinden dosyayı indirdim ancak rar şifresi nedir?
|
|
16.03.2018 12:50
onderbengu05
|
Alıntı
ProhibiT :
Kod:
(defun c:TExP (/ fL Tx n)
(setvar "cmdecho" 0) (command "_.undo" "group")
(setq fL (open (getfiled "Çıkış Kütüğü" "" "xls" 9) "w")
Tx (ssget (list (cons 0 "*Text"))) n -1)
(while (< (setq n (1+ n)) (sslength Tx))
(write-line (cdr (assoc 1 (entget (ssname Tx n)))) fL))
(close fL) (command "_.undo" "e") (prin1))
Seçilen objeler seçim sırasına göre veya gurup halinde seçilmişlerse, oluşturulma sırasının tersi sırada yazılırlar.
Excel ile dosyayı açarken bir hata mesajıyla karşılaşırsanız, Evet (Yes) seçerek devam edilmelidir.
|
|
16.03.2018 12:51
onderbengu05
|
ProhibiT
Sayın Hocam,
Attribute text için nasıl bir yönerge yazabiliriz. Selamlar...
Travaci (16.03.2018 13:29 GMT)
|
|
16.03.2018 13:01
Travaci
|
onderbengu05
Kod:
(defun c:ATxP (/ fL Tx n)
(if (setq n -1 Tx (ssget (list (cons 0 "ATTDEF"))))
(if (setq fL (getfiled "Çikis Kütügü" "" "xls" 9))
(progn
(setq fL (open fL "w"))
(while (< (setq n (1+ n)) (sslength Tx))
(write-line (cdr (assoc 2 (entget (ssname Tx n)))) fL))
(close fL)
)
)
) (prin1)
)
|
|
16.03.2018 13:14
onderbengu05
|
Travaci
Öncelikle teşekkür ederim. Lakin lisp attribute blockları seçmiyor explode edince iş görüyor.
ZwCadden mi kaynaklanıyor tam anlayamadım.
Travaci (16.03.2018 13:28 GMT)
|
|
16.03.2018 13:28
Travaci
|
|
Hayır ZwCad de sorun yok, siz attribute text yazınca bende böyle yaptım.
Travaci (16.03.2018 14:22 GMT)
|
|
16.03.2018 13:39
onderbengu05
|
|
Block attribute içeriğini excele atmak için attfef yerine hangi komutu yazmalıyız.
Travaci (16.03.2018 13:56 GMT)
|
|
16.03.2018 14:05
Travaci
|
|
Öyle bir komut yok, komutlar zinciri yazman lazım.
ZwCad de varsa Dataextraction komutunu kullanın.
|
onderbengu05
|
Alıntı
Travaci :
Öyle bir komut yok, komutlar zinciri yazman lazım.
ZwCad de varsa Dataextraction komutunu kullanın.
Maalesef Zwcadde bu komut yok. Hatırlarsanız dynamic block length lispini de adapte edememiştim. Yine de teşekkür ederim. Ama komutlar zinciri yazmak bugünkü bilgilerimle pek mümkün değil. Selamlar...
|
Sonraki Sayfa
