Microsoft Excel-д тоонуудтай ажиллах нь хамгийн түгээмэл байдаг. Заримдаа бид их хэмжээний тоо бүхий өгөгдлийн багцыг боловсруулах хэрэгтэй болдог. Гэхдээ таны дугаарууд текст шиг харагдах нөхцөл байдалд та өөрийгөө олж магадгүй юм. Энэ шалтгааны улмаас та нэмэх, хасах, хуваах, үржүүлэх, ямар ч төрлийн үйлдлийг хийх боломжгүй. Үүнийг хийх гэж оролдох үед энэ нь үргэлж алдаа харуулдаг. Энэ зааварт бид VBA кодыг ашиглан Excel-д текстийг тоо руу хэрхэн хөрвүүлэхийг тохирох жишээнүүд болон зөв дүрслэлээр заах болно.

Дадлага хийх номыг татаж авах

Энэ дадлыг татаж авах ажлын ном

VBA.xlsm ашиглан текстийг тоо болгон хөрвүүлэх

Текст хэлбэрээр форматлагдсан тоог хэрхэн тодорхойлох вэ

Microsoft Excel бол ухаалаг Текст ба тоо хоёрын ялгааг ойлгоход хангалттай. Энэ нь тэдгээрийг автоматаар өөр өөр формат руу хөрвүүлдэг. Гэхдээ заримдаа өгөгдлийн багцыг буруу ашиглах, буруу тайлбарласнаас болж үүнийг хийх боломжгүй байдаг. Ийм учраас энэ тоонуудыг таны ажлын дэвтэрт бичвэр болгон хадгалдаг.

Энэ мэдээллийн багцыг харна уу. Энд бид баганад хэдэн тоо байна.

Хэдийгээр баганад тоонууд байгаа ч тэдгээр нь бүгд текст шиг зүүн тийш зэрэгцсэн байна. Одоо дурын нүдэн дээр дарна уу. Та нүдний хажууд байгаа энэ хайрцгийг олох болно.

Одоо хулганы курсорыг нүдэн дээр байрлуул. Үүний дараа та энэ мессежийг харах болно.

Энэ нь нүдийг текст хэлбэрээр форматласан болохыг харуулж байна. Ийм байдлаар та итгэлтэй байж чаднанүднүүд нь текст хэлбэрээр форматлагдсан эсэхээс үл хамааран.

Excel дээр текстийг тоо болгон хөрвүүлэх 3 VBA код

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

1. Excel дээр текстийг тоо болгон хөрвүүлэх Range.NumberFormat арга бүхий VBA код

Энэ арга нь маш энгийн бөгөөд хэрэглэхэд хялбар арга юм. дурын өгөгдлийн багц дээр. Та хийх ёстой зүйл бол нүдний мужийг сонгоод VBA код -д оруулахад л хангалттай.

📌 Алхам

1. Эхлээд ALT+F11 товчлуурыг дарж VBA засварлагч -г нээнэ үү.

2. Insert > Модуль .

3. Дараа нь дараах кодыг бичнэ үү:

6318

4. Файлыг хадгал.

5. Дараа нь ALT+F8 товчийг дарна уу. Энэ нь Макро харилцах цонхыг нээнэ.

6. TextToNumber хөрвүүлэх -г сонгоод Run дээр дарна уу.

Эцэст нь энэ код нь бидний текстийг тоо болгон хувиргах болно.

Дэлгэрэнгүй унших: Excel-д мөрийг тоо болгон хөрвүүлэх арга VBA

2. Текстийг тоо болгон хөрвүүлэхийн тулд гогцоо болон CSng бүхий VBA код

Энэ аргад бид Loop болон CSng функцуудыг ашиглаж байна. CSng функц нь үндсэндээ дурын текстийг аргумент болгон авч нэг тоо болгон хувиргадаг. Бидний гогцоо нь нүд бүрээр дамжих болносонгосон багана. Үүний дараа бид нүд бүрийн утгыг текстээс тоо руу хөрвүүлэхийн тулд CSng функц руу шилжүүлнэ.

