Gitiho contest
Cùng gitiho contest chinh phục kiến thức, khẳng định bản thân với hệ thống bài test phong phú, đầy đủ các chủ đề để bạn khám phá.
Gitiho for leading business
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.
Đã được tin tưởng sử dụng bởi các doanh nghiệp
e muốn hiểu và viết dc đoạn code này thì học ở chương mấy hay khóa học
Thầy cho e hỏi, e muốn hiểu và viết dc đoạn code này thì học ở chương mấy hay khóa học nào ạ. Public Sub GPE() |
| Dim sArr(), dArr(1 To 65000, 1 To 250), AN As Long, AO As Long, AP As Long, Col As Long, Ws As Worksheet |
| For Each Ws In ThisWorkbook.Worksheets |
| If Ws.Name Like "KH*" Then |
| sArr = Ws.Range(Ws.[A4], Ws.[A65000].End(xlUp)).Resize(, Ws.[IV1].End(xlToLeft).Column) |
| If Ws.[IV1].End(xlToLeft).Column > Col Then Col = Ws.[IV1].End(xlToLeft).Column |
| For AN = 1 To UBound(sArr, 1) |
| AP = AP + 1 |
| For AO = 1 To UBound(sArr, 2) |
| dArr(AP, AO) = sArr(AN, AO) |
| Next AO |
| Next AN |
| End If |
| Next |
| With Sheets("TONGHOP") |
| .[A4:am65000].ClearContents |
| If AP Then .[A4].Resize(AP, Col).Value = dArr |
| End With |
End Sub |
3 câu trả lời
159 lượt xem
vỗ tay
Chia sẻ
Vũ thị Kim khuyên
09:08 - Aug 10, 2021
Chào bạn về nội dung mảng bạn phải học khoá sau mới có
vỗ tay
Vũ thị Kim khuyên
18:08 - Aug 10, 2021
dạ cảm ơn thầy ạ.
vỗ tay
Vũ thị Kim khuyên
22:08 - Aug 10, 2021
Chúc bạn học tốt cùng gitiho
vỗ tay
Câu hỏi liên quan
Top
(Giờ làm việc: 8h30 - 18h, nghỉ chiều thứ 7 và CN)
Những câu hỏi thường gặp
Hướng dẫn đăng ký khoá học
Hướng dẫn đăng nhập
Hướng dẫn lấy lại mật khẩu
Hướng dẫn thanh toán khóa học sau khi đăng ký thành công
© 2020 - Bản quyền của Công Ty Cổ Phần Công Nghệ Giáo Dục Gitiho Việt Nam
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông
Giấy chứng nhận Đăng ký doanh nghiệp số: 0109077145, cấp bởi Sở Kế hoạch và Đầu tư TP. Hà Nội
Giấy phép mạng xã hội số: 588, cấp bởi Bộ Thông tin và Truyền thông