اذهب الي المحتوي
أوفيسنا

متغير مرفوع لأس رقمي ؟؟؟


الردود الموصى بها

السلام عليكم اختنا الفاضلة ام عبدالله

تفاعلاً مع هذا الموضوع  وضعت كود لهذا الغرض

و لكنه يطبق التنسيق على كل الخلية

ارجو منكم المساعدة ليقوم هذا الكود بعمله في  مكان مناسب من نص الخلية(اخر حرف او حرفين مثلاً من النص)

هل هناك من افكار؟؟

ذلك لاختصار الوقت خلال الكتابة 

 

SuperScriptText.rar

رابط هذا التعليق
شارك

السلام عليكم

 

اسعد الله صباحكم 

 

ممكن زياده مرونة الكود بالبحث عنن "مسافة" مثلا داخل محتوى الخليه لتكون دلالة عن فصل الرقم و قوته .

 

ملاحظة لا يعمل مع الارقام الا ان كان هناك مسافة بين الرقم و القوه .

 

تحياتي

 

Book1+.rar

رابط هذا التعليق
شارك

جزاكم الله خيرا

 

أريد كتابةحرف الميم ( م) مرفوع لاس رقمي (انجليزي) دون التحويل الى وقت 

 

 

Book2.rar

تم تعديل بواسطه الخطاب
رابط هذا التعليق
شارك

استاذ احمد /السلام عليكم 

لقد حاولت مسبقاً ان افعل ما فكرت انت به لكني لم احصل على نتيجة

انظر الى المرفق في الصفحة  sheetn

 

SuperScriptText.rar

رابط هذا التعليق
شارك

السلام عليكم

 

جرب هذا الكود

Sub SuperScriptText()
'Superscript's the selected area
 
Start = WorksheetFunction.Find(" ", Selection.Value, 1)
lenn = Len(Selection) - Start
Selection.Characters(Start:=Start + 1, Length:=lenn).Font.Superscript = True

End Sub

تحياتي

  • Like 3
رابط هذا التعليق
شارك

 السلام عليكم استاذ احمد

الكود يعمل بشكل جيد كـنص  لكن لا يقوم بالاعمال الحسابية

مثلاً : 12.103   لا يعطيها 12000 

فهل من طريقة لعمل ذلك؟

رابط هذا التعليق
شارك

الأستاذ الفاضل / سليم حاصبيا

 

السلام عليكم ورحمة الله وبركاته

 

يوجد دالة للقيام برفع العدد إلى الأس المطلوب وهى دالة POWER وإليك ملف يوضح بعض الأعمال الحسابية عليها.

Book1.rar

رابط هذا التعليق
شارك

الاخت الفاضلة ام عبدالله 

بعد السلام 

بكل تأكيد نعرف عن وجود هكذا دالة ،  لكني و الاستاذ احمد نحاول ان نبتكر شيئاً لعله ان يكون جيداً /اذا احببت بالمشاركة فالف اهلاً وسهلاً

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information