როგორ გადავიტანოთ ტექსტი რიცხვად Excel VBA-ით (3 მაგალითი მაკროებით)

  • გააზიარეთ ეს
Hugh West

Microsoft Excel-ში ციფრებთან მუშაობა ყველაზე გავრცელებულია. ზოგჯერ, ჩვენ გვიწევს მონაცემთა ნაკრების დამუშავება რიცხვების დიდი რაოდენობით. მაგრამ, შეიძლება აღმოჩნდეთ სიტუაციაში, როდესაც თქვენი ნომრები ტექსტს ჰგავს. ამ მიზეზით, თქვენ არ შეგიძლიათ დაამატოთ, გამოკლოთ, გაყოთ, გაამრავლოთ ან შეასრულოთ რაიმე სახის ოპერაცია. ყოველთვის აჩვენებს შეცდომას, როდესაც თქვენ ცდილობთ ამის გაკეთებას. ამ სახელმძღვანელოში ჩვენ გასწავლით, თუ როგორ გადაიყვანოთ ტექსტი რიცხვად Excel-ში VBA კოდების გამოყენებით, შესაბამისი მაგალითებითა და სათანადო ილუსტრაციებით.

ჩამოტვირთეთ პრაქტიკის სამუშაო წიგნი

ჩამოტვირთეთ ეს პრაქტიკა სამუშაო წიგნი

ტექსტის გადაქცევა რიცხვებად VBA.xlsm-ის გამოყენებით

როგორ ამოვიცნოთ ტექსტად ფორმატირებული ნომრები

Microsoft Excel არის ჭკვიანი საკმარისია ტექსტსა და რიცხვს შორის სხვაობის გასაგებად. ის ავტომატურად გარდაქმნის მათ შესაბამის ფორმატებში. მაგრამ, ზოგჯერ მას არ შეუძლია ამის გაკეთება მონაცემთა ნაკრების არასწორი გამოყენებისა და არასწორი ინტერპრეტაციის გამო. ამ მიზეზით, ის ინახავს ამ ციფრებს, როგორც ტექსტებს თქვენს სამუშაო წიგნში.

შეხედეთ ამ მონაცემთა ბაზას. აქ, ჩვენ გვაქვს რამდენიმე რიცხვი სვეტში.

მიუხედავად იმისა, რომ ჩვენ გვაქვს რიცხვები სვეტში, ისინი ყველა მარცხნივ არის გასწორებული, როგორც ტექსტი. ახლა დააწკაპუნეთ ნებისმიერ უჯრედზე. თქვენ ნახავთ ამ უჯრას უჯრედის გვერდით.

ახლა გადაიტანეთ მაუსის კურსორი უჯრაზე. ამის შემდეგ ნახავთ ამ შეტყობინებას.

ეს გვიჩვენებს, რომ უჯრედი დაფორმატებულია ტექსტად. ამ გზით შეგიძლიათ დარწმუნებული იყოთარის თუ არა უჯრედები ფორმატირებული ტექსტად თუ არა.

3 VBA კოდი ტექსტის რიცხვად გადასაყვანად Excel-ში

მიუხედავად იმისა, რომ თქვენ შეგიძლიათ მარტივად გადაიყვანოთ ტექსტი რიცხვებად, ეს სახელმძღვანელო ეხება ტექსტის გადაქცევას ნომერი VBA კოდების გამოყენებით. ჩვენ გირჩევთ ისწავლოთ და გამოიყენოთ ყველა ეს მეთოდი თქვენს მონაცემთა ბაზაში. რა თქმა უნდა, ის ბევრ სიტუაციაში გამოდგება.

1. VBA კოდი Range.NumberFormat მეთოდით ტექსტის რიცხვად გადასაყვანად Excel-ში

ეს მეთოდი საკმაოდ მარტივი და მარტივი გამოსაყენებელია. ნებისმიერ მონაცემთა ბაზაზე. საკმარისია აირჩიოთ უჯრედების დიაპაზონი და ჩასვათ ის VBA კოდში .

📌 ნაბიჯები

1. პირველ რიგში, დააჭირეთ ALT+F11 თქვენს კლავიატურაზე, რათა გახსნათ VBA რედაქტორი .

2. დააწკაპუნეთ ჩასმა > მოდული .

3. შემდეგ ჩაწერეთ შემდეგი კოდი:

1810

4. შეინახეთ ფაილი.

5. შემდეგ დააჭირეთ ALT+F8 . ის გახსნის Macro დიალოგურ ველს.

6. აირჩიეთ ConvertTextToNumber და დააწკაპუნეთ Run.

ბოლოს, ეს კოდი გადააქცევს ჩვენს ტექსტს რიცხვებად.

დაწვრილებით: როგორ გადავიყვანოთ სტრიქონი რიცხვად Excel VBA-ში

2. VBA კოდი Loop-ით და CSng ტექსტის რიცხვად გადასაყვანად

ამ მეთოდში ჩვენ ვიყენებთ Loop და CSng ფუნქციებს. ფუნქცია CSng ძირითადად იღებს ნებისმიერ ტექსტს არგუმენტად და გარდაქმნის მას ერთ რიცხვად. ჩვენი მარყუჟი გაივლის თითოეულ უჯრედსარჩეული სვეტი. ამის შემდეგ, თითოეული უჯრედის მნიშვნელობას გადავცემთ CSng ფუნქციას, რათა ის ტექსტიდან რიცხვად გადაიყვანოთ.

📌 ნაბიჯები

1. პირველ რიგში, დააჭირეთ ALT+F11 თქვენს კლავიატურაზე, რათა გახსნათ VBA რედაქტორი .

2. დააწკაპუნეთ ჩასმა > მოდული .

