اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

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

الاستاذ الفاضل ابوعيد

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

جزاه الله كل خير وزاده من فضله وعلمه

وهو يقوم بحذف الهمزة واستبدال التاء المربوطة بهاء وايضا يحذف النقط من اسفل الياء

تحياتي لك

Sub kh_Replace()
Dim ch
With Range("B2:B100")
    For Each ch In Array("إ", "أ", "آ")
        .Replace CStr(ch), "ا"
    Next
    .Replace "ة", "ه"
    .Replace "ى", "ي"
End With
End Sub


قام بنشر

شكرا

أخي وليد فتحي

أخي محمد الخازمي

أنا الأن عند كتابة الاسم الذي يبدأ بحرف الألف أكتبه بدون همزة (ا) في الاسم الأول فقط أما أسم الأب والجد   وجد الجد فأكتب الهمزة فيه ولا إشكال

الكود السابق يمسح الهمزات من جميع الاسم

إذا وجد كود يفرز بدون حذف الهمزة سيكون هو المطلوب

شكرا جزيلا على سرعة تفاعلكما

تحياتي

قام بنشر

الاستاذ الفاضل ابو عيد

بعد البحث الكثير في هذا الموضوع وجدت انه لا يوجد افضل من هذا الكود

لانه يقوم بحذف جميع الهمزات التي تؤثر علي عملة الفرز

لانك تعلم تمام ان وجود الهمزة يجعل الفرز مختلف وليس بالدقيق

ونحن بانتظار أن يقوم أحد الاساتذة بمداخلة جديدة وادارج كود جديد

تحياتي لك

قام بنشر

السلام عليكم

مبرووووووووووووووووووك

تم حل المشكلة والحمد لله وبدون حذف الهمزات

 

لو كان الإكسل مش راضي يفرز حسب الطلب , فإننا سنحتال عليه حتى نحقق مطلوبنا

تفضلوا

الهمزة أول الاسم.rar

  • Like 1
قام بنشر

السلام عليكم

شكرا أخي الخالدي وأقول ماشاء الله

بصراحة كود عجيب وقصير ويحقق المطلوب بدقة

شكرا على تفاعلك

  • Like 1
قام بنشر

السلام عليكم

أنا معلم وأحتاج إلى فرز الطلاب حسب النتيجة (ناجح راسب) أو حسب الشعبة  ( 1 , 2 )

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

تقبلوا تحياتي

فرز الهمزة بحسب الشعبة والنتيجة.rar

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information