giaiphap Ô Q2 trong file <font color="#ff0000">csv mình zip có data mà bạn
</font>
giaiphap Ô Q2 trong file <font color="#ff0000">csv mình zip có data mà bạn
</font>
Nếu không dược bạn post file có macro đó nhờ kiểm tra lại, như thế mới thuận lợi cho tác giả code đó cũng như người khác kiểm tra dùm bạn, còn không thì làm khó nhau rui.Gửi bởi duydhk
Gửi bởi duydhkBạn xem kỷ lại đi, mình mở file csv (từ file nén) không có dữ liệu (ô Q2, chỉ có cột A thôi)
99% là bạn chép Code vào file Sample xong chạy luôn mà không mà không mở file Sereach... rồi. Mình soạn code dưa theo ý tưởng của bạn trong code bài 1 (Như code của bạn mặc định là 2 file đang mở) Đảm bảo File Sereach... đang mởGửi bởi duydhk
sealand thank bạn. Mình vẫn mở cả 2 khi chạy code và nó báo lỗi ngay tại dòng khai báo worksheet rồi. Mình up ảnh lỗi từ file của bạn lên nhé
Vẫn có vấn đề tên file có đúng không? Bạn thử mở 2 file mình gửi đây xem sao.
Tốt nhất là bạn thêm đoạn code để mở file bạn chọn.
giaiphap
data mình cần lấy trong file csv nó giống với data mình đang để trong ô B2 của file sample.xlmsMình save data cần xử lý ra file excell khác, bạn có thể tạo file csv khác rồi đặt tạm data vào ô Q2 của file csv mới tạo, sau đó chạy thử marco process() của mình thì sẽ hình dung ra ngay
Mình xin up lại 2 file này
Mình sử dụng 2 file bạn gửi rồi nhưng vẫn bị lỗi như vậy.
Ngoài ra code xử lý đoạn xuống dòng và lùi space bạn sửa lại đang bị hiện "0" ở đầu và làm mất phần tag mình muốn giữ để so sánh với ô A1-A143 trong sheet "process" ( vì trong nội dung mình muốn so sánh có vài tag trùng tên nhưng space khác nhau, nên mình phải giữ lại space để so sánh đc chính xác)
Bạn có thể dùng 2 file mình gửi ban đâu, xoá data trong sheet "sample" đi rồi chạy marco process() để xem kết quả. Cảm ơn bạn nhiều
Bạn làm như sau:
Đóng tất cả các cửa sổ Excell lại rồi tải file nén này về mở cả 2 file lên. Về sheet Sample của file Sample chạy code xem nào?
Mình đang dùng Office10 , không biết có lỗi theo phiên bản không? Còn cú pháp VBA mình tin là không có lỗi. Cái lỗi bạn nêu là không tìm thấy của sổ của file search_result 8IS6.csv
Các lỗi do Function DEMO thì bạn hoàn toàn có thể kiểm tra vì bạn viết ra, mình chỉ chuyển từ Sub sang Function. Nếu có gì sai sót bạn điều chỉnh lại. (Nói thật, với cách giải thích của bạn và dịch đoạn code của bạn thì hoa mắt quá)
Thank sealand, mình check lại file bạn gửi rồi, marco ko nhận vì ko khai báo extension cho file( search_result 8IS6.csv và sample.xlsm)
Nhưng code của bạn chỉ chạy và copy data từ bên csv qua và dừng ở bước số 2, còn từ bước 3 đến 6 thì chưa làm gì hết.
1. Copy data từ ô Q2 của file CSV
2. Paste data vào ô B2 của sheet sample, sau đó xử lý đoạn data này
Phần xử lý này chính là marco trong "sample.xlsm!Sheet2.Demo1" mà mình đã có
3. Sau khi xử lý data như yêu cần trên xong, data sẽ đc paste vào ô E2( hoặc paste thẳng vào ô G1 bên sheet "process")
4. Tại ô G1 mình dùng marco của mình để sửa data và copy kết quả, sau đó paste vào ô E8 tại sheet "summary". Hết 1 vòng
5. Lặp lại từ đầu với Q3, chạy các bước trên, paste vào F8.Tiếp tục với Q4, chạy các bước trên, paste vào G8
và cứ thế đến Qn, khi Qn = blank
Hiện tại mình chỉ cần làm sao khi thực hiện từ 1 đến 4, nó tự nhảy làm lại tự đầu với Q3 - xử lý- rồi paste vào F8, rồi lại Q4 - xử lý - paste vào G8