Tùy chọn
xin hướng dẫn viết code nhấn nút trên form sẽ mở cửa sổ Word ra để soạn thảo
- xin hướng dẫn viết code nhấn nút trên form sẽ mở cửa sổ Word ra để soạn thảo
-
xin hướng dẫn viết code nhấn nút trên form sẽ mở cửa sổ Word ra để soạn thảo
tigergirl > 11-08-12, 10:11 PM
chào các bạn,
Viết code như thế nào khi nhấn 1 nút trên form sẽ mở cửa sổ Word ra để soạn thảo ạh?
xin được giúp đỡ,
cám ơn nhiều -
RE: xin hướng dẫn viết code nhấn nút trên form sẽ mở cửa sổ Word ra để soạn thảo
kaiya92 > 12-08-12, 08:04 AM
(11-08-12, 10:11 PM)tigergirl Đã viết: chào các bạn,
Bạn có thể sử dụng một trong 2 cách sau để làm
Viết code như thế nào khi nhấn 1 nút trên form sẽ mở cửa sổ Word ra để soạn thảo ạh?
xin được giúp đỡ,
cám ơn nhiều
Cách 1: Cần phải tạo một file tên là FileIn.doc ở trong ổ C
Dim strDuongDan As String
Dim OpenWord As Object
strDuongDan = "C:\FileIn.doc"
If Dir(strDuongDan) = "" Then
MsgBox ("Khong tim thay tep Word can mo.")
Else
Set OpenWord = CreateObject("Word.Application")
OpenWord.Visible = True
OpenWord.Documents.Open FileName:="C:\FileIn.doc"
End If
Cách 2: Bạn chỉnh lại đường dẫn trong biến stAppName cho phù hợp với máy mình nhé
Dim stAppName As String
stAppName = "C:\Program Files (x86)\Microsoft Office\Office12\WINWORD.EXE"
Call Shell(stAppName, 1) -
RE: xin hướng dẫn viết code nhấn nút trên form sẽ mở cửa sổ Word ra để soạn thảo
tigergirl > 12-08-12, 09:53 AM
hihi, hay quá. Cám ơn bạn nhiều.