Mong các bác giúp đỡ em làm công cụ báo cáo hàng ngày !!! (1 người xem)

[bipbo2008]

Mong các bác giúp đỡ em làm công cụ báo cáo hàng ngày !!!
Xin các bác giúp trường hợp của em như thế này có làm được trên excel không.
1. Cơ sở dữ liệu trên máy chủ (cập nhật một tháng một lần) theo bảng biểu đính kèm.
2. Hàng ngày bật máy trạm (mạng lan) lên là tự động chạy công cụ đó (trên excel) và truy xuất vào dữ liệu máy chủ.
3. khi truy xuất vào bảng tổng hợpđó nó sẽ báo trên file excel của máy trạm những giá trị cụ thể.

theo điều kiện thế này:

Sao kê các khách hàng có tài khoản đến hạn (Maturity Date) trong vòng 03 ngày kể từ ngày hiện tại.

lấycác trường trong CSDL sau:
Customer No; Customer Name; DP TypeName;CCY; Current Balance; Rate;Account Number; Opening Date; Maturity Date; Address; Month
Term' Birthday;Tel; Employee Name.

Các bác giúp em với! Cám ơn và hậu tạ

 

[nhapmon]

đạon code sau đây giúp ban tự mở file trên mạng lan khi bạm mở file này
file upload của bạn mở không được, nên không giúp được bạn

bạn hãy mở file BC.xls, mở cửa sổ VBA, nhấp vào workbook của bạn rồi chép đoạn cod enày vào.

Private Sub Workbook_Open()
With Application.FileDialog(msoFileDialogOpen)
.InitialFileName = "\\M04\qa-qc 2010" ' go ten duong dan vao day
.FilterIndex = 3
.Title = "Please Select a File"
.ButtonName = "Open"
.AllowMultiSelect = False
.Show
If .SelectedItems.count = 0 Then ' User clicked cancel
Exit Sub
End If

Set wb = Workbooks.Open(Filename:=.SelectedItems(1))
End With

End Sub