Microsoft Excel-də nömrələrlə işləmək daha çox yayılmışdır. Bəzən çoxlu sayda rəqəmləri olan verilənlər toplusunu emal etməli oluruq. Ancaq nömrələrinizin mətn kimi göründüyü bir vəziyyətdə özünüzü tapa bilərsiniz. Bu səbəbdən əlavə edə, çıxa, bölməyə, vura və ya hər hansı bir əməliyyat həyata keçirə bilməzsiniz. Bunu etməyə çalışdığınız zaman həmişə səhv göstərir. Bu dərslikdə biz sizə Excel-də VBA kodlarından istifadə edərək mətni rəqəmə çevirməyi öyrədəcəyik.

Təcrübə İş Kitabını endirin

Bu təcrübəni endirin iş dəftəri

VBA.xlsm istifadə edərək mətni rəqəmlərə çevirin

Mətn kimi formatlaşdırılmış nömrələri necə müəyyən etmək olar

Microsoft Excel ağıllıdır Mətn və Rəqəm arasındakı fərqi başa düşmək üçün kifayətdir. Onları avtomatik olaraq müvafiq formatlarına çevirir. Lakin, bəzən verilənlər bazasından bəzi sui-istifadə və yanlış şərhlər səbəbindən bunu edə bilmir. Bu səbəbdən o, həmin nömrələri iş dəftərinizdə mətn kimi saxlayır.

Bu verilənlər bazasına nəzər salın. Burada sütunda bəzi rəqəmlər var.

Sütunda rəqəmlər olsa da, onların hamısı mətn kimi sola yığılıb. İndi istənilən xananı vurun. Siz bu xananı xananın yanında tapacaqsınız.

İndi siçan kursorunu qutunun üzərinə gətirin. Bundan sonra siz bu mesajı görəcəksiniz.

Bu, xananın mətn kimi formatlandığını göstərir. Bu şəkildə əmin ola bilərsinizxanaların mətn kimi formatlaşdırılıb-formatlaşdırılmamasından asılı olmayaraq.

Excel-də Mətni Rəqəmlərə Çevirmək üçün 3 VBA Kodu

Mətni asanlıqla rəqəmlərə əl ilə çevirə bilsəniz də, bu dərslik mətni mətnə ​​çevirməkdən ibarətdir. VBA kodlarından istifadə edərək nömrə. Bütün bu üsulları öyrənib məlumat dəstinizə tətbiq etməyi tövsiyə edirik. Şübhəsiz ki, bu, bir çox hallarda faydalı olacaq.

1. Excel-də mətni rəqəmə çevirmək üçün Range.NumberFormat metodu ilə VBA kodu

Bu üsul olduqca sadə və istifadəsi asandır. istənilən verilənlər bazasında. Sizə lazım olan tək şey xanaların diapazonunu seçmək və onu VBA koduna daxil etməkdir.

📌 Addımlar

1. Əvvəlcə VBA redaktorunu açmaq üçün klaviaturada ALT+F11 düymələrini basın.

2. Daxil et > Modul .

3. Sonra aşağıdakı kodu daxil edin:

9909

4. Faylı yadda saxlayın.

5. Sonra ALT+F8 düyməsini basın. O, Makro dialoq qutusunu açacaq.

6. MətniNömrəyə Dönüştür seçin və Çalışdır düyməsini basın.

Sonunda bu kod mətnimizi rəqəmlərə çevirəcək.

Ətraflı oxuyun: Excel-də sətiri nömrəyə necə çevirmək olar VBA

2. Mətni Rəqəmə çevirmək üçün Döngü və CSng ilə VBA Kodu

Bu üsulda biz Loop və CSng funksiyalarından istifadə edirik. CSng funksiyası əsasən hər hansı mətni arqument kimi götürür və onu tək ədədə çevirir. Döngəmiz hər bir hüceyrədən keçəcəkseçilmiş sütun. Bundan sonra hər bir xananın dəyərini mətndən rəqəmə çevirmək üçün onu CSng funksiyasına keçirəcəyik.

📌 Addımlar

1. Əvvəlcə VBA redaktorunu açmaq üçün klaviaturada ALT+F11 düymələrini basın.

2. Daxil et > Modul .

3. Sonra aşağıdakı kodu daxil edin:

1540

4. Faylı yadda saxlayın.

5. Sonra ALT+F8 düyməsini basın. O, Makro dialoq qutusunu açacaq.

6. ConvertUsingLoop seçin və Run üzərinə klikləyin.

Gördüyünüz kimi bu VBA kodundan istifadə edərək mətnimizi rəqəmlərə çevirdik. .

Oxşar oxunuşlar

• Excel-də toplu mətni rəqəmə çevirin (6 üsul)
• Excel-də VBA-dan istifadə edərək sətri uzunluğa necə çevirmək olar (3 üsul)
• Excel VBA-da sətri ikiqat hala çevirmək (5 üsul)
• Necə Excel-də Nömrəyə çevirmə xətasını düzəltmək (6 üsul)

3. Excel-də dinamik diapazonlar üçün mətni rəqəmlərə çevirmək

İndi əvvəlki üsullar seçilmiş diapazonlar üçün idi. . Bu o deməkdir ki, siz kodda xana diapazonunuzu əl ilə daxil etməlisiniz. Ancaq bəzən məlumat dəstiniz böyük ola bilər. Bu hallarda, hüceyrələrin diapazonunu yadda saxlamalısınız. Bu üsul bu problemi aradan qaldıracaq. Məlumat dəstimizin B5 xanasından başladığını bilirik. Amma bunun harda bitəcəyini bilmirik.

Beləliklə, Cells(Rows.Count, "B").End(xlUp).Row istifadə edərək, içərisində verilənləri olan sonuncu istifadə edilmiş excel cərgəsini dinamik olaraq müəyyən edirik. O“ B5:B “ ilə birləşdirdiyimiz sonuncu boş olmayan sıra nömrəsini qaytarır.

📌 Addımlar

1. Əvvəlcə VBA redaktorunu açmaq üçün klaviaturada ALT+F11 düymələrini basın.

2. Daxil et > Modulu üzərinə klikləyin.

3. Sonra aşağıdakı kodu daxil edin:

6737

4. Faylı yadda saxlayın.

5. Sonra ALT+F8 düyməsini basın. O, Makro dialoq qutusunu açacaq.

6. Sonra ConvertDynamicRanges seçin və Çalışdır üzərinə klikləyin.

Gördüyünüz kimi, biz mətni rəqəmlərə çevirməkdə uğur qazanırıq. VBA kodları.

💬 Xatırlamalı Olanlar

✎ Burada verilənlər bazamız üçün B sütunundan istifadə edirik. Məlumatlarınız başqa sütundadırsa, VBA kodlarındakı xanaların diapazonunu müvafiq olaraq dəyişdirin.

✎ VBA kodları yalnız aktiv vərəqdə işləyəcək.

Nəticə

Yekun olaraq ümid edirəm ki, bu dərslik VBA kodlarından istifadə edərək Excel-də mətni nömrəyə çevirmək haqqında sizə faydalı biliklər verdi. Bütün bu təlimatları öyrənib məlumat dəstinizə tətbiq etməyi tövsiyə edirik. Təcrübə iş kitabını yükləyin və bunları özünüz sınayın. Həmçinin, şərh bölməsində rəy bildirməkdən çekinmeyin. Dəyərli rəyiniz bizi bu cür dərsliklər yaratmaq üçün motivasiya edir. Excel ilə əlaqəli müxtəlif problemlər və həllər üçün Exceldemy.com vebsaytımızı yoxlamağı unutmayın.