Update dữ liệu tự động

[Sóc trăng miền nhớ]

Chào các bạn,

Hiện tại mình có 2 file Excel (master) và (1)
- File master là dữ liệu mình cần lấy hằng giờ, lấy từ file (1)
- Giờ mình muốn lấy tự động, kết quả mong muốn như file đính kèm

Note: mình lấy theo cột Lot, vì dữ liệu cột này không bao giờ trùng
khi có lot mới thì chỉ cần ấn nút lệnh Update là copy dữ liệu file (1) pass nối tiếp vào file master

rất mong nhận được sự giúp đở
xin cảm ơn

 

[thnghiachau]

Chào các bạn,

Hiện tại mình có 2 file Excel (master) và (1)
- File master là dữ liệu mình cần lấy hằng giờ, lấy từ file (1)
- Giờ mình muốn lấy tự động, kết quả mong muốn như file đính kèm

Note: mình lấy theo cột Lot, vì dữ liệu cột này không bao giờ trùng
khi có lot mới thì chỉ cần ấn nút lệnh Update là copy dữ liệu file (1) pass nối tiếp vào file master

rất mong nhận được sự giúp đở
xin cảm ơn

trước hết hãy trả lời cho mình biết là "làm sao biết cái nào dữ liệu là mới và cần copy trong dữ liệu File(1)?"

 

[Sóc trăng miền nhớ]

trước hết hãy trả lời cho mình biết là "làm sao biết cái nào dữ liệu là mới và cần copy trong dữ liệu File(1)?"

Thường thì mình lấy số cuối cùng cột Lot file (master) sau đó tìm kiếm lot đó bên file (1) rồi mình coppy cac dòng phía dưới
Note: cột Time là thời gian theo số lot bên cột Lot

 

[thnghiachau]

Thường thì mình lấy số cuối cùng cột Lot file (master) sau đó tìm kiếm lot đó bên file (1) rồi mình coppy cac dòng phía dưới
Note: cột Time là thời gian theo số lot bên cột Lot

cho vd thì copy cả đống mà??? còn cái dzụ "sau đó tìm kiếm lot đó bên file (1)" ??? là sao nữa vậy?

 

[Sóc trăng miền nhớ]

cho vd thì copy cả đống mà??? còn cái dzụ "sau đó tìm kiếm lot đó bên file (1)" ??? là sao nữa vậy?

Hihi tại mình làm bằng tay mình có xóa các cột không lấy bên file (1).
mục đích là coppy phần tô vàng dựa vào số cuối cùng cột lot fle master.
lấy lot cuối cùng file master tìm bên file (1), nếu không có dữ liệu mới không update, nếu có thì coppy phần tô vàng sang file master

 

[thnghiachau]

Hihi tại mình làm bằng tay mình có xóa các cột không lấy bên file (1).
mục đích là coppy phần tô vàng dựa vào số cuối cùng cột lot fle master.
lấy lot cuối cùng file master tìm bên file (1), nếu không có dữ liệu mới không update, nếu có thì coppy phần tô vàng sang file master

potay... không hiểu bạn nói gì luôn ah?
"dựa vào số cuối cùng" là số nào?
"lấy lot cuối cùng" tức là lấy hàng cuối cùng của file (1) ? thế thì ví dụ lại copy nhiều hàng là sao?
hổng hiểu... hổng hiểu....

 

[Sóc trăng miền nhớ]

potay... không hiểu bạn nói gì luôn ah?
"dựa vào số cuối cùng" là số nào?
"lấy lot cuối cùng" tức là lấy hàng cuối cùng của file (1) ? thế thì ví dụ lại copy nhiều hàng là sao?
hổng hiểu... hổng hiểu....

tóm lại coppy phần màu vàng về file master hihi

 

[thnghiachau]

tóm lại coppy phần màu vàng về file master hihi

nếu vậy thì bạn làm bằng tay chứ code làm gì????

