Hàm VND là hàm khá phổ biến cho các bạn làm kế toán. Công thức hàm này như thế nào? Bài viết hôm nay mời bạn cùng alltopvn.com tìm hiểu tất tần tật hàm VND trong Excel nhé. Hi vọng qua những phân tích của chúng tôi sẽ giúp bạn “bỏ túi” được nhiều kiến thức về hàm này.

Hàm Excel kế toán chuyển đổi số thành chữ VND trong Excel.

Hàm Excel kế toán dùng để chuyển đổi số thành chữ VND hiện nay có nhiều cách phổ biến. Hôm nay Alltopvn sẽ hướng dẫn các bạn chi tiết về một trong các cách đó nhé.

Hàm Excel kế toán chuyển đổi số thành chữ VND trong Excel.
Hàm Excel kế toán chuyển đổi số thành chữ VND trong Excel.

Sử dụng MARCO trong Excel để chuyển đổi số thành chữ VND

Với cách sử dụng MARCO trong Excel để chuyển đổi số thành chữ Vnđ thì khá phức tạp. Cách này chỉ phù hợp cho những bạn làm kế toán mà có khả năng lập trình. Nhưng các bạn cũng thử tham khảo, biết đâu các bạn sẽ cần chúng trong thời gian sớm nhất.

Hàm tô màu trong excel là gì? Vâng, trong quá trình sử dụng excel có rất nhiều lúc bạn cần phân biệt các dự liệu trong một bảng tính, phân biệt ô có chứa dự liệu và ô trống. Với các bảng tính có ít dự liệu thì chúng ta có thể phân biệt theo cách thông thường. Tuy nhiên với các bảng tính lớn thì việc này rất dễ nhầm lần. Với những ai có kinh nghiệm khi sử dụng các hàm trong excel thì thường dùng hàm tô màu trong EX trong trường hợp này.

Hướng dẫn chuyển đổi số thành chữ VND bằng MARCO:

Bước 1: Bạn chọn vào Menu Tools => Chọn Macro => Chọn vào Visual Basic Editor.

Bước 2: Bạn chọn vào Insert => Module. Sau đó bạn gõ nội dung cần vào hàm. Khi đã nhập xong nội dung vào bạn chọn Return hoặc Close vào bảng tính. Trong bảng tính này chúng ta cũng có thể dùng hàm này giống như các hàm khác trong file Excel.

Đây là nội dung hàm đổi số thành chữ VND trong Excel:

Function Doi3so(Sso As Integer) As String Dim Tam As String Dim xx As Integer Dim hgtram As Integer Dim hgchuc As Integer Dim hgdonvi As Integer Dim Chu(15)

Tam = “” Chu(1) = “một ” Chu(2) = “hai ” Chu(3) = “ba ” Chu(4) = “bốn ” Chu(5) = “năm ” Chu(6) = “sáu ” Chu(7) = “bảy ” Chu(8) = “tám ” Chu(9) = “chín ”

hgtram = Int(Sso / 100) xx = Sso Mod 100 hgchuc = Int(xx / 10) hgdonvi = xx Mod 10 If hgtram > 0 Then Tam = Chu(hgtram) + “trăm ” End If If hgchuc = 1 Then Tam = Tam + “mười ” Else If hgchuc > 1 Then Tam = Tam + Chu(hgchuc) + “mươi ” End If If (hgchuc = 0) And (hgdonvi > 0) And (hgtram > 0) Then Tam = Tam + “lẻ ” End If End If If hgdonvi > 0 Then If (hgchuc > 0) And (hgdonvi = 5) Then Tam = Tam + “lăm ” Else If (hgchuc > 1) And (hgdonvi = 1) Then Tam = Tam + “mốt ” Else Tam = Tam + Chu(hgdonvi) End If End If End If Doi3so = Tam End Function

Function DOI12SO(Chuoi12$) As String Dim XXX As String Dim KQ As String Dim i As Integer Dim Stien As Integer Dim LOP(6) As String Dim MSO(5) As Integer

LOP(4) = “” LOP(1) = “tỉ ” LOP(2) = “triệu ” LOP(3) = “ngàn ” Do While Len(Chuoi12$) < 12 Chuoi12$ = ” ” + Chuoi12$ Loop

MSO(1) = 0 XXX = Left$(Chuoi12$, 3) MSO(2) = Val(Trim(XXX)) XXX = Mid$(Chuoi12$, 4, 3) MSO(3) = Val(Trim(XXX)) XXX = Mid$(Chuoi12$, 7, 3) MSO(4) = Val(Trim(XXX)) XXX = Right$(Chuoi12$, 3) MSO(5) = Val(Trim(XXX)) KQ = “” For i = 1 To 4 Stien = MSO(i + 1) If Stien > 0 Then KQ = KQ + Doi3so(Stien) + LOP(i) End If Next i KQ = UCase(Left(KQ, 1)) + Mid(KQ, 2) + “đồng chẵn” DOI12SO = “(Bằng chữ: ” + KQ + “)” End Function Function DSTC(Sotien$) As String DSTC = DOI12SO(Sotien$) End Function

Ghi chú: Để làm được điều này bạn cần phải gõ trong Visual Editor để không dính lỗi chữ tiếng Việt. Hoặc để an tâm hơn bạn nền dùng Font chữ 1 byte. Trong bảng Excel bạn thực hiện theo cú pháp =DSTC() hay =DSTC() rồi sau đó nhấn Enter.

Cách 2: Bạn có thể sử dụng Tools hỗ trợ chuyển đổi số thành chữ VND trong Excel.

Ngoài cách 1 thì chúng ta có thể sử dụng một số phần mềm hỗ trợ chuyển đổi số thành chữ VND. Một trong những phần mềm phải kể đến là AccHelper và vnTools. Đây cũng là hai tools khá hiệu quả và đang được nhiều bạn kế toán doanh nghiệp sử dụng trong công việc. Để tìm hiểu sâu về phần mềm này mời các bạn tìm hiểu bài viết tiếp theo của chúng tôi nhé.

Bạn cũng có thể tải vnTools tại:

http://www.mediafire.com/file/86kc1ga16chj00v/%255BCaTaNha%25C2%25AE%255DCong_cu_doi_so_ra_chu_cho_doc_%2526_xls.rar/file.

Như vậy bài viết này chúng tôi đã hướng dẫn cho bạn hàm VND trong Excel. Cũng như một số phần mềm có thể hỗ trợ chuyển đổi số sang chữ VND trong Excel. Hi vọng với những chia sẽ trên bạn sẽ áp dụng thành công trong công việc cũng như trong cuộc sống.

 

LEAVE A REPLY

Please enter your comment!
Please enter your name here