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:

• Hiện Msgbox khi mo Acess
• Xin giúp em về listview
• [hỏi] cập nhập dữ liệu trên sub form
• tìm kiếm trong ComboBox trên chứng từ phiếu chi
• Giúp em tồn kho với cả nhà ơi!
• lấy dữ liệu thỏa mãn 2 điều kiện
• Thêm dòng trắng cho Report đẹp hơn
• Form tự đóng sau 5s ( tuỳ ý )
• Cần Giúp đỡ về giải thuật Tính Toán " Giá Trị Hàng Tồn Kho "
• Cần mấy pro giúp đở gắp

[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ở