Tự động lấy dữ liệu từ file này sang file khác (1 người xem)

  • Thread starter Thread starter kulyvn
  • Ngày gửi Ngày gửi

Người dùng đang xem chủ đề này

kulyvn

Thành viên thường trực
Tham gia
3/8/11
Bài viết
283
Được thích
4
Mình muốn hỏi làm sao để lấy tự động tất cả dữ liệu từ Ạ6:G9 ở file VIDU (mình đã gửi kèm theo) sang file VIDU1, nếu file VIDU có dữ liệu mới thì ở file VIDU1 cũng sẽ tự động cập nhật theo.
 

File đính kèm

Mình muốn hỏi làm sao để lấy tự động tất cả dữ liệu từ Ạ6:G9 ở file VIDU (mình đã gửi kèm theo) sang file VIDU1, nếu file VIDU có dữ liệu mới thì ở file VIDU1 cũng sẽ tự động cập nhật theo.
Câu 1 : lấy tất cả dữ liệu từ A6:G9 tham khảo code sau :
[GPECODE=vb]
Sub HLMT()
Dim cnn As Object, rst As Object
Dim SQL$
Set cnn = CreateObject("ADODB.connection")
Set rst = CreateObject("ADODB.recordset")
With cnn
.ConnectionString = "Provider=Microsoft.JET.OLEDB.4.0;" & _
"Data source=" & ThisWorkbook.Path & "\VIDU.xls" & _
";Extended properties=""Excel 8.0;HDR=N0;IMEX=1;"";"
.Open
End With
SQL = "SELECT * FROM [A5:G1000]"
rst.Open SQL, cnn, 3, 1, 1
[A6].CopyFromRecordset rst
rst.Close: Set rst = Nothing
cnn.Close: Set cnn = Nothing
End Sub
[/GPECODE]

Câu 2: ..................()
 
Mình còn gà lắm.bạn hướng dẫn cụ thể từng bước thế nào được không? chứ bạn nói như thế này thì mình chịu thua rồi.
 
a có thể đặt công thức ở file VIDU1 giúp e luôn được không? hix
 
Mình muốn hỏi làm sao để lấy tự động tất cả dữ liệu từ Ạ6:G9 ở file VIDU (mình đã gửi kèm theo) sang file VIDU1, nếu file VIDU có dữ liệu mới thì ở file VIDU1 cũng sẽ tự động cập nhật theo.

Tại file VIDU1, gõ công thức này vào cell A6:
Mã:
='[VIDU.xls]SỔ THỤ LÝ'!A6
Kéo fill sang phải và xuống dưới
Đơn giản vây thôi
 
Ở cột số thứ tự và ngày tháng năm dù bên file gốc không có dữ liệu nhưng nó vẫn tự động nhảy số thứ tự và ngày tháng năm thì nó tự động điền là 00/01/1900. Làm sao để khắc phục lỗi này và để nó là trống nếu không có dữ liệu vậy>
 
Ở cột số thứ tự và ngày tháng năm dù bên file gốc không có dữ liệu nhưng nó vẫn tự động nhảy số thứ tự và ngày tháng năm thì nó tự động điền là 00/01/1900. Làm sao để khắc phục lỗi này và để nó là trống nếu không có dữ liệu vậy>
Bạn hỏi ai trong số 2 người trả lời cho bạn? Phải biết hỏi ai thì mới biết bạn muốn giúp theo "kiểu" của người nào chớ.
Bạn nên tập bấm vào nút <trả lời với trích dẫn> dưới bài của người bạn muốn hỏi tiếp hay muốn trả lời bài viết của người đó, như vậy rõ ràng hơn và không làm người khác "bị ức chế".
 
Tại file VIDU1, gõ công thức này vào cell A6:
Mã:
='[VIDU.xls]SỔ THỤ LÝ'!A6
Kéo fill sang phải và xuống dưới
Đơn giản vây thôi
Ở cột số thứ tự và ngày tháng năm dù bên file gốc không có dữ liệu nhưng nó vẫn tự động nhảy số thứ tự và ngày tháng năm thì nó tự động điền là 00/01/1900. Làm sao để khắc phục lỗi này và để nó là trống nếu không có dữ liệu vậy>
 
DO cột đó bạn định dạng kiểu dd/mm/yyyy nên nó sẽ ra kiểu ngày tháng năm là đúng, bạn định dạng lại là được. Không có dữ liệu hàm sẽ cho ra số 0, số 0 khi định dạng ngày tháng năm sẽ ra số 00/01/1900.
 
nói thế khi có dữ liệu thì format lại để nó hiển thị ngày tháng hả bạn>
 
nói thế khi có dữ liệu thì format lại để nó hiển thị ngày tháng hả bạn>

Thì cột STT của bạn là cột số mà, định dạng nó về dạng số cho tương ứng với kiểu dữ liệu của bạn chứ ai lại định dạng về dạng ngày tháng nữa.
 
nói thế khi có dữ liệu thì format lại để nó hiển thị ngày tháng hả bạn>
Thôi thì thêm vào công thức của bạn ndu... như vầy thử xem:
A6=IF('[VIDU.xls]SỔ THỤ LÝ'!A6="";"";'[VIDU.xls]SỔ THỤ LÝ'!A6)
Nó là ô trống khi không có dữ liệu, tính sao thì tính.
 
cột ngày tháng thì đã được nhưng cột số thự tự nó vẫn nhảy.
 
nói thế khi có dữ liệu thì format lại để nó hiển thị ngày tháng hả bạn>

CÓ PHẢI THẾ NÀY: TẠI Ô F6=IF('[VIDU.xls]SỔ THỤ LÝ'!$D6<>0,'[VIDU.xls]SỔ THỤ LÝ'!$D6,"")
riêng cột TT thì bạn nên định dạng kiểu Number thế phải ko ah
 
Lần chỉnh sửa cuối:

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

Back
Top Bottom