Преобразувайте отрицателни стойности, третирани като текст, с помощта на VBA в Microsoft Excel

Anonim

В тази статия ще създадем персонализирана функция за преобразуване на отрицателни низове в цяло число.

Суровите данни за тази статия се състоят от низове, последвани от знак минус (-).

Искаме да преобразуваме тези низове в цели числа.

Логично обяснение

В тази статия създадохме персонализирана функция ConvertNegNumbers за преобразуване на низ в цяло число. Тази функция приема низова стойност като вход и връща цяло число като изход.

Обяснение на кода

Вдясно (Var, 1) = "-"

Горният код се използва за проверка дали последният знак на низ е равен на знак минус (-).

ConvertNegNumbers = CInt (" -" & Ляво (Var, Len (Var) - 1))

В горния код лявата функция се използва за извличане на всички знаци в низа, с изключение на последния. Функцията CInt се използва за преобразуване на низова стойност в цяло число.

Моля, следвайте кода по -долу

 Опция Изрична функция ConvertNegNumbers (Var As String) 'Проверка дали последният знак в низа е минус (-) If Right (Var, 1) = "-" Тогава "Преобразуване на низова стойност в отрицателно цяло число ConvertNegNumbers = CInt ("-"& Left (Var, Len (Var) - 1)) Друго 'Конвертиране на стойност на низ в цяло число ConvertNegNumbers = CInt (Var) End If End Функция 

Ако този блог ви е харесал, споделете го с приятелите си във Facebook. Също така можете да ни следвате в Twitter и Facebook.

Ще се радваме да чуем от вас, уведомете ни как можем да подобрим работата си и да я направим по -добра за вас. Пишете ни на имейл сайта