Претворите негативне вредности третиране као текст помоћу ВБА у Мицрософт Екцелу

Anonim

У овом чланку ћемо креирати прилагођену функцију за претварање негативних низова у цео број.

Сирови подаци за овај чланак састоје се од низова иза којих следи знак минус (-).

Желимо да ове низове претворимо у целе бројеве.

Логичко објашњење

У овом чланку смо креирали прилагођену функцију ЦонвертНегНумберс за претварање низа у цео број. Ова функција узима вриједност низа као улаз и враћа цијели број као излаз.

Објашњење кода

Десно (Вар, 1) = "-"

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

ЦонвертНегНумберс = ЦИнт (" -" & Лево (Вар, Лен (Вар) - 1))

У горњем коду, лева функција се користи за издвајање свих знакова у низу, осим последњег. Функција ЦИнт се користи за претварање вредности низа у цео број.

Молимо следите доле за код

 Опција Експлицитна функција ЦонвертНегНумберс (Вар Ас Стринг) 'Провера да ли је последњи знак у низу минус (-) Иф Ригхт (Вар, 1) = "-" Тхен' Претварање вредности низа у негативан цео број ЦонвертНегНумберс = ЦИнт ("-" & Лефт (Вар, Лен (Вар) - 1)) Елсе 'Претварање вредности низа у цео број ЦонвертНегНумберс = ЦИнт (Вар) Енд Иф Енд Функција 

Ако вам се допао овај блог, поделите га са пријатељима на Фацебооку. Такође, можете нас пратити на Твиттер -у и Фацебоок -у.

Волели бисмо да чујемо од вас, јавите нам како можемо побољшати наш рад и учинити га бољим за вас. Пишите нам на веб локацији е -поште