• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Làm cách nào tự động copy file theo lịch định sẵn

Nơi trao đổi về VBA (Visual Basic for Application), lập trình cho ứng dụng Microsoft Office, AutoCAD...

Moderator: tungblt

Txgroup
Posts: 1
Joined: Fri 01/04/2011 10:53 am

Làm cách nào tự động copy file theo lịch định sẵn

Postby Txgroup » Fri 01/04/2011 10:57 am

Chào các Bạn !
- Tình hình là mình có thư mục DATA ở máy mạng có IP: 129.9.0.201, các file trong thư mục này được lưu với các tên có dạng yearmonthdayhourminutesecond ( vidu: 20110402102048) theo giờ máy tính.
- Có cách nào tự động copy file mới nhất về máy mình (IP 129.9.0.200) theo lịch định sẵn ( ví dụ cứ 17h hằng ngày là tự động copy).
- Dùng code VBA hoặc cách nào khác cũng được.
Nhờ các Pro hướng dẫn giúp, Cảm ơn nhiều!



User avatar
truongphu
VIP
VIP
Posts: 4766
Joined: Sun 04/11/2007 10:57 am
Location: Cam Đức, Khánh hòa
Has thanked: 14 times
Been thanked: 520 times

Re: Làm cách nào tự động copy file theo lịch định sẵn

Postby truongphu » Fri 01/04/2011 4:38 pm

Excel 2003 VBA:
Dùng hàm OnTime
1- Làm một macro (sub trong module) để lệnh thực thi công việc, vd sub aaa
2- Trong ThisWorkbook, sự kiện Workbook_Open, gọi sub aaa với hàm OnTime như sau
  1. Option Explicit
  2.  
  3. Private Sub Workbook_Open()
  4.     Application.OnTime TimeValue("17:00:00"), "aaa"
  5. End Sub


3- Đương nhiên công việc chỉ thi hành khi mở file Excel có macro trên sẵn
4-
Txgroup wrote:file mới nhất về máy mình

mới nhất là số lớn nhất của tên file; đọc và lựa các file trong VBA khá rắc rối
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh


Return to “Visual Basic for Application (VBA)”

Who is online

Users browsing this forum: No registered users and 6 guests