3. შემდეგ ჩაწერეთ შემდეგი კოდი:

5718

4. შეინახეთ ფაილი.

5. შემდეგ დააჭირეთ ALT+F8 . ის გახსნის მაკრო დიალოგურ ფანჯარას.

6. აირჩიეთ ConvertUsingLoop და დააწკაპუნეთ Run.

როგორც ხედავთ, ჩვენ გადავაქციეთ ჩვენი ტექსტი რიცხვებად ამ VBA კოდის გამოყენებით .

მსგავსი წაკითხვები

  • ტექსტის ნაყარი გადაქცევა რიცხვად Excel-ში (6 გზა)
  • როგორ გადაიყვანოთ სტრიქონი გრძელზე VBA-ში Excel-ში (3 გზა)
  • სტრიქონი ორმაგად გადაიყვანოთ Excel VBA-ში (5 მეთოდი)
  • როგორ Excel-ში რიცხვით გადაყვანის შეცდომის გამოსწორება (6 მეთოდი)

3. ტექსტის გადაქცევა რიცხვებად დინამიური დიაპაზონებისთვის Excel-ში

ახლა, წინა მეთოდები იყო არჩეული დიაპაზონებისთვის . ეს ნიშნავს, რომ თქვენ ხელით უნდა შეიყვანოთ თქვენი უჯრედების დიაპაზონი კოდში. მაგრამ ზოგჯერ თქვენი მონაცემთა ნაკრები შეიძლება იყოს დიდი. ამ შემთხვევაში, თქვენ უნდა გახსოვდეთ უჯრედების დიაპაზონი. ეს მეთოდი ამ პრობლემას გადალახავს. ვიცით, რომ ჩვენი მონაცემთა ნაკრები იწყება Cell B5 -დან. მაგრამ ჩვენ არ ვიცით სად შეიძლება დასრულდეს იგი.

ასე რომ, ჩვენ დინამიურად ვიდენტიფიცირებთ ბოლო გამოყენებული excel მწკრივს, რომელსაც აქვს მონაცემები Cells(Rows.Count, "B").End(xlUp).Row გამოყენებით. ისაბრუნებს ბოლო არაცარიელ მწკრივის ნომერს, რომელსაც ვუკავშირებთ „ B5:B “.

📌 ნაბიჯები

1. პირველ რიგში, დააჭირეთ ALT+F11 თქვენს კლავიატურაზე, რათა გახსნათ VBA რედაქტორი .

2. დააწკაპუნეთ ჩასმა > მოდული .

3. შემდეგ ჩაწერეთ შემდეგი კოდი:

8242

4. შეინახეთ ფაილი.

5. შემდეგ დააჭირეთ ALT+F8 . ის გახსნის მაკრო დიალოგურ ველს.

6. შემდეგ აირჩიეთ ConvertDynamicRanges და დააწკაპუნეთ Run.

როგორც ხედავთ, ჩვენ წარმატებით ვაკეთებთ ტექსტის რიცხვებად გადაქცევას VBA კოდები.

💬 დასამახსოვრებელი რამ

✎ აქ ჩვენ ვიყენებთ B სვეტს ჩვენი მონაცემთა ნაკრებისთვის. თუ თქვენი მონაცემები სხვა სვეტშია, შესაბამისად შეცვალეთ უჯრედების დიაპაზონი VBA კოდებში.

✎ VBA კოდები იმუშავებს მხოლოდ აქტიურ ფურცელზე.

დასკვნა

დასასრულს, ვიმედოვნებ, რომ ამ გაკვეთილმა მოგაწოდეთ სასარგებლო ცოდნა Excel-ში ტექსტის რიცხვად გადაქცევის შესახებ VBA კოდების გამოყენებით. ჩვენ გირჩევთ ისწავლოთ და გამოიყენოთ ყველა ეს ინსტრუქცია თქვენს მონაცემთა ბაზაში. ჩამოტვირთეთ სავარჯიშო სამუშაო წიგნი და სცადეთ ისინი თავად. ასევე, მოგერიდებათ გამოხმაუროთ კომენტარების განყოფილებაში. თქვენი ღირებული გამოხმაურება გვაძლევს მოტივაციას მსგავსი გაკვეთილების შესაქმნელად. არ დაგავიწყდეთ შეამოწმოთ ჩვენი ვებ-გვერდი Exceldemy.com Excel-თან დაკავშირებული სხვადასხვა პრობლემებისა და გადაწყვეტილებებისთვის.

ჰიუ ვესტი არის Excel-ის ძალიან გამოცდილი ტრენერი და ანალიტიკოსი, რომელსაც აქვს 10 წელზე მეტი გამოცდილება ინდუსტრიაში. მას აქვს ბაკალავრის ხარისხი ბუღალტერიასა და ფინანსებში და მაგისტრის ხარისხი ბიზნესის ადმინისტრირებაში. ჰიუს აქვს სწავლების გატაცება და შეიმუშავა სწავლების უნიკალური მიდგომა, რომელიც ადვილად გასაგები და გასაგებია. მისი ექსპერტი Excel-ის ცოდნა დაეხმარა ათასობით სტუდენტს და პროფესიონალს მთელს მსოფლიოში, გაეუმჯობესებინათ თავიანთი უნარები და გამოირჩეოდნენ თავიანთ კარიერაში. თავისი ბლოგის საშუალებით, ჰიუ უზიარებს თავის ცოდნას მსოფლიოს, სთავაზობს უფასო Excel გაკვეთილებს და ონლაინ ტრენინგებს, რათა დაეხმაროს ინდივიდებსა და ბიზნესს თავიანთი პოტენციალის სრულად მიღწევაში.