📌 Алхам

1. Эхлээд ALT+F11 товчлуурыг дарж VBA засварлагч -г нээнэ үү.

2. Insert > Модуль .

3. Дараа нь дараах кодыг бичнэ үү:

4514

4. Файлыг хадгал.

5. Дараа нь ALT+F8 товчийг дарна уу. Энэ нь Макро харилцах цонхыг нээнэ.

6. ConvertUsingLoop -г сонгоод Run дээр дарна уу.

Таны харж байгаагаар бид энэ VBA кодыг ашиглан текстээ тоо болгон хөрвүүлсэн. .

Ижил төстэй уншилтууд

• Excel дээр текстийг тоо болгон хувиргах (6 арга)
• Excel дээр VBA ашиглан мөрийг хэрхэн урт болгон хөрвүүлэх вэ (3 арга)
• Excel дээр мөрийг давхар болгон хөрвүүлэх VBA (5 арга)
• Хэрхэн Excel-ийн тоо руу хөрвүүлэх алдааг засах (6 арга)

3. Excel-ийн динамик мужид зориулж текстийг тоо болгон хөрвүүлэх

Одоо өмнөх аргууд нь сонгосон мужуудад зориулагдсан байсан. . Энэ нь та кодын нүднүүдийн мужийг гараар оруулах ёстой гэсэн үг юм. Гэхдээ заримдаа таны өгөгдлийн багц том байж болно. Энэ тохиолдолд та эсийн хүрээг санах хэрэгтэй. Энэ арга нь энэ асуудлыг даван туулах болно. Манай мэдээллийн багц В5 нүднээс эхэлдэг гэдгийг бид мэднэ. Гэхдээ энэ нь хаана дуусахыг бид мэдэхгүй байна.

Тиймээс бид Cells(Rows.Count, "B").End(xlUp).Row -г ашиглан хамгийн сүүлд ашигласан Excel мөрийг динамикаар тодорхойлно. Энэ" B5:B "-тай холбож байгаа сүүлчийн хоосон бус мөрийн дугаарыг буцаана.

📌 Алхам

1. Эхлээд ALT+F11 товчлуурыг дарж VBA засварлагч -г нээнэ үү.

2. Оруулах > Модуль дээр дарна уу.

3. Дараа нь дараах кодыг бичнэ үү:

2422

4. Файлыг хадгал.

5. Дараа нь ALT+F8 товчийг дарна уу. Энэ нь Макро харилцах цонхыг нээнэ.

6. Дараа нь ConvertDynamicRanges -г сонгоод Run дээр дарна уу.

Таны харж байгаагаар бид текстийг тоо болгон хөрвүүлэх ажлыг амжилттай хийж байна. VBA кодууд.

💬 Санах ёстой зүйлс

✎ Энд бид өгөгдлийн багцдаа В баганыг ашиглаж байна. Хэрэв таны өгөгдөл өөр баганад байгаа бол VBA кодын нүднүүдийн мужийг өөрчилнө үү.

✎ VBA кодууд зөвхөн идэвхтэй хуудсан дээр ажиллана.

Дүгнэлт

Эцэст нь хэлэхэд, энэ заавар нь танд VBA кодыг ашиглан Excel дээр текстийг тоо болгон хөрвүүлэх талаар хэрэгтэй мэдлэгийг өгсөн гэж найдаж байна. Бид танд эдгээр бүх зааврыг сурч, дата багцдаа хэрэгжүүлэхийг зөвлөж байна. Дадлага хийх ажлын номыг татаж аваад өөрөө туршиж үзээрэй. Мөн коммент хэсэгт санал хүсэлтээ үлдээгээрэй. Таны үнэ цэнэтэй санал хүсэлт биднийг ийм хичээлүүдийг бий болгох урам зоригийг өгдөг. Манай Exceldemy.com вэбсайтаас Excel-тэй холбоотой янз бүрийн асуудал, шийдлүүдийг шалгахаа бүү мартаарай.