Dạ Chào Thầy!
Nhờ Thầy hướng dẫn giúp em. Khai báo biến tập hợp đối tượng nhiều sheet được không ah?
Em khai báo biến tập hợp đối tượng là các sheet mà nó báo sai. Nhờ Thầy xem giúp em với ah.
Cảm ơn Thầy.
Dạ Thầy!
Câu lệnh:
Sub copydulieu_LCB()
'Timdongcuoi cua sheetLCB
Dim dongcuoi As Long
dongcuoi = Sheets("TICHCUC-CHUYENCAN").Range("B" & Rows.Count).End(xlUp).Row
'Copy cong thuc xuong
Range("B3:E" & dongcuoi).FillDown
'Chi lay gia tri copy xoa cong thuc
Range("B4:E" & dongcuoi).Value = Range("B4:E" & dongcuoi).Value
Dim listdanhsach As Worksheets
Set listdanhsach = Worksheets(Array("TONG HOP", "HO TRO DUC DEM", "TANG CA")).Range("B2:E402")
Dim i As Worksheets
For Each i In listdanhsach
'Copy tu sheet LCB qua cac sheet khac
If i.Value = Sheets("TICHCUC-CHUYENCAN").Range("B4:E" & dongcuoi).Value Then
i.Value = Sheets("TICHCUC-CHUYENCAN").Range("B4:E" & dongcuoi).Value
End If
Next i
End Sub
Khi bạn khai báo biến dạng Array thì phải khai báo loại Variant (tự định nghĩa) chứ không nên dùng loại worksheets.
Bởi đối tượng worksheets chỉ 1 sheet cụ thể, chứ không thể coi là 1 tập hợp các sheet được.
Bạn muốn xét 1 vùng ô trong nhiều sheet thì sẽ dùng vòng lặp theo số thứ tự sheet sẽ tốt hơn.
dạ Chào thầy.!
E chuyển qua Variant rồi vẫn bị lỗi cũ và debug ngay listdanhsach luôn ah.
Thầy chỉ giúp em với ah.
Em muốn dùng vòng lập qua nhiều sheet, để copy dữ liệu từ 1sheet qua nhiều sheet dc chọn ah.
Thầy Cho em hỏi Cú pháp chọn nhiều sheet như vậy đã đúng chưa Thầy?
Thầy hướng dẫn em cú pháp chọn dc nhiều sheet để gắn biến cho đúng ah.
Tks Thầy
Bạn gửi file kèm theo nhé, trong file bạn mô tả rõ mục đích của bạn muốn làm gì. Vì nội dung này cần xem cụ thể trên file mới có hướng làm cụ thể được.
Bạn đưa file lên google drive của bạn, sau đó tạo link chia sẻ (dạng công khai) và gửi lên phần thảo luận này nhé.
Dạ Em chào Thầy!
Nội dung câu hỏi:
Ở sheet LCB khi em cập nhật bất cứ 1 nhân viên mới thêm vào, thì bấm vào nút cập nhật nhân viên nó sẽ copy ra các sheet còn lai.
Module 2 ah
( hiện tại em đã làm dc bằng cách record Marco rồi).
Nhưng em vẫn muốn chạy theo vòng lặp qua các sheet. Nhờ Thầy hỗ trợ Module 2 ( chạy vòng lập)
Em gửi File Thầy nhé:
https://drive.google.com/file/d/1CH2H...
Thanks Thầy
Mình có xem file của bạn và mình thấy thế này:
1. Vị trí dòng tổng cộng: bạn nên đưa lên dòng đầu của bảng, để khi thêm nv mới bên dưới bảng không bị xê dịch dòng tổng cộng => việc này giúp thuật toán thêm NV dễ dàng hơn.
2. Bạn nên học hết khóa học, đặc biệt là chương 12 về lập trình userform. Nó sẽ giúp bạn giải quyết nhiều vấn đề cho file này.
Như thêm 1 nv => tạo form thêm mới => khi nhập thông tin trên form xong, bấm nút Lưu => lưu thông tin này trên đồng thời cả 4 sheet, tại vị trí dòng cuối +1 (thay vì phương pháp bạn đang làm)
Khi viết code mình ko dùng thao tác gộp nhóm sheet (kể cả sheet cấu trúc giống nhau) mà nên để các sheet làm việc độc lập. Vì chỉ cần 1 sheet bị khác đi thì việc gộp nhóm sheet sẽ sai (mà thực tế rất dễ xảy ra việc này)
dạ cảm ơn Thầy ah!
Vậy vòng lap nhiều sheet sẽ ko dùng hả Thầy! Em sẽ xem vè User From.
Em đang học Khóa VBAG02 mà thấy khó hiểu quá!
Chào bạn bạn đang khó hiểu phần nào VBAG02 nhỉ?
Dạ chào Thầy! Em đang học Chương 1 và chương 2 của VBAG02. vì thấy rất khó về mảng và SQL ah.
OR có thể học lập đi lập lại chương 1 + 2 nhiều lần hi vọng sẽ hiểu sâu hơn?
hay có cần phải học SQL trước ko hả Thầy ah?
Chào bạn bạn cần học chắc về mảng trước nhé, bạn không hiểu chỗ nào thì đăng hỏi tại video đó nhé.