Cái bạn hỏi mà bạn không hiểu thì ai mà biết dc???

bạn viết: "File master là dữ liệu mình cần lấy hằng giờ, lấy từ file (1)" => như thế thì bạn phải biết cái nào là mới để copy vào file Master

 

[Maika8008]

nếu vậy thì bạn làm bằng tay chứ code làm gì????

Cái bạn hỏi mà bạn không hiểu thì ai mà biết dc???

bạn viết: "File master là dữ liệu mình cần lấy hằng giờ, lấy từ file (1)" => như thế thì bạn phải biết cái nào là mới để copy vào file Master

Nhìn chung, mấy anh mới mới thường biết mình muốn gì nhưng lại vất vả trong việc giải thích mình muốn gì.

 

[snow25]

Chào các bạn,

Hiện tại mình có 2 file Excel (master) và (1)
- File master là dữ liệu mình cần lấy hằng giờ, lấy từ file (1)
- Giờ mình muốn lấy tự động, kết quả mong muốn như file đính kèm

Note: mình lấy theo cột Lot, vì dữ liệu cột này không bao giờ trùng
khi có lot mới thì chỉ cần ấn nút lệnh Update là copy dữ liệu file (1) pass nối tiếp vào file master

rất mong nhận được sự giúp đở
xin cảm ơn

Bạn cho vào chung 1 ford rồi chạy code nhé.

Sub laydulieu()
    Dim cn As Object, rst As Object, Pro As String, Ext As String, Name As String, Sql
    Set cn = CreateObject("ADODB.connection")
    Set rst = CreateObject("ADODB.recordset")
     Pro = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source="
     Ext = ";Extended Properties=""Excel 12.0;HDR=No;IMEX= 1"";"
     Name = ThisWorkbook.Path & "\Update du lieu (1).xlsx"
     cn.Open (Pro & Name & Ext)
     Sql = "select F1,F2,F3,F4,F14,F15,F16,F23,F24,F25,F26,F27,F28 From [Sheet1$A3:AB10000] "
     rst.Open Sql, cn
     Sheet1.Range("A3").CopyFromRecordset rst
     rst.Close
    cn.Close
End Sub

 

[thnghiachau]

Hihi tại mình làm bằng tay mình có xóa các cột không lấy bên file (1).
mục đích là coppy phần tô vàng dựa vào số cuối cùng cột lot fle master.
lấy lot cuối cùng file master tìm bên file (1), nếu không có dữ liệu mới không update, nếu có thì coppy phần tô vàng sang file master

OK, nay mình làm theo cái mình suy nghĩ ... hy vong là đúng ý của bạn nhá!!!
Mình sẽ làm theo các bước sau:
1/ lấy "lot" cuối cùng trong file Master
2/ chọn file để lấy data copy vào file Master -> gọi là file Data
3/ tìm ROW trong file mới mở (File Data) có "Lot" giống với "Lot" cuối cùng trong file Master thì sẽ copy toàn bộ các dòng dưới ROW này vào dòng kế tiếp cuối cùng của file Master.

Xem file đính kèm nha.

Bài đã được tự động gộp: 17/7/20

Bạn cho vào chung 1 ford rồi chạy code nhé.

Sub laydulieu()
    Dim cn As Object, rst As Object, Pro As String, Ext As String, Name As String, Sql
    Set cn = CreateObject("ADODB.connection")
    Set rst = CreateObject("ADODB.recordset")
     Pro = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source="
     Ext = ";Extended Properties=""Excel 12.0;HDR=No;IMEX= 1"";"
     Name = ThisWorkbook.Path & "\Update du lieu (1).xlsx"
     cn.Open (Pro & Name & Ext)
     Sql = "select F1,F2,F3,F4,F14,F15,F16,F23,F24,F25,F26,F27,F28 From [Sheet1$A3:AB10000] "
     rst.Open Sql, cn
     Sheet1.Range("A3").CopyFromRecordset rst
     rst.Close
    cn.Close
