Chuyển đến nội dung
Diễn đàn CADViet
tuoichuot84

Tạo ngày trong bvẽ lấy theo ngày của máy tính?

Các bài được khuyến nghị

E lại có bài toán thế này mong muốn các đại gia giúp đỡ:

Khi vẽ thì trong khung tên bao giờ cũng có một ô ghi ngày tháng thay đổi nhưng đôi khi chúng ta có thể quên ko nhập ngày cho ô này. Vậy các bác có cách nào mà cái ô đó luôn lấy ngày trực tiếp trên máy tính (giống hàm Today() trong excel ý) để anh e chúng ta ko còn phải quan tâm đến ô này nữa cho đỡ khổ ko zậy?

Trông cậy hết vào các bác đấy!

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Nếu nó là Att block thì bạn nhấp đúp và/hoặc bấm chuột phải vào nó. Chọn Insert field để vào bảng Field. Sau đó tìm đến mục Date (trong mục Date & Time) và chọn định dạng thích hợp.

Nếu nó là Mtext thì bạn nhấp vào ký hiệu Insert field ở phía trên và làm tương tự

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
Nếu nó là Att block thì bạn nhấp đúp và/hoặc bấm chuột phải vào nó. Chọn Insert field để vào bảng Field. Sau đó tìm đến mục Date (trong mục Date & Time) và chọn định dạng thích hợp.

Nếu nó là Mtext thì bạn nhấp vào ký hiệu Insert field ở phía trên và làm tương tự

Ý e là phải giống hàm =today() của excel, nghĩa là bất kỳ lúc nào ta mở bvẽ đó thì nó tự động update ngày của win vào bản vẽ. E làm theo của bác nhưng khi e thay đổi ngày trên win thì nó vẫn không thay đổi.

Các bác xem có cách nào ko?

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
Ý e là phải giống hàm =today() của excel, nghĩa là bất kỳ lúc nào ta mở bvẽ đó thì nó tự động update ngày của win vào bản vẽ. E làm theo của bác nhưng khi e thay đổi ngày trên win thì nó vẫn không thay đổi.

Các bác xem có cách nào ko?

đánh lệnh RE sẽ thấy nó đổi ngay

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

;Dùng autolisp xem sao.

;Tạo 1 text với layer "Layer Thay Doi Ngay Hien Tai"

;Load đoạn lisp dưới khi đó tất cả các text có layer "Layer Thay Doi Ngay Hien Tai" sẽ thay đổi nội dung theo ngày tháng năm hiện tại.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(defun c:thayngay (/)

(setq dmy (rtos (getvar "CDATE") 2 0)) ; gán dmy theo năm tháng ngày vd 20081204

(setq y (substr dmy 1 4)) ; trích xuất năm 2008

(setq m (substr dmy 5 2)) ; trích xuất tháng 12

(setq d (substr dmy 7 2)) ; trích xuất ngày 04

(setq ngaythangnam (strcat d "/" m "/" y))

(setq chontextthay (ssget "X" '((0 . "TEXT") (8 . "Layer Thay Doi Ngay Hien Tai"))))

(setq i 0)

(repeat (sslength chontextthay)

(setq textold (assoc 1 (setq thaythe (entget (ssname chontextthay i)))))

(setq textnew (cons 1 ngaythangnam))

(setq thaythe (subst textnew textold thaythe))

(entmod thaythe)

(setq i (+ i 1))

)

(princ)

)

(c:thayngay)

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
E lại có bài toán thế này mong muốn các đại gia giúp đỡ:

Khi vẽ thì trong khung tên bao giờ cũng có một ô ghi ngày tháng thay đổi nhưng đôi khi chúng ta có thể quên ko nhập ngày cho ô này. Vậy các bác có cách nào mà cái ô đó luôn lấy ngày trực tiếp trên máy tính (giống hàm Today() trong excel ý) để anh e chúng ta ko còn phải quan tâm đến ô này nữa cho đỡ khổ ko zậy?

Trông cậy hết vào các bác đấy!

Cái này chỉ xuất bản vẽ gia giấy mới có được chứ

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
đánh lệnh RE sẽ thấy nó đổi ngay

E đánh rồi nhưng chẳng thấy nó thay đổi, kể cả e khởi động lại Cad cũng as kđộng lại win thì vẫn như xưa.

Cái Lips bác jì jì cho e app vào cũng ko chạy đc.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay

×