Tạo dấu chấm (1 người xem)

[GTK-PM]

="Như vậy, đến hết ngày "&DAY(K4)&" tháng "&MONTH(K4)&" năm "&YEAR(K4)&", Công ty cổ phần xây dựng còn nợ "&VLOOKUP($L$5,HS,2,0)&" số tiền là "&(G39)&" đồng"

Câu lệnh &(G39) nếu viết như trên ra kết quả: 38800000 mà không phải là 38.800.000 anhờ anh chị giúp đỡ để dấu chấm ngắt quãng trong số tiền không?

 

[lehuong1409]

="Như vậy, đến hết ngày "&DAY(K4)&" tháng "&MONTH(K4)&" năm "&YEAR(K4)&", Công ty cổ phần xây dựng còn nợ "&VLOOKUP($L$5,HS,2,0)&" số tiền là "&(G39)&" đồng"

Câu lệnh &(G39) nếu viết như trên ra kết quả: 38800000 mà không phải là 38.800.000 anhờ anh chị giúp đỡ để dấu chấm ngắt quãng trong số tiền không?

ngoài cách của anh hpkhuong bạn có thể sử dụng hàm fixed(G39,0)

 

[GTK-PM]

 TEXT(G39,"#,##0")

Em đã giải quyết được vấn đề. Cảm ơn anh !

 

[GTK-PM]

="Số tiền: "&IF(ISNA(VLOOKUP(Chi!$J$2,QuyTM!$D$8:$N$534,9,0)),0,VLOOKUP(Chi!$J$2,QuyTM!$D$8:$N$534,9,0))&" VNĐ"
Nhờ các anh nếu trong trường hợp này, thì phải dùng hàm gì để tạo dấu chấm khi dò tìm được số tiền.

 

[vanthinh3101]

="Số tiền: "&IF(ISNA(VLOOKUP(Chi!$J$2,QuyTM!$D$8:$N$534,9,0)),0,VLOOKUP(Chi!$J$2,QuyTM!$D$8:$N$534,9,0))&" VNĐ"
Nhờ các anh nếu trong trường hợp này, thì phải dùng hàm gì để tạo dấu chấm khi dò tìm được số tiền.

Bạn thử:

="Số tiền: "&TEXT(IF(ISNA(VLOOKUP(Chi!$J$2,QuyTM!$D$8:$N$534,9,0)),0,VLOOKUP(Chi!$J$2,QuyTM!$D$8:$N$534,9,0)),"#,##0")&" VNĐ"

Làm như bác hpkhuong đã hướng dẫn đấy.

 

[GTK-PM]

Bạn thử:

="Số tiền: "&TEXT(IF(ISNA(VLOOKUP(Chi!$J$2,QuyTM!$D$8:$N$534,9,0)),0,VLOOKUP(Chi!$J$2,QuyTM!$D$8:$N$534,9,0)),"#,##0")&" VNĐ"

Làm như bác hpkhuong đã hướng dẫn đấy.

Như vậy được rồi anh à, Lâu không gặp anh, anh có đoạn code nào để bôi đậm được Số tiền trong công thức này không?

 

[vanthinh3101]

Như vậy được rồi anh à, Lâu không gặp anh, anh có đoạn code nào để bôi đậm được Số tiền trong công thức này không?

Giả sử ô chứa đoạn text trên của bạn là ô A1, bạn thử dùng code sau:

Sub GPE()
    Range("A1").Characters(Start:=10, Length:=(Len(Range("A1")) - 13)).Font.Bold = 1
End Sub

 

[befaint]

Giả sử ô chứa đoạn text trên của bạn là ô A1, bạn thử dùng code sau:

Sub GPE()
    Range("A1").Characters(Start:=10, Length:=(Len(Range("A1")) - 13)).Font.Bold = 1
End Sub

Người ta hỏi là "bôi đậm được Số tiền trong công thức này" cơ mà?

Cái ý tưởng này hỏi nhiều rồi...

 

[GTK-PM]

Chắc là không thể rồi ... Em cám ơn các anh đã góp ý