End Sub

Bạn làm là đúng chuẩn... màu vàng vào màu vàng như bạn @Sóc trăng miền nhớ yêu cầu luôn đó nha!!!!

 

[Sóc trăng miền nhớ]

OK, nay mình làm theo cái mình suy nghĩ ... hy vong là đúng ý của bạn nhá!!!
Mình sẽ làm theo các bước sau:
1/ lấy "lot" cuối cùng trong file Master
2/ chọn file để lấy data copy vào file Master -> gọi là file Data
3/ tìm ROW trong file mới mở (File Data) có "Lot" giống với "Lot" cuối cùng trong file Master thì sẽ copy toàn bộ các dòng dưới ROW này vào dòng kế tiếp cuối cùng của file Master.

Xem file đính kèm nha.

Bài đã được tự động gộp: 17/7/20

Bạn làm là đúng chuẩn... màu vàng vào màu vàng như bạn @Sóc trăng miền nhớ yêu cầu luôn đó nha!!!!

Cám ơn bạn nhiều đúng như ý mình cần rồi. mà mình còn muốn cải tiến thêm tý
1. mình có 1 Data Validation để chọn 1 hay nhiều cat mình muốn lấy (Cat là viết tắt của danh sách lỗi: cat4, cat7...)
2. Vậy thì sau khi nhấn nút update nó chỉ coppy các cột dữ liệu của các cat mà mình chọn
Note: đây là ví dụ thôi vì công ty minh có gần 200 hạng mục lỗi mỗi lần coppy lâu hihi
xin cảm ơn

 

[Maika8008]

Cám ơn bạn nhiều đúng như ý mình cần rồi. mà mình còn muốn cải tiến thêm tý
1. mình có 1 Data Validation để chọn 1 hay nhiều cat mình muốn lấy (Cat là viết tắt của danh sách lỗi: cat4, cat7...)
2. Vậy thì sau khi nhấn nút update nó chỉ coppy các cột dữ liệu của các cat mà mình chọn
Note: đây là ví dụ thôi vì công ty minh có gần 200 hạng mục lỗi mỗi lần coppy lâu hihi
xin cảm ơn

Thớt đi công tác hơi dài ngày nhỉ!

 

[thnghiachau]

Cám ơn bạn nhiều đúng như ý mình cần rồi. mà mình còn muốn cải tiến thêm tý
1. mình có 1 Data Validation để chọn 1 hay nhiều cat mình muốn lấy (Cat là viết tắt của danh sách lỗi: cat4, cat7...)
2. Vậy thì sau khi nhấn nút update nó chỉ coppy các cột dữ liệu của các cat mà mình chọn
Note: đây là ví dụ thôi vì công ty minh có gần 200 hạng mục lỗi mỗi lần coppy lâu hihi
xin cảm ơn

Tôi thấy dữ liệu của bạn có gì không ổn rùi...
bạn nói dữ liệu của công ty gồm hơn 200 hạng mục ah? vậy nó "dàn hàng ngang" như vậy hết ah?
Như thế để copy qua file Master thì làm sao biết nó nhầm vào cột nào vì trong file master chưa chắc có hết 200 hạng mục của bạn???
Bạn coi lại cái này đi nha, không thì khi tôi làm code cho bạn xong bạn lại thay đổi thì khổ thân cho người làm dùm này lắm ah....
vì tôi không có file data thực sự của bạn nên tôi không biết phải cho ý kiến bạn như thế nào!!!!
bạn có thể đưa file lên và cái thật sự bạn muốn lấy dữ liệu ra như thế nào? mình phải nghĩ cái tổng quát để làm chứ mà cứ đụng đâu làm đó thì bạn cứ phải làm hoài tốn công sức mà không khoa học chút nào....và vất vả cho người nghĩ dùm bạn hoài nữa ah...