Đến nội dung


Hình ảnh

Em cần xuất file cad sang excel, khổ lắm rồi.


  • Please log in to reply
12 replies to this topic

#1 hypepol

hypepol

    biết zoom

  • Members
  • Pip
  • 15 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 18 July 2012 - 09:32 PM

admin xóa dùm em cái thớt này, thanks
  • 0

#2 gia_bach

gia_bach

    biết lệnh adcenter

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 1435 Bài viết
Điểm đánh giá: 1426 (rất tốt)

Đã gửi 19 July 2012 - 07:34 AM

Số là công trường bỗng dưng thiếu thép nghiêm trọng, chẳng biết là do dự toán hay do thi công... vậy là ông sếp khốn kiếp bắt nhập hết cái mớ này qua excel để tính lại. và... cã ngày nhập được có 4 trang, hoa mắt nhức đầu luôn, chợt nhớ ra có mấy cái lisp như cad2file, cad2x... vậy là lấy file về. Tuy nhiên cái thống kê này được block bằng cái gì gì ấy explode không được và chẳng dùng được luôn mấy cái lisp kia. Mấy anh chị nào pro dzô ngâm dùm em 1 chút xíu. thanks trước, em có file nó đây ạ.

http://www.mediafire...70q1b9iy3fhje44

Có hai vấn đề cần trao đổi với bạn :
1.Có cần thiết phải thêm 1 từ như thế với "xếp" không?
2.Tất cả các Block trong file tks.dwg đều explode được.
  • 1

#3 cd2k44

cd2k44

    Edu level: li5

  • Members
  • PipPipPipPipPipPipPip
  • 648 Bài viết
Điểm đánh giá: 121 (tàm tạm)

Đã gửi 19 July 2012 - 07:44 AM

Bản cad này đời bao nhiêu thế bạn.Cad07 không mở được
  • 0

#4 ginger

ginger

    biết lệnh move

  • Advance Member
  • PipPipPip
  • 121 Bài viết
Điểm đánh giá: 10 (tàm tạm)

Đã gửi 19 July 2012 - 07:56 AM

Em thì em chả biết cad của bạn ấy là đời bao nhiêu nhưng cad 2013 thì mở được
Còn Block trong file tks.dwg đều không explode được
Theo ngu ý của em thì khi explode ra thì nó vụn ra thôi!
  • 0

#5 sgcq

sgcq

    Hội Hai Lúa

  • Members
  • PipPipPipPipPipPipPip
  • 1880 Bài viết
Điểm đánh giá: 692 (tốt)

Đã gửi 19 July 2012 - 11:06 AM

Số là công trường bỗng dưng thiếu thép nghiêm trọng, chẳng biết là do dự toán hay do thi công... vậy là ông sếp khốn kiếp bắt nhập hết cái mớ này qua excel để tính lại. và... cã ngày nhập được có 4 trang, hoa mắt nhức đầu luôn, chợt nhớ ra có mấy cái lisp như cad2file, cad2x... vậy là lấy file về. Tuy nhiên cái thống kê này được block bằng cái gì gì ấy explode không được và chẳng dùng được luôn mấy cái lisp kia. Mấy anh chị nào pro dzô ngâm dùm em 1 chút xíu. thanks trước, em có file nó đây ạ.

http://www.mediafire...70q1b9iy3fhje44


Đề bài này hay ghê đó.

Mỗi trang e làm thử trong 50 phút thì xong.
Tổng cộng 26 trang = 21h30' ~3 ngày thì xong hết.
Các block trong file này xả ra mất số liệu ko xài được. Để nguyên vậy export lun sang *.xls.
E post thử trang 1 để pác hypepol kiểm giúp e xem đạt tiêu chuẩn chưa nhé:

http://www.cadviet.c...3/110802_01.rar
  • 1

12728974_230210507314169_718723558582070 HỘI HAI LÚA

           fanpage: https://www.facebook.com/HoiHaiLua/

 

 

 

 

 

 


#6 phamthanhbinh

phamthanhbinh

    biết lệnh adcenter

  • Moderator
  • PipPipPipPipPipPipPip
  • 6009 Bài viết
