Đố vui về VBA!

leonguyenz

Thành viên mới
Thành viên BQT
Moderator
Tham gia ngày
2 Tháng tám 2010
Bài viết
4,427
Được thích
7,786
Điểm
610
Nơi ở
Bình Dương
Thêm câu nữa: Chia 1 cột thành nhiều cột không dùng vòng lặp, không dùng công thức (Viết code để thực hiện giống như file đính kèm mà không dùng vòng lặp, không dùng công thức)
Đã vò đầu bứt tóc mấy giờ chưa tìm được thuật toán.
Hóng.
 

huuthang_bd

Chuyên gia GPE
Tham gia ngày
10 Tháng chín 2008
Bài viết
7,167
Được thích
8,083
Điểm
860
Nơi ở
TP.HCM

File đính kèm

leonguyenz

Thành viên mới
Thành viên BQT
Moderator
Tham gia ngày
2 Tháng tám 2010
Bài viết
4,427
Được thích
7,786
Điểm
610
Nơi ở
Bình Dương
Vô tình phát hiện và cũng không hiểu vì sao nó lại hoạt động như vậy luôn.
Nếu suy nghĩ một cách thông thường chắc không thể nào có đáp án cho câu đố này :D
Hay thật, tại sao đổ dữ liệu mảng xuống Range không theo quy tắc kích thước như vậy nhỉ?
Do Redim Preserve?
Chưa hiểu được cái này: Range(C1,C1:S6).Value = Mang, ai giải thích giùm.
 
Lần chỉnh sửa cuối:

kieu manh

IIIIIIIIIIIIIIIII
Tham gia ngày
9 Tháng sáu 2012
Bài viết
3,603
Được thích
2,457
Điểm
560
Nơi ở
IIIIIIIIIIIIIIIII
Vô tình phát hiện và cũng không hiểu vì sao nó lại hoạt động như vậy luôn.
Nếu suy nghĩ một cách thông thường chắc không thể nào có đáp án cho câu đố này :D
Mạnh thấy hay đó ... Ứng dụng viết cái Hàm Co và Giản phù hợp đấy !!!
 

huuthang_bd

Chuyên gia GPE
Tham gia ngày
10 Tháng chín 2008
Bài viết
7,167
Được thích
8,083
Điểm
860
Nơi ở
TP.HCM
Hay thật, tại sao đổ dữ liệu mảng xuống Range không theo quy tắc kích thước như vậy nhỉ?
Do Redim Preserve?
Chưa hiểu được cái này: Range(C1,C1:S6).Value = Mang, ai giải thích giùm.
Theo mình thấy thì khi gán dữ liệu bằng cú pháp như vậy thì vùng thứ hai (C1:S6) sẽ có kết quả như vậy, vùng phía trước sẽ có kết quả bình thường, ô C1 trước dấu phẩy để vào để làm "chân gỗ" thôi.
 
Top Bottom