جدول المحتويات
في Microsoft Excel ، يعتبر العمل مع الأرقام هو الأكثر شيوعًا. في بعض الأحيان ، يتعين علينا معالجة مجموعة بيانات بكميات كبيرة من الأرقام. ولكن ، قد تجد نفسك في موقف تبدو فيه أرقامك وكأنها نص. لهذا السبب ، لا يمكنك إضافة أو طرح أو تقسيم أو ضرب أو إجراء أي نوع من العمليات. يظهر دائمًا خطأ عند محاولة القيام بذلك. في هذا البرنامج التعليمي ، سوف نعلمك كيفية تحويل النص إلى رقم في Excel باستخدام أكواد VBA مع أمثلة مناسبة ورسوم توضيحية مناسبة.
تنزيل Practice Workbook
تنزيل هذه الممارسة المصنف
تحويل النص إلى أرقام باستخدام VBA.xlsm
كيفية تحديد الأرقام المنسقة كنص
Microsoft Excel ذكي يكفي لفهم الفرق بين النص والرقم. يقوم تلقائيًا بتحويلها إلى التنسيقات الخاصة بها. ولكن ، في بعض الأحيان لا يمكنه فعل ذلك بسبب بعض سوء الاستخدام والتفسير الخاطئ لمجموعة البيانات. لهذا السبب ، فإنه يحتفظ بهذه الأرقام كنصوص في المصنف الخاص بك.
ألق نظرة على مجموعة البيانات هذه. هنا ، لدينا بعض الأرقام في عمود.
بالرغم من وجود أرقام في العمود ، إلا أنها كلها محاذية لليسار مثل النص. الآن ، انقر فوق أي خلية. ستجد هذا المربع بجانب الخلية.
الآن ، حرك مؤشر الماوس فوق المربع. بعد ذلك ، سترى هذه الرسالة.
تظهر أن الخلية منسقة كنص. بهذه الطريقة ، يمكنك التأكدسواء تم تنسيق الخلايا كنص أم لا.
3 رموز VBA لتحويل النص إلى رقم في Excel
على الرغم من أنه يمكنك بسهولة تحويل النص إلى أرقام يدويًا ، فإن هذا البرنامج التعليمي يدور حول تحويل النص إلى الرقم باستخدام رموز VBA. نوصيك بتعلم كل هذه الأساليب وتطبيقها على مجموعة البيانات الخاصة بك. بالتأكيد ، سيكون مفيدًا في الكثير من المواقف.
1. رمز VBA مع طريقة Range.NumberFormat لتحويل النص إلى رقم في Excel
هذه الطريقة بسيطة جدًا وسهلة الاستخدام على أي مجموعة بيانات. كل ما عليك فعله هو تحديد نطاق الخلايا وإدخاله في كود VBA .
📌 الخطوات
1. أولاً ، اضغط على ALT + F11 على لوحة المفاتيح لفتح محرر VBA .
2. انقر فوق إدراج & GT. الوحدة النمطية .
3. ثم اكتب الرمز التالي:
9534
4. احفظ الملف.
5. ثم اضغط على ALT + F8 . سيفتح مربع الحوار ماكرو
6. حدد ConvertTextToNumber وانقر على Run.
في النهاية ، سيحول هذا الرمز نصنا إلى أرقام.
اقرأ المزيد: كيفية تحويل سلسلة إلى رقم في Excel VBA
2. كود VBA مع Loop و CSng لتحويل النص إلى رقم
في هذه الطريقة ، نستخدم الدالتين Loop و CSng . تأخذ الوظيفة CSng بشكل أساسي أي نص كوسيطة وتحولها إلى رقم واحد. سوف تمر الحلقة الخاصة بنا عبر كل خلية من خلاياالعمود المحدد. بعد ذلك ، سنمرر قيمة كل خلية إلى وظيفة CSng لتحويلها من نص إلى رقم.
📌 الخطوات
1. أولاً ، اضغط على ALT + F11 على لوحة المفاتيح لفتح محرر VBA .
2. انقر فوق إدراج & GT. الوحدة النمطية .
3. ثم اكتب الرمز التالي:
7016
4. احفظ الملف.
5. ثم اضغط على ALT + F8 . سيفتح مربع الحوار ماكرو
6. حدد ConvertUsingLoop وانقر على تشغيل.
كما ترى ، قمنا بتحويل نصنا إلى أرقام باستخدام رمز VBA هذا .
قراءات مماثلة
- تحويل النص المجمع إلى رقم في Excel (6 طرق)
- كيفية تحويل سلسلة إلى طويلة باستخدام VBA في Excel (3 طرق)
- تحويل السلسلة إلى مضاعفة في Excel VBA (5 طرق)
- كيف لإصلاح خطأ التحويل إلى رقم في Excel (6 طرق)
3. تحويل النص إلى أرقام للنطاقات الديناميكية في Excel
الآن ، كانت الطرق السابقة للنطاقات المحددة . هذا يعني أنه يجب عليك إدخال نطاق الخلايا يدويًا في الكود. لكن في بعض الأحيان قد تكون مجموعة البيانات الخاصة بك كبيرة. في هذه الحالات ، عليك أن تتذكر نطاق الخلايا. هذه الطريقة سوف تتغلب على هذه المشكلة. نحن نعلم أن مجموعة البيانات الخاصة بنا تبدأ من الخلية B5 . لكننا لا نعرف أين يمكن أن تنتهي.
لذلك نحدد ديناميكيًا آخر صف اكسل مستخدم يحتوي على بيانات باستخدام Cells(Rows.Count, "B").End(xlUp).Row
. هو - هييُرجع آخر رقم صف غير فارغ نقوم بربطه بـ " B5: B ".
📌 الخطوات
1. أولاً ، اضغط على ALT + F11 على لوحة المفاتيح لفتح محرر VBA .
2. انقر فوق Insert & gt؛ Module .
3. ثم اكتب الرمز التالي:
3682
4. احفظ الملف.
5. ثم اضغط على ALT + F8 . سيفتح مربع الحوار ماكرو
6. ثم حدد ConvertDynamicRanges وانقر على تشغيل.
كما ترى ، نجحنا في تحويل النص إلى أرقام باستخدام رموز VBA.
💬 أشياء يجب تذكرها
✎ هنا ، نستخدم العمود B لمجموعة البيانات الخاصة بنا. إذا كانت بياناتك موجودة في عمود مختلف ، فقم بتغيير نطاق الخلايا في رموز VBA وفقًا لذلك.
✎ ستعمل رموز VBA فقط على الورقة النشطة.
الخاتمة
في الختام ، آمل أن يكون هذا البرنامج التعليمي قد زودك بجزء من المعرفة المفيدة حول تحويل النص إلى رقم في Excel باستخدام أكواد VBA. نوصيك بمعرفة كل هذه الإرشادات وتطبيقها على مجموعة البيانات الخاصة بك. قم بتنزيل كتيب التدريب وجربها بنفسك. أيضًا ، لا تتردد في تقديم ملاحظات في قسم التعليقات. ملاحظاتك القيمة تحفزنا على إنشاء برامج تعليمية مثل هذه. لا تنس التحقق من موقعنا على الويب Exceldemy.com للتعرف على المشكلات والحلول المختلفة المتعلقة ببرنامج Excel.