Lỗi sai định dạng khi xuất dữ liệu từ excell sang word.

[phuc12345]

Em chào các anh chị a. Em có file điền dữ liệu vào word từ excell như dưới. Khi bấm vào code ở file excell thì nó cho ra kết quả là file 1-doi_chieu_cong_no.doc. Nhưng trên file word số nó chỉ hiển thị ở định dạng dấu phẩy (tức là sai định dạng). Anh chị có thể sửa code giúp em để kết quả cho ra hiển thị dấu chấm không a.(kết quả phải là 3.630). Em cám ơn các anh chị a.

 

[LamNA]

Em chào các anh chị a. Em có file điền dữ liệu vào word từ excell như dưới. Khi bấm vào code ở file excell thì nó cho ra kết quả là file 1-doi_chieu_cong_no.doc. Nhưng trên file word số nó chỉ hiển thị ở định dạng dấu phẩy (tức là sai định dạng). Anh chị có thể sửa code giúp em để kết quả cho ra hiển thị dấu chấm không a.(kết quả phải là 3.630). Em cám ơn các anh chị a.

Sửa code bằng cách nào khi chỉ có file word

 

[phuc12345]

Sửa code bằng cách nào khi chỉ có file word

Không anh a. Chỉnh code excell chứ. Nếu ra kết quả lại đi chỉnh file word thì em đăng lên đây làm gì.

Bài đã được tự động gộp: 19/11/19

Không anh a. Chỉnh code excell chứ. Nếu ra kết quả lại đi chỉnh file word thì em đăng lên đây làm gì.

ReplaceWith:=Format(Sheet1.Cells(i + 2, j).Value, "#,##0"), _
hình như chỉnh code ở dòng này

 

[befaint]

Không anh a. Chỉnh code excell chứ. Nếu ra kết quả lại đi chỉnh file word thì em đăng lên đây làm gì.

Tức là file đính kèm bạn gửi ở bài đầu tiên chỉ có file Word, KHÔNG có Excel => Nên chẳng có gì mà chỉnh. Bạn đính kèm lại file đi.

 

[phuc12345]

Tức là file đính kèm bạn gửi ở bài đầu tiên chỉ có file Word, KHÔNG có Excel => Nên chẳng có gì mà chỉnh. Bạn đính kèm lại file đi.

em có 2 file là excel và word như đính kèm. trong file excell em viết code để chuyển dữ liệu từ excel sang word(Khi các anh chị bấm vào sẽ thấy). nó sẽ cho ra file word tên là 1-doi_chieu_cong_no. vấn đề ở đây là file 1-doi_chieu_cong_no ở đây, số trong file word để ở định dạng dấu phẩy(trong khi định dạng của file excell là dấu chấm(phân cách hàng nghìn). bây giờ em nhờ anh chị chỉnh code vba để khi bấm vào đấy nó sẽ cho ra file word có số ở định dạng đúng(phân cách hàng nghìn là dấu chấm chứ không phải dấu phẩy).
Em đoán trong code phải chỉnh hàng
ReplaceWith:=Format(Sheet1.Cells(i + 2, j).Value, "#,##0"), _
Em cám ơn các anh chị à.

 

[batman1]

em có 2 file là excel và word như đính kèm.

Đính kèm ở đâu? Nói tiếng Việt mà không hiểu sao? Bạn đính kèm Gmail.rar mà trong nó chỉ có tập tin Word. Làm gì có tập tin Excel.

trong file excell em viết code để chuyển dữ liệu từ excel sang word(Khi các anh chị bấm vào sẽ thấy).

Bấm vào? Bấm vào đâu khi không có tập tin Excel? Muốn người khác chỉnh sửa hộ code thì phải đính kèm tập tin Excel. Không có tập tin Excel thì nghỉ chơi.

 

[phuc12345]

Đính kèm ở đâu? Nói tiếng Việt mà không hiểu sao? Bạn đính kèm Gmail.rar mà trong nó chỉ có tập tin Word. Làm gì có tập tin Excel.

Bấm vào? Bấm vào đâu khi không có tập tin Excel? Muốn người khác chỉnh sửa hộ code thì phải đính kèm tập tin Excel. Không có tập tin Excel thì nghỉ chơi.

thành thật xin lỗi bác. em nén file bị nhầm.

 

[batman1]

thành thật xin lỗi bác. em nén file bị nhầm.

Theo tôi Word nó làm theo thiết lập trong Control Panel thôi. Mà làm như thế là quá chuẩn.

Tôi có thiết lập khác (dấu cách phân cách hàng nghìn) và tôi có 3 630.

Tôi vào CP và chọn Wietnamski - Vietnamese với thiết lập trong hình 1 (dấu chấm phân cách hàng nghìn) thì sau khi chạy code tôi có hình 2.
Hãy vào CP và kiểm tra thiết lập của mình xem sao.