Преобразовать отрицательные значения рассматриваются как текст с помощью VBA в Microsoft Excel
В этой статье мы создадим пользовательскую функцию для преобразования отрицательных строк в целое число.
Исходные данные для этой статьи состоят из строк, за которыми стоит знак минус (-).
Мы хотим преобразовать эти строки в целые числа.
Логическое объяснение
В этой статье мы создали пользовательскую функцию ConvertNegNumbers для преобразования строки в целое число. Эта функция принимает строковое значение в качестве ввода и возвращает целое число в качестве вывода.
Объяснение кода
Right (Var, 1) = «-«
Приведенный выше код используется для проверки того, равен ли последний символ строки знаку минус (-).
ConvertNegNumbers = CInt («-» & Left (Var, Len (Var) — 1))
В приведенном выше коде левая функция используется для извлечения всех символов в строке, кроме последнего. Функция CInt используется для преобразования строкового значения в целое число.
Пожалуйста, введите код ниже
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
Если вам понравился этот блог, поделитесь им с друзьями на Facebook и Facebook.
Мы будем рады услышать от вас, дайте нам знать, как мы можем улучшить нашу работу и сделать ее лучше для вас. Напишите нам на [email protected]