Giúp VBA MS.Word : Copy file đang mở (3 người xem)

[tedaynui]

Trong VBA, mình muốn dùng lệnh Copy File cho 1 file đang được mở thì không được.
Nhưng trong Excel ta có thể là được điều này bằng cách : trước khi dùng lệnh Copy File, ta chuyển file sang trạng thái ReadOnly. (ThisWorkbook.ChangeFileAccess xlReadOnly)

Thế nhưng trong MS.Word, mình tìm cú pháp của lệnh trên không ra. Hoặc dùng cách nào khác cũng được với mục đích Copy File đang mở
Nhờ các bạn giúp đỡ !

TDN

 

[levanduyet]

Chưa hiểu ý của Tedaynui lắm.
Có phải ý là:
Đang mở một tập tin MS Word, sau đó muốn copy một phần (hay tất cả) đưa vào một file khác?

Chắc chắn là làm được thôi. Có thể tham khảo các ví dụ trên diễn đàn. Còn muốn tự tham khảo thì link đây.

Have a nice day.

LVD

 

[tedaynui]

Dạ, đúng là em muốn copy toàn bộ nội dung văn bản. Em theo Link của Anh cũng như tìm trên diễn đàn thì gần như là Save As không à hoặc mở một tệp mới rồi copy-lưu lại. Như vậy, em thấy có vài bất tiện :
+ Tốc độ chậm (nếu như văn bản nhiều trang + nhiều Table...)
+ Khi Save As thì File "gốc" xem như đóng lại và file hiện hành là file mở (nhưng em muốn File gốc luôn mở)

Đồng thời, nếu có thể chuyển được trạng thái của file sang ReadOnly tức là cũng có thể là cho File Word có khả năng tự xoá.

Cám ơn Anh rất rất nhiều !
TDN

 

[tedaynui]

Xin lỗi anh vì đọc chưa hết nội dung của Link anh hướng dẫn.
Cám ơn anh, em đã tìm được câu lệnh ấy rồi.
WordBasic.CopyFileA FileName:=ThisDocument.FullName, Directory:="c:\Temp.doc"

TDN