Các viết lệnh trong AC

[chieuthubay]

Xin chào các ban !

Các bạn có cách làm nào mở 1 file excel từ form của access không, hướng dẫn cho minh với, mình cảm ơn lắm lắm, chi tiết dùm nhe.

--------------------------
12-06-2009
Phúc

View more random threads:

• Hỏi xuất dữ liệu Access sang Excel để in!
• Lựa chọn và mặc định máy in trên access
• Giúp mua sách của tác giả Ông Văn Thông
• Liên kết hai Combo boxes với Subform
• Setup khổ giấy máy in kim
• [Tip] Code hiển thị thông tin File
• Lập trình bảo mật cơ sở dữ liệu Access
• Sử dụng hàm Dlookup tra Đơn giá từ bảng
• Giup Với Các Bác Ơi!!!
• Xin các bác giúp đỡ về phần In ạ

[hangngand]

Ðề: Các viết lệnh trong AC

[COLOR=#000000]
Sub MoExcel[/COLOR][COLOR=#007700]()    [/COLOR][COLOR=#0000BB]Dim fileEx [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]String    fileEx [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]CurrentProject[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Path [/COLOR][COLOR=#007700]& [/COLOR][COLOR=#DD0000]"\" & Me.TextBox1 & "[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]xls[/COLOR][COLOR=#DD0000]"        If (Dir(fileEx) <> "") Then        Shell "[/COLOR][COLOR=#0000BB]Excel[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]exe [/COLOR][COLOR=#DD0000]" & """" & fileEx & """", vbMaximizedFocus    Else        MsgBox "[/COLOR][COLOR=#0000BB]File [/COLOR][COLOR=#DD0000]" & fileEx & " [/COLOR][COLOR=#0000BB]khong ton tai[/COLOR][COLOR=#DD0000]",,"[/COLOR][COLOR=#0000BB]Thong Bao[/COLOR][COLOR=#DD0000]"    End IfEnd Sub[/COLOR] 

Trong Form có một TextBox1 chứa file Excel cần mở