Code VBA copy dữ liệu

Liên hệ QC
Tôi tuân thủ nội quy khi đăng bài

VU.NGO

Thành viên mới
Tham gia
1/5/23
Bài viết
22
Được thích
3
Em chào mọi người! (do chưa nhận được 1 câu trả lời nào lên em xin phép đăng lại)
Em có 2 file excel:
* 1 file tên "NTP_Data" ở đường dẫn : D:\Data\ ( đây là file nằm trên ổ chung, mọi người trong công ty đều có thể chỉnh sửa)
* 1 file tên "NTP_Copy" ở đường dẫn : E:\Save\ ( đây là file nằm trên máy tính cá nhân của em- em chỉnh sửa riêng)
Em nhờ các anh chị viết giúp code vba để COPY dữ liệu, code này nằm trong sự kiện mở file Workbook_Open của file thứ 2 ("NTP_Copy"). để mỗi khi mở file excel thứ 2 này(NTP_Copy) thì code vba sẽ tự động copy phần dữ liệu đã được nhập thêm ở trong file excel thứ nhất (NTP_Data) (lưu ý dữ liệu bao gồm cả văn bản và hình ảnh)
Em mong muốn chỉ copy phần dữ liệu được nhập mới vào thôi ạ, vì phần dữ liệu cũ sẽ được chỉnh sửa.
(Nếu code dựa được vào thời gian lưu file dữ liệu --> Sau đó copy tthì tốt, nếu không được chắc phải dựa vào tham số "ngày" ở trong cột B của dữ liệu)
Em cảm ơn cả nhà ạ !!!!!
1683890783549.png
 

File đính kèm

  • NTP_Copy.xlsx
    1.5 MB · Đọc: 7
  • NTP_DATA.xlsx
    2.5 MB · Đọc: 9
Mà thôi, cái này đa trường hợp, không tính được hết bác nhỉ! thế là bác giúp em nhiều lắm rồi ạ, bác vất vả nhiều rồi ạ, cảm ơn bác.
 
Upvote 0
Mà thôi, cái này đa trường hợp, không tính được hết bác nhỉ! thế là bác giúp em nhiều lắm rồi ạ, bác vất vả nhiều rồi ạ, cảm ơn bác.
Tôi sẽ làm luôn chuyện xoá, đâu có khó gì. Thêm 2 dòng lệnh nữa chứ mấy.
 
Upvote 0
Xóa có khi xóa ở giữa bản, có khi xóa ở cuối cùng bảng dữ liệu ạ
Ồ, thế thì lại phải quay lại từ đầu, câu chuyện khoá chính của database. Theo đó code không chạy nhanh như hiện nay vì phải dò đồng bộ giữa 2 database.
 
Upvote 0
Vậy đây chắc là đáp án cuối cùng :)
Chương trình của bác e chạy cho công việc từ bữa đó đến nay, giúp ích cho công việc của em rất nhiều, em cảm ơn! Bác có thời gian xem hộ em: mỗi lần mở file phần chữ thì copy đúng dòng không có vấn đề gì, tuy nhiên khi copy phần ảnh thì ảnh luôn bị "chảy xuống", không đúng với kích thước ban đầu (xem ảnh). Bác xem giúp có chỉnh được không ,1686892718062.png
 

File đính kèm

  • NTP_Copy.xlsm
    4.4 MB · Đọc: 6
Upvote 0
Chương trình của bác e chạy cho công việc từ bữa đó đến nay, giúp ích cho công việc của em rất nhiều, em cảm ơn! Bác có thời gian xem hộ em: mỗi lần mở file phần chữ thì copy đúng dòng không có vấn đề gì, tuy nhiên khi copy phần ảnh thì ảnh luôn bị "chảy xuống", không đúng với kích thước ban đầu (xem ảnh). Bác xem giúp có chỉnh được không ,
Bạn gửi lại 2 file với dữ liệu trước khi code chạy gây ra tình trạng trên. Tôi chạy thì mới biết được tại sao bị lỗi rồi từ đó mới có cách giải quyết.

Tôi thử xóa 1 đoạn dữ liệu dài rồi chạy code mà không thấy lỗi gì
 
Lần chỉnh sửa cuối:
Upvote 0
Tôi đã sửa code để copy hình ảnh riêng sau khi đã copy chữ. Bạn thử chạy file này xem.
 

File đính kèm

  • NTP_Copy2_VU.NGO.xlsm
    321.2 KB · Đọc: 13
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom