Tối ưu và đơn giản hóa hoạt động đào tạo tại doanh nghiệp. Sẵn sàng nền tảng, nội dung đào tạo cho tất cả các vị trí, bộ phận. Ứng dụng MIỄN PHÍ ngay vào doanh nghiệp chỉ với MỘT click.
Mình làm thử 1 file của công ty con có nhiều sheet...
Mình làm thử 1 file của công ty con có nhiều sheet tên là BS, PL. Nhưng khi gộp file tại sheet BS của file consols lại gộp sheet PL của các công ty con. anh chị chỉ mình lỗi sai vs khắc phục với ạ .xin cám ơn https://drive.google.com/file/d/17maL...
Code chạy được là đã hoạt động, việc còn lại bạn cần kiểm tra lại logic, thuật toán trong code của bạn để sửa lại cho đúng ý bạn.
Bạn đã xem bài 37 liên quan đến xử lý Sheet chưa?
vỗ tay
Lê Đức Ngọc22:07 - Jul 04, 2019
Đoạn code e đã chỉnh để gộp BS PL wb.Sheets("BS").UsedRange.Copy ThisWorkbook.Sheets("BS").Range("A1") wb.Sheets("PL").UsedRange.Copy ThisWorkbook.Sheets("PL").Range("A1")
Else lr = ThisWorkbook.Sheets("BS").UsedRange.Rows.Count wb.Sheets("BS").UsedRange.Offset(1).Copy ThisWorkbook.Sheets("BS").Range("A" & lr + 1)
lr = ThisWorkbook.Sheets("PL").UsedRange.Rows.Count wb.Sheets("PL").UsedRange.Offset(1).Copy ThisWorkbook.Sheets("PL").Range("A" & lr + 1)