Nhập dữ liệu từ 2 file khác nhau vào 1 file tổng hợp (1 người xem)

[gau2603]

Mình có 2 file dữ liệu được update hàng ngày nằm trên 2 máy khác nhau và có cùng mạng LAN:
- File A nằm ở máy A
- File B nằm ở máy B
- File tổng hợp nằm ở máy C và có 2 sheet là sheet A và sheet B (file này luôn ở tình trạng đóng)
Mình muốn tạo code để cuối ngày chỉ cần nhấn button là dữ liệu của cả hai file sẽ được cập nhật vào file tổng hợp. Lúc trước mình nhớ đã có một chủ đề tương tự như vầy, nhưng lúc đó mình lại không bookmark lại nên mạo muội lập topic xin code các bạn vậy. Mong nhận được sự giúp đỡ của các bạn, mình xin cảm ơn!!!

 

[hung_xu20032000]

bạn thử dùng a-tool di. Chac la bai toan cua ban ok luon

 

[Quang_Hải]

Mình có 2 file dữ liệu được update hàng ngày nằm trên 2 máy khác nhau và có cùng mạng LAN:
- File A nằm ở máy A
- File B nằm ở máy B
- File tổng hợp nằm ở máy C và có 2 sheet là sheet A và sheet B (file này luôn ở tình trạng đóng)
Mình muốn tạo code để cuối ngày chỉ cần nhấn button là dữ liệu của cả hai file sẽ được cập nhật vào file tổng hợp. Lúc trước mình nhớ đã có một chủ đề tương tự như vầy, nhưng lúc đó mình lại không bookmark lại nên mạo muội lập topic xin code các bạn vậy. Mong nhận được sự giúp đỡ của các bạn, mình xin cảm ơn!!!

Lẽ ra bạn nên lập luận thế này sẽ dễ hình dung cách xử lý hơn nè
Bạn có 3 thư mục A, B và C và yêu cầu giống như bạn đã nêu bên trên. Tuy nhiên không có file thì biết đường nào mà viết code???

 

[gau2603]

Lẽ ra bạn nên lập luận thế này sẽ dễ hình dung cách xử lý hơn nè
Bạn có 3 thư mục A, B và C và yêu cầu giống như bạn đã nêu bên trên. Tuy nhiên không có file thì biết đường nào mà viết code???

Hi bạn, file bạn cứ mặc định là ô A1 của file A sẽ được nhập vào ô A1 của file tổng hợp vậy.
Mình thấy thư mục A B C thì dùng code source nhưng cái mình cần là từ 2 máy kết nối mạng LAN với nhau, vậy có giống nhau không vậy? Mình vẫn đang gà VBA lắm hjx.

 

[gau2603]

bạn thử dùng a-tool di. Chac la bai toan cua ban ok luon

Thank bạn, mình sẽ tìm hiểu thử ^_^

 

[Quang_Hải]

Hi bạn, file bạn cứ mặc định là ô A1 của file A sẽ được nhập vào ô A1 của file tổng hợp vậy.
Mình thấy thư mục A B C thì dùng code source nhưng cái mình cần là từ 2 máy kết nối mạng LAN với nhau, vậy có giống nhau không vậy? Mình vẫn đang gà VBA lắm hjx.

Chỉ cần chỉ ra đường dẫn thì code sẽ tự động tìm đến nơi và mở file ra xử lý xong rồi đóng file lại. Nhưng dám chắc với bạn là không ai muốn viết code mà không có file vì viết rồi cũng phải sửa tùm lum

 

[gau2603]

Chỉ cần chỉ ra đường dẫn thì code sẽ tự động tìm đến nơi và mở file ra xử lý xong rồi đóng file lại. Nhưng dám chắc với bạn là không ai muốn viết code mà không có file vì viết rồi cũng phải sửa tùm lum

Hì, tại mình cũng muốn thực hành một ít nên định xin code rùi về tự mò các phần còn lại, khi nào bí thì lại cầu cứu tiếp. Chứ nếu đưa cả file lên rồi dùng thì sau này sẽ không tiếp thu được gì cả

 

[Quang_Hải]

Hì, tại mình cũng muốn thực hành một ít nên định xin code rùi về tự mò các phần còn lại, khi nào bí thì lại cầu cứu tiếp. Chứ nếu đưa cả file lên rồi dùng thì sau này sẽ không tiếp thu được gì cả

Đại loại thế này. Không trả lời nữa nhé. Trúng thì tốt, không trúng ráng chịu vì cái tội không chịu đưa file lên. Giờ có gởi file lên cũng quá muộn rồi.

Sub test()
Dim sh As Worksheet
Set sh = Sheets("A") 'ten sheet A cua file A
Workbooks.Open duongdandentenfile 'duong dan den file C
With ActiveWorkbook 'lam viec voi file C
   With .Sheets("A") 'sheet A cua file C
      sh.Cells.Copy .[A1] 'copy tat ca du lieu cua sheet A tren file A dan vao A1 cua sheet A file C
   End With
   .Close True 'Dong file C va save lai
End With
End Sub