Chuyển đổi các giá trị âm được coi là văn bản bằng VBA trong Microsoft Excel
Trong bài viết này, chúng tôi sẽ tạo một hàm tùy chỉnh để chuyển đổi các chuỗi âm thành một số nguyên.
Dữ liệu thô cho bài viết này bao gồm các chuỗi theo sau là dấu trừ (-).
Chúng tôi muốn chuyển đổi các chuỗi này thành số nguyên.
Giải thích logic
Trong bài viết này, chúng tôi đã tạo một hàm ConvertNegNumbers tùy chỉnh để chuyển đổi chuỗi thành số nguyên. Hàm này nhận giá trị chuỗi làm đầu vào và trả về số nguyên làm đầu ra.
Giải thích mã
Right (Var, 1) = “-“
Đoạn mã trên được sử dụng để kiểm tra xem ký tự cuối cùng của chuỗi có bằng với dấu trừ (-) hay không.
ConvertNegNumbers = CInt (“-” & Left (Var, Len (Var) – 1))
Trong đoạn mã trên, hàm left được sử dụng để trích xuất tất cả các ký tự trong chuỗi, ngoại trừ ký tự cuối cùng. Hàm CInt được sử dụng để chuyển đổi giá trị chuỗi thành số nguyên.
Vui lòng theo dõi bên dưới để biết mã
Option Explicit Function ConvertNegNumbers(Var As String) 'Checking whether last character in the string is minus(-) If Right(Var, 1) = "-" Then 'Converting string value to negative integer ConvertNegNumbers = CInt("-" & Left(Var, Len(Var) - 1)) Else 'Converting string value to integer ConvertNegNumbers = CInt(Var) End If End Function
Nếu bạn thích blog này, hãy chia sẻ nó với bạn bè của bạn trên Facebook và Facebook.
Chúng tôi rất muốn nghe ý kiến từ bạn, hãy cho chúng tôi biết cách chúng tôi có thể cải thiện công việc của mình và làm cho nó tốt hơn cho bạn. Viết thư cho chúng tôi [email protected]