Hỗ trợ Font tiếng Việt từ ListView vào Sheets

[dinhthientan]

K/g các a/c trên diên đàn
Tôi có làm 1 file Excel đơn giản có nhập dữ liệu vào ListView. Vấn đề Font tiếng Việt khi ghi vào ListView thì giải quyết được, nhưng còn 2 việc mong các a/c giúp đỡ:
- Giúp tôi lệnh xóa 1 hoặc 1 số dòng trên ListView để sau đó cột Stt sắp xếp lại cho đúng,
- Khi đưa dữ liệu từ ListView vào Sheet lại bị lỗi Font.
Rất mong ac giúp đỡ. Cảm ơn các a/c nhiều

 

[TH2]

K/g các a/c trên diên đàn
Tôi có làm 1 file Excel đơn giản có nhập dữ liệu vào ListView. Vấn đề Font tiếng Việt khi ghi vào ListView thì giải quyết được, nhưng còn 2 việc mong các a/c giúp đỡ:
- Giúp tôi lệnh xóa 1 hoặc 1 số dòng trên ListView để sau đó cột Stt sắp xếp lại cho đúng,
- Khi đưa dữ liệu từ ListView vào Sheet lại bị lỗi Font.
Rất mong ac giúp đỡ. Cảm ơn các a/c nhiều

THì muốn ghi font xuống sheet có 2 cách
-Cách 1: bạn có hàm Font_ToLv thì phải có hàm ngược Font_LvToSheet
- Cách 2: đơn giản hơn: đó là lúc lưu vào Lv (list view) thì cũng lưu vào đâu đó , rồi đâu đó (ví dụ Array, Listbox khác) sẽ là dữ liệu ghi xuống sheet

tạm vậy, nhơ bỏ ĐIỆN a/c đi <-- vì như thế có giật không nhỉ??? hay là nghĩa khác?

 

[dinhthientan]

THì muốn ghi font xuống sheet có 2 cách
-Cách 1: bạn có hàm Font_ToLv thì phải có hàm ngược Font_LvToSheet
- Cách 2: đơn giản hơn: đó là lúc lưu vào Lv (list view) thì cũng lưu vào đâu đó , rồi đâu đó (ví dụ Array, Listbox khác) sẽ là dữ liệu ghi xuống sheet

tạm vậy, nhơ bỏ ĐIỆN a/c đi <-- vì như thế có giật không nhỉ??? hay là nghĩa khác?

Bác giúp tôi code chuyển vào Array đc không, tôi làm bị báo lỗi hoài. Cảm ơn bác nhiều

 

[Maika8008]

Bác giúp tôi code chuyển vào Array đc không, tôi làm bị báo lỗi hoài. Cảm ơn bác nhiều

Tôi không biết code đảo ngược font cho bạn nhưng tôi gợi ý 1 giải pháp tạm thời: khi bấm nút ghi thì đồng thời với ghi vào LV thì cũng ghi vào 1 vùng tạm trên bảng tính. Khi bấm Nhập vào sheet thì lấy từ vùng tạm đó chép ra data chính rồi xóa vùng tạm ấy đi.

 

[TH2]

Bác giúp tôi code chuyển vào Array đc không, tôi làm bị báo lỗi hoài. Cảm ơn bác nhiều

báo lỗi thế nào thì tải lên đây, xem lỗi ở đâu

 

[Maika8008]

báo lỗi thế nào thì tải lên đây, xem lỗi ở đâu

Tôi thấy bạn trả lời rồi mà. Đập chữ từ List view xuống sheet nhưng lỗi font chứ có gì báo lỗi đâu?

 

[TH2]

Bạn chưa xem file và mô tả à? Đập chữ từ List view xuống sheet nhưng lỗi font chứ có gì báo lỗi đâu.

ý là sau khi bạn ý áp dụng tạm lưu vào Array (theo cách bài số #2) rồi ghi xuống sheet: dữ liệu Array đó xuống sheet thì gặp lỗi, thì lỗi đó ở đâu(?)

 

[Maika8008]

ý là sau khi bạn ý áp dụng tạm lưu vào Array rồi ghi xuống sheet dữ liệu Array đó xuống sheet thì gặp lỗi, thì lỗi đó ở đâu

À, tôi chưa đọc kỹ. Ghi vào array hay vào bảng tính cũng như nhau nhưng phải ghi lúc chưa dùng hàm chuyển đổi bảng mã kia. Array phải được khai báo public và hay rủi ro mất dữ liệu đã lưu trong đó khi ngừng code nửa chừng.

 

[Maika8008]

Không biết chốt hạ là chủ thớt dùng giải pháp nào: dùng vùng trên bảng tính, dùng array public hay tiếp tục tìm giải pháp truy ngược bảng mã Win 1258 ra Unicode?

 

[dinhthientan]

Không biết chốt hạ là chủ thớt dùng giải pháp nào: dùng vùng trên bảng tính, dùng array public hay tiếp tục tìm giải pháp truy ngược bảng mã Win 1258 ra Unicode?

Dạ e đang tìm cách dùng bảng mã win1258 ra Unicode mà khó quá bác

 

[Maika8008]

Dạ e đang tìm cách dùng bảng mã win1258 ra Unicode mà khó quá bác

Chứ nguồn bạn lấy hàm Font_toLv đó không có hàm trả ngược lại à?

 

[Nhattanktnn]

Sao mình tải file về thử thì có lỗi font đâu nhỉ

 

[dinhthientan]

Chứ nguồn bạn lấy hàm Font_toLv đó không có hàm trả ngược lại à?

Không có hàm trả ngược bác ơi

Bài đã được tự động gộp: 1/4/23

Sao mình tải file về thử thì có lỗi font đâu nhỉ
View attachment 288297

Nó lỗi font khi nhập xuống Sheet đó bác. E ghi vào Listview xong nhập xuống sheet nó lỗi font như dòng 1-5 đó bác

 

[Nhattanktnn]

Nó lỗi font khi nhập xuống Sheet đó bác

Hình mình đính kèm có thêm một dòng mới đấy thôi, và không bị lỗi gì cả

 

[Maika8008]

Hình mình đính kèm có thêm một dòng mới đấy thôi, và không bị lỗi gì cả

Cũng lạ hè! Tôi dùng thì lỗi y như chủ thớt. Hay là do phiên bản office? Máy tôi win 11 office 2019.

 

[dinhthientan]

Cũng lạ hè! Tôi dùng thì lỗi y như chủ thớt. Hay là do phiên bản office? Máy tôi win 11 office 2019.

Đúng rồi Bác, máy mình Win10, of2019

 

[Nhattanktnn]

Cũng lạ hè! Tôi dùng thì lỗi y như chủ thớt. Hay là do phiên bản office? Máy tôi win 11 office 2019.

Máy em win 10 office 2010 32bit. Nguyên nhân thì em cũng không rõ

 

[Maika8008]

Đúng rồi Bác, máy mình Win10, of2019

Tôi đang thử viết cái hàm Font_toSheet gần xong. Còn mấy trường hợp đặt biệt nữa.

 

[TH2]

Dạ e đang tìm cách dùng bảng mã win1258 ra Unicode mà khó quá bác

Sao phải đổi làm chi, khi nhập thì là unicode rồi, sau đó chuyển sang win1258 để cho vào listview - giờ lại đổi lại sao phài khổ thế nhỉ?
Cứ như kiểu thóc đổ vào gạo, trộn, sau đó lại nhặt lại. Lưu ý thế giới IT là ảo, hãy lưu cái thật trước cái ảo.

 

[Maika8008]

Dạ e đang tìm cách dùng bảng mã win1258 ra Unicode mà khó quá bác

Bạn thử file. Chỗ code nút Nhập vào sheet dùng hàm Font_ToSheet cho 2 trường tên và địa chỉ đấy.
Code hàm dở hơi thôi nhưng chạy được.