Điểm đánh giá: 3113 (tuyệt vời)

Đã gửi 19 July 2012 - 11:45 AM

Số là công trường bỗng dưng thiếu thép nghiêm trọng, chẳng biết là do dự toán hay do thi công... vậy là ông sếp khốn kiếp bắt nhập hết cái mớ này qua excel để tính lại. và... cã ngày nhập được có 4 trang, hoa mắt nhức đầu luôn, chợt nhớ ra có mấy cái lisp như cad2file, cad2x... vậy là lấy file về. Tuy nhiên cái thống kê này được block bằng cái gì gì ấy explode không được và chẳng dùng được luôn mấy cái lisp kia. Mấy anh chị nào pro dzô ngâm dùm em 1 chút xíu. thanks trước, em có file nó đây ạ.

http://www.mediafire...70q1b9iy3fhje44

Hề hề hề,
File của bạn xài CAD2010 nên mình phải dùng DWG TrueView 2012 để chuyển về CAD2004 và đã mở được.
Các block trong file là block thuộc tính. Khi exploded sẽ bị mất các giá trị thuộc tính.
Không phải không có cách chuyển nó sang Excel nhưng cũng không phải quá dễ dàng đâu, Mình sẽ thử xem sao.
Tuy nhiên cần góp ý với bạn như sau:
1/- Đây là diễn đàn của những người làm kỹ thuật, tức là ít nhiều chi cũng gọi là có học bạn ạ. Việc bạn sử dụng ngôn từ trong bài viết cần thận trọng và cố gắng để nó phản ánh đúng con người của bạn.
2/- Dù rằng chả ai biết sếp của bạn ra sao, nhưng việc bạn gọi sếp bạn như vậy chứng tỏ bạn chả hề tôn trọng chi người đó. Vậy bạn còn ngồi đó làm việc làm chi??? Chỉ để kiếm miếng ăn à??? Thế thì bạn cũng không khác ông ấy bao nhiêu cả.
Làm một các bộ kỹ thuật mà lại phải hèn thế sao????
3/- Rất có thể sếp bạn đang ngồi đọc những điều bạn viết trên đây vì ông ấy cũng là một người làm kỹ thuật. Vậy bạn nghĩ ông ấy sẽ có cảm giác chi khi làm việc với bạn. Cho dù bạn đã dùng một cái tên ảo trên diễn đàn, chả phải tên thật của bạn chăng nữa thì chỉ cần xem bản vẽ bạn post lên và nội dung yêu cầu của bạn thì ắt ống ấy sẽ biết bạn là thằng cu nào rồi. Vậy thì quan hệ công việc của bạn sẽ ra sao????
4/- Nếu bạn đã không tôn trọng nổi sếp của bạn thì mình tin rằng bạn cũng chả thể tôn trọng nổi ai trên cái diễn đàn mở này cả. Vậy thì bạn còn vào để mà nhờ vả làm chi??? Phải chăng bạn chỉ cần lợi dụng mọi người chút chút để giải quyết cho xong cái khó chịu của bạn, và khỏi cần quan tâm tới việc mọi người nghĩ về bạn ra sao cũng như cũng chả cần biết xấu hổ là cái chi????
5/- Trong cuộc sống , chả phải mọi người xung quanh lúc nào cũng cần phải quan tâm tới bạn cũng như chả phải tất cả mọi việc đều luôn thuận lợi cho công việc của bạn đâu. Bởi thế khi gặp khó khăn, cần phải thận trọng , bình tĩnh và tìm giải pháp hợp lý để giải quyết chứ không phải cáu nhặng xị lên rồi đổ lỗi cho người khác hay đổ lỗi cho hoàn cảnh được đâu. Phàm đã dây với công việc kỹ thuật thì càng cần phải dám làm dám chịu và dám từ bỏ mọi thói quen xấu của bản thân, gây ảnh hưởng không tốt tới công việc của bạn.
6/- Chớ vội cho rằng mình luôn đúng, có thể sẽ sai đấy. Ngay cả bài post này của mình cũng có thể sai trong việc nhận xét về bạn , song mình vẫn post nó lên đây để bạn tự đọc và hiểu mình nghĩ gì rồi tự tìm lấy cho bạn cái gì là phù hợp nhất. Hy vọng rằng mình sai và bạn sẽ là đúng. Đừng vì thế mà giận mình, bởi nếu có giận thì bạn sẽ lại tổn thọ nhiều hơn.

Chúc bạn vui khi tham gia diễn đàn và hãy sửa lại bài viết của mình nếu thấy như vậy là không hay.
  • 6
Chúc các quý Anh trên diễn đàn luôn khỏe, đẻ thêm được nhiều thứ để mót.

#7 hypepol

hypepol

    biết zoom

  • Members
  • Pip
  • 15 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 19 July 2012 - 12:33 PM

thanks, vì học được thêm 1 bài tư tưởng đáng giá, số là ông sếp cực giỏi và đáng kính ^^!, thé nhưng nhập số liệu 1 hồi hoa mắt nhức đầu -> stress.... khùng luôn.
  • 0

#8 hypepol

hypepol

    biết zoom

  • Members
  • Pip
  • 15 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 19 July 2012 - 12:35 PM


Đề bài này hay ghê đó.

Mỗi trang e làm thử trong 50 phút thì xong.
Tổng cộng 26 trang = 21h30' ~3 ngày thì xong hết.
Các block trong file này xả ra mất số liệu ko xài được. Để nguyên vậy export lun sang *.xls.
E post thử trang 1 để pác hypepol kiểm giúp e xem đạt tiêu chuẩn chưa nhé:

http://www.cadviet.c...3/110802_01.rar

bạn nhập từng số một à? thanks bạn nhé, thật làm phiền quá, mình nhập từ hôm qua tới giờ cũng gần xong rồi. thanks
  • 0

#9 sgcq

sgcq

    Hội Hai Lúa

  • Members
  • PipPipPipPipPipPipPip
  • 1880 Bài viết
Điểm đánh giá: 692 (tốt)

Đã gửi 19 July 2012 - 01:45 PM

bạn nhập từng số một à? thanks bạn nhé, thật làm phiền quá, mình nhập từ hôm qua tới giờ cũng gần xong rồi. thanks


Hihi.
Nếu nhập từng số một thì mình ko post lên đây làm gì. Toàn lệnh cad thui. Cách đánh số thứ tự trong bảng thống kê đó làm hao công tốn sức. Nếu đổi được cách đánh số thứ tự thì chỉ mất 10 phút là xong tất cả. Mình mất 1h tìm ko ra cách đổi số thứ tự cho nhanh thui.
:D
  • 0

12728974_230210507314169_718723558582070 HỘI HAI LÚA

           fanpage: https://www.facebook.com/HoiHaiLua/

 

 

 

 

 

 


#10 hypepol

hypepol

    biết zoom

  • Members
  • Pip
  • 15 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 19 July 2012 - 03:41 PM


Hihi.
Nếu nhập từng số một thì mình ko post lên đây làm gì. Toàn lệnh cad thui. Cách đánh số thứ tự trong bảng thống kê đó làm hao công tốn sức. Nếu đổi được cách đánh số thứ tự thì chỉ mất 10 phút là xong tất cả. Mình mất 1h tìm ko ra cách đổi số thứ tự cho nhanh thui.
:D

Mình làm gần xong rồi, nhưng nếu biết cách chuyển thì nhanh hơn, bạn chỉ cho mình đi, để học hỏi cho lần sau nữa.
  • 0

#11 sgcq

sgcq

    Hội Hai Lúa

  • Members
  • PipPipPipPipPipPipPip
  • 1880 Bài viết
Điểm đánh giá: 692 (tốt)

Đã gửi 19 July 2012 - 04:52 PM

Mình làm gần xong rồi, nhưng nếu biết cách chuyển thì nhanh hơn, bạn chỉ cho mình đi, để học hỏi cho lần sau nữa.


Chức năng DATA EXTRACTION của autocad. làm được đó bạn. Nhưng chức năng này sort kém lắm. Cần phải có 1 tham chiếu đính kèm vô block thì mới làm nhanh được.
VD: - thay vì cột C1-1 được đánh số thứ tự 1,2,3,...,18 thì đánh là C1-1-1,C1-1-2,C1-1-3,....,C1-1-18.
- Đảm bảo sao cho mỗi dòng trong cad là khác nhau để bảng trong cad & bảng trong excel là giống nhau (Dễ kiểm)
- Tương tự với các cột còn lại.
- Tuy nhiên, nếu ko cần độ chính xác cao thì bạn có thể dùng file bên dưới, bản này ko quan tâm vị trí các hàng. Tổng cộng 4503 dòng.
Nhưng mình bó tay ko đổi số TT cho các bảng đó được. Còn ngồi gõ từng số thứ tự rồi mới xài DATA EXTRACTION thì e rằng nhập tay bên excel nhanh hơn, vì có rất nhiều cấu kiện gần giống nhau, chỉ cần chép, dán sửa.
:D

http://www.cadviet.c...802_tksfull.rar
  • 1

12728974_230210507314169_718723558582070 HỘI HAI LÚA

           fanpage: https://www.facebook.com/HoiHaiLua/

 

 

 

 

 

 


#12 phamthanhbinh

phamthanhbinh

    biết lệnh adcenter

  • Moderator
  • PipPipPipPipPipPipPip
  • 6009 Bài viết
Điểm đánh giá: 3113 (tuyệt vời)

Đã gửi 19 July 2012 - 09:19 PM

Mình làm gần xong rồi, nhưng nếu biết cách chuyển thì nhanh hơn, bạn chỉ cho mình đi, để học hỏi cho lần sau nữa.

Mình làm gần xong rồi, nhưng nếu biết cách chuyển thì nhanh hơn, bạn chỉ cho mình đi, để học hỏi cho lần sau nữa.

Hề hề hề,
Sau một hồi ngọ nguậy thì ra được cái lisp này. Hy vọng nó sẽ giúp được bạn. Tuy nhiên vì mình chưa có thời gian check toàn bộ bản vẽ bạn gửi nên bạn chịu khó test thử, có gì chưa ổn thì post lên. Trước mắt thì thấy rằng các block trong bản vẽ của bạn không phải là hoàn toàn giống nhau nên có thể sẽ có tí lộn xộn. Rất mong bạn test và chỉ cho biết chỗ chưa ổn để mình sửa lại.
Lưu ý bạn rằng bản kết quả trong excel sẽ không có các dòng tiêu đề nên bạn hãy tự bổ sung cho nó phù hợp nhé. Và mình cũng chưa khử biến. Vậy nên khi dùng cần tránh bị xung đột biến với các lisp khác.

(defun c:at2xls (/ )
(vl-load-com)
(setq fname (getfiled "Select a File" (getvar "dwgname") "xls" 1)
f (open fname "a") )
(alert "\n Chon vung chua attribute blocks can xuat gia tri")
(setq bls (acet-ss-to-list (ssget (list (cons 0 "insert") (cons 66 1) (cons 2 "tkt*")))))
(foreach bl bls
(setq a (entnext bl)
tls " \t" )
(while (/= (cdr (assoc 0 (entget a))) "SEQEND")
(setq tls (strcat tls (cdr (assoc 1 (entget a))) "\t")
a (entnext a)
)
)
(write-line tls f )
)
(close f)
(princ)
)


Chúc bạn vui.

  • 2
Chúc các quý Anh trên diễn đàn luôn khỏe, đẻ thêm được nhiều thứ để mót.

#13 hypepol

hypepol

    biết zoom

  • Members
  • Pip
  • 15 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 19 July 2012 - 11:15 PM

Thanks tất cã các bác đã ủng hộ ^^! hi hi, tình hình là mình đã xử lí xong hết công việc 1 cách mỏi mệt ( mất 2 ngày chú không tới 3 ^^!)
và cách của mình làm là :
1_dùng cad 2012 phá hết ra, dùng expresstool ->explode attributes
2_dùng phần mềm *** 2012 Professional, trích xuất ra file excel
3_file excel được trích ra đúng số nhưng xấu lắm, nên phải chỉnh sửa lại cho đẹp.
thanks
  • 0