Tạo Liên Kết Trong From Excel 2007 (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

nhờ anh chị giúp đỡ gấp
- trong file đính kèm của bạn không thấy yêu cầu cụ thể như thế nào. File excel thì không có gì. file word thì có mỗi chữ (cộng hòa xã hội chủ nghĩa việt nam). mình không thấy có yêu cầu cụ thể nào. bạn vui lòng nói rõ hơn được không?
chúc vui
 
thanhks! nhưng còn nút liên kết để mở file word thi viết code như thế nào mong bạn giúp đở luôn
 
thanhks! nhưng còn nút liên kết để mở file word thi viết code như thế nào mong bạn giúp đở luôn

Trong cửa sổ VBE của file chứa Form, bạn vào Tools | References | tích chọn Microsoft Word xxx Office Library

Sau đó tùy biến lại đoạn mã sau để sử dụng

PHP:
Sub OpenWordDoc()
   Dim wdApp As Word.Application
   Dim wdDoc As Word.Document
   On Error Resume Next
   Set wdApp = GetObject(, "Word.Application")
   If Err.Number <> 0 Then 'Word isn't already running
       Set wdApp = CreateObject("Word.Application")
   End If
   On Error GoTo 0
   Set wdDoc = wdApp.Documents.Open("D:\AshCenterproposal.doc")
   wdApp.Visible = True
   wdDoc.Activate
   Set wdApp = Nothing
   Set wdDoc = Nothing
End Sub

Thanh Phong
 
mình đã hoàn thành xong bài tập của mình rồi, thanks ban nhiều nha!
 
Web KT

Bài viết mới nhất

Back
Top Bottom