У Microsoft Excel найбольш распаўсюджана праца з лічбамі. Часам нам даводзіцца апрацоўваць набор даных з вялікай колькасцю лікаў. Але вы можаце апынуцца ў сітуацыі, калі вашы лічбы выглядаюць як тэкст. Па гэтай прычыне вы не можаце складаць, аднімаць, дзяліць, памнажаць або выконваць якія-небудзь дзеянні. Ён заўсёды паказвае памылку, калі вы спрабуеце зрабіць гэта. У гэтым уроку мы навучым вас, як пераўтвараць тэкст у лік у Excel з дапамогай кодаў VBA з адпаведнымі прыкладамі і належнымі ілюстрацыямі.

Спампаваць практыкавальны сшытак

Спампаваць гэтую практыку працоўны сшытак

Пераўтварэнне тэксту ў лічбы з дапамогай VBA.xlsm

Як ідэнтыфікаваць лічбы ў тэкставым фармаце

Microsoft Excel разумны дастаткова, каб зразумець розніцу паміж Тэкстам і Лікам. Ён аўтаматычна пераўтворыць іх у адпаведныя фарматы. Але часам ён не можа гэтага зрабіць з-за няправільнага выкарыстання і няправільнай інтэрпрэтацыі набору даных. Па гэтай прычыне ён захоўвае гэтыя лічбы як тэкст у вашай працоўнай кніжцы.

Зірніце на гэты набор даных. Тут у нас ёсць некалькі лічбаў у слупку.

Хоць у нас ёсць лічбы ў слупку, усе яны выраўнаваны па левым краі, як і тэкст. Цяпер пстрыкніце любую ячэйку. Вы знойдзеце гэта поле побач з ячэйкай.

Цяпер навядзіце курсор мышы на поле. Пасля гэтага вы ўбачыце гэта паведамленне.

Яно паказвае, што ячэйка адфарматавана як тэкст. Такім чынам, вы можаце быць упэўненынезалежна ад таго, адфарматаваны ячэйкі як тэкст ці не.

3 коды VBA для пераўтварэння тэксту ў лік у Excel

Хоць вы можаце лёгка пераўтварыць тэкст у лікі ўручную, гэты падручнік прысвечаны пераўтварэнню тэксту ў нумар з дапамогай кодаў VBA. Мы рэкамендуем вам вывучыць і прымяніць усе гэтыя метады да вашага набору даных. Безумоўна, ён спатрэбіцца ў многіх сітуацыях.

1. Код VBA з метадам Range.NumberFormat для пераўтварэння тэксту ў лік у Excel

Гэты метад даволі просты і лёгкі ў выкарыстанні на любы набор дадзеных. Усё, што вам трэба зрабіць, гэта выбраць дыяпазон ячэек і ўставіць яго ў код VBA .

📌 Крокі

1. Спачатку націсніце ALT+F11 на клавіятуры, каб адкрыць рэдактар ​​VBA .

2. Націсніце Уставіць > Модуль .

3. Затым увядзіце наступны код:

1419

4. Захавайце файл.

5. Затым націсніце ALT+F8 . Адкрыецца дыялогавае акно Макрас .

6. Выберыце ConvertTextToNumber і націсніце Выканаць.

У рэшце рэшт гэты код пераўтворыць наш тэкст у лічбы.

Дадатковая інфармацыя: Як пераўтварыць радок у лік у Excel VBA

2. Код VBA з цыклам і CSng для пераўтварэння тэксту ў лік

У гэтым метадзе мы выкарыстоўваем функцыі Loop і CSng . Функцыя CSng у асноўным прымае любы тэкст у якасці аргумента і пераўтварае яго ў адзін лік. Наша пятля пройдзе праз кожную клеткувыбраны слупок. Пасля гэтага мы перададзім значэнне кожнай ячэйкі ў CSng функцыю, каб пераўтварыць яго з тэксту ў лік.

📌 Крокі

1. Спачатку націсніце ALT+F11 на клавіятуры, каб адкрыць рэдактар ​​VBA .

2. Націсніце Уставіць > Модуль .

3. Затым увядзіце наступны код:

4391

4. Захавайце файл.

5. Затым націсніце ALT+F8 . Адкрыецца дыялогавае акно Макрас .

6. Выберыце ConvertUsingLoop і націсніце Выканаць.

Як бачыце, мы пераўтварылі наш тэкст у лічбы з дапамогай гэтага кода VBA .

Падобныя паказанні

• Масавае пераўтварэнне тэксту ў лік у Excel (6 спосабаў)
• Як пераўтварыць радок у доўгі з дапамогай VBA ў Excel (3 спосабы)
• Пераўтварыць радок у падвойны ў Excel VBA (5 метадаў)
• Як каб выправіць памылку пераўтварэння ў лік у Excel (6 метадаў)

3. Пераўтварыце тэкст у лічбы для дынамічных дыяпазонаў у Excel

Цяпер папярэднія метады былі для выбраных дыяпазонаў . Гэта азначае, што вы павінны ўручную ўвесці дыяпазон вочак у код. Але часам ваш набор даных можа быць вялікім. У такіх выпадках вам трэба запомніць дыяпазон вочак. Гэты метад дазволіць пераадолець гэтую праблему. Мы ведаем, што наш набор даных пачынаецца з ячэйкі B5 . Але мы не ведаем, дзе гэта можа скончыцца.

Такім чынам, мы дынамічна ідэнтыфікуем апошні выкарыстаны радок excel, які змяшчае дадзеныя, выкарыстоўваючы Cells(Rows.Count, "B").End(xlUp).Row . Гэтавяртае апошні непусты нумар радка, які мы злучаем з « B5:B ».

📌 Крокі

1. Спачатку націсніце ALT+F11 на клавіятуры, каб адкрыць рэдактар ​​VBA .

2. Націсніце на Уставіць > Модуль .

3. Затым увядзіце наступны код:

5624

4. Захавайце файл.

5. Затым націсніце ALT+F8 . Адкрыецца дыялогавае акно Макрас .

6. Затым выберыце ConvertDynamicRanges і націсніце Выканаць.

Як бачыце, нам удалося пераўтварыць тэкст у лічбы з дапамогай Коды VBA.

💬 Што трэба памятаць

✎ Тут мы выкарыстоўваем слупок B для нашага набору даных. Калі вашы даныя знаходзяцца ў іншым слупку, адпаведна змяніце дыяпазон ячэек у кодах VBA.

✎ Коды VBA будуць працаваць толькі на актыўным аркушы.

Выснова

У заключэнне я спадзяюся, што гэты падручнік даў вам карысныя веды аб пераўтварэнні тэксту ў лік у Excel з дапамогай кодаў VBA. Мы рэкамендуем вам вывучыць і прымяніць усе гэтыя інструкцыі да вашага набору даных. Спампуйце вучэбны сшытак і паспрабуйце самі. Таксама не саромейцеся пакідаць водгукі ў раздзеле каментарыяў. Вашы каштоўныя водгукі трымаюць нас у матывацыі ствараць такія падручнікі. Не забудзьцеся праверыць наш вэб-сайт Exceldemy.com для розных праблем і рашэнняў, звязаных з Excel.