احمدزمان قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 السبت 26/1/1432هـ الموافق 1/1/2011م السلام عليكم و رحمة الله وبركاته ((طلب تعديل النص المدخل بصيغة معينة)) طبعا لا يخفى على الجميع وخاصة في السعودية و مصر النظام الجديد في المرور للوحات السيارات (العربيات) و الذي يشتمل على احرف و ارقام لذلك يشترط من المدخل لرقم اللوحة في أي برنامج تتبع الدقة في ادخال رقم اللوحة من ناحية المسافات بين كل حرف و المسافة بين الأرقام وآخر حرف و كذلك استخدام الألف بالهمزة من عدمها و استخدام الألف المقصورة و الياء (ى_ي) (ا_أ) لذلك لجأت اليكم اخواني بالمنتدى آمل التكرم بمساعدتي في ذلك حيث انني في المرفق مطلوب ادخال ارقام اللوحات في العمود C و المطلوب 1- المسافات بين الأحرف: وضع مسافة واحد فقط بعد كل حرف وعدم السماح بوضح أي مسافة اكثر من واحدة و حذف أي مسافات بين الأرقام وكذلك حذف أي مسافة موجودة في آخر الرقم. 2- استبدال أي حرف الف به همزة بحرف الف بدون همزة – و – استبدال أي حرف الف مقصورة بياء سوف تلاحظ في المرفق تم كتابة رقم لوحة واحد بـ 6 طرق مختلفة لذلك نريد ان نتوصل الى صيغة تصحيح لهذه الأخطاء آمل من كل من لديه خبرة او فكرة او حل باستخدام الدوال او الكود ان يتفضل به علينا مع الشكر مقدما تعديل النص المدخل CarNo.rar رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 السلام عليكم اخي الحبيب / احمد يعقوب ------حفظه الله اولا للتاكد من صحة ماتريد شاهد المرفق هذا الحل بالمعادلات فقط ثم ساقوم ان شاء الله بدمج المعادلات بمعادلة واحدة او ساعمل لك معادلة بكود ايهم احسن لك حسب ماتريد تعديل_ارقام_اللوحات.rar رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 أدلى بدلوى هذا حل بالمعادلات غير موضع الخلية c5 c6 c7 ... تعديل_ارقام_اللوحات-kemas.rar رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 المعذرة من أستاذى خبور وضعت الرد قبل رؤية مشاركتك جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يناير 1, 2011 الكاتب مشاركة قام بنشر يناير 1, 2011 السلام عليكم و رحمة الله وبركاته الف الف شكر استاذي الكبير خبور خير افضالك كثيرة و لا انساها الحل صحيح جزاك الله كل خير آمل اتلكرم بدمج الدوال معا بارك الله فيك = = = = = = = = == اخي كيماس اشكر جزيل الشكر على الحل المرفق هو صحيح ولاكن مطول قليلا جزاك الله خيرا مع التحية والتقدير لكم رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 طبعا أخى أحمد لا يستوى البحران يكفينى أن أحاول بارك الله فيك رابط هذا التعليق شارك More sharing options...
جلال محمد قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 والله قمه في الابداع العمالقه يتنافسون والصغار يتعلمون وعلشان كده بنحب ( افيسنا ) بارك الله فيكم جميعا رابط هذا التعليق شارك More sharing options...
بن علية حاجي قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 السلام عليكم ورحمة الله إخواني الكرام أستسمحكم وأتقدم إليكم بهذا الحل (وهو في الحقيقة حلين في أحدهما استعملت عمودا إضافيا وفي الاخر طريقة مباشرة لكن المعادلة طويلة نوعا ما) هذا ما استطعت أن أجود به... أخوكم بن علية تعديل_ارقام_اللوحات.rar رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 أنا منتظر أتعلم كيف سيدمج أستاذنا هذه المعادلات جربت دمجها فخرجت عن الحد المسموح أظن ممكن نخفى الأعمدة التى قبل العمود النهائى رابط هذا التعليق شارك More sharing options...
ابو القبطان قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 استاذ : خبور مساهماتك درر أفادك الله .. كما أفدتنا تقبل تحياتنا رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 السلام عليكم اخي الحبيب /احمد يعقوب-------------حفظه الله اذا كان عدد الحروف ثلاثة بشكل ثابت استخدم ملف الاخ بن علية فقد احسن اختصاره ====================================== الاخ الحبيب /بن علية---------- حفظه الله احسنت اختصار المعادلات بارك الله فيك ====================================== الاخ الحبيب /كيماس -------- حفظه الله أنا منتظر أتعلم كيف سيدمج أستاذنا هذه المعادلات جربت دمجها فخرجت عن الحد المسموح أظن ممكن نخفى الأعمدة التى قبل العمود النهائى كلامك مضبوط عملتها لكن بابقاء عمود واحد وهو مثل ما تفضل به الاخ بن عليه ====================================== الاخ الفاضل/جلال -------- حفظه الله كلنا نتعلم من بعض جزاك الله خيرا ====================================== الاخ الحبيب /حسن علي-------- حفظه الله اكرمك الله و جزاك الله خيرا ====================================== في المرفق معادلة بالكود مختصرة ولا تشترط كم معين لعدد الاحرف ====================================== تقبلوا تحياتي وشكري تعديل_ارقام_اللوحات بالكود.rar رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 السلام عليكم تم اضافة المعادلة اللي حيتم تكرارها في عمود منفصل وهي: =SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(TRIM(INDIRECT("RC2";0));" ";"");"أ";"ا");"ى";"ي") في اسم معرف kh_subtit وكذا استغنينا عن اضافة عمود لهذه المعادلة وتم استخدام معالة الاخ بن علية المختصرة =IF(B4="";"";RIGHT(LEFT(kh_subtit;1);1)&" "&RIGHT(LEFT(kh_subtit;2);1)&" "&RIGHT(LEFT(kh_subtit;3);1)&" "&RIGHT(kh_subtit;LEN(kh_subtit)-3)) ودمتم في حفظ الله تعديل_ارقام_اللوحات بن علية1.rar رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 (معدل) و الله تعلمنا منكم الكثير هذا كود صغير لتصفية رقم اللوحة فى نفس العمود و بدون أية معادلات أحب أن يقول أستاذى خبور رأيه فيه Dim myrng As Range, mycl As Range, mypoint As Long Set myrng = Sheets(1).Range("a4:a" & Application.WorksheetFunction.CountA(Range("a:a")) - 3) Application.ScreenUpdating = False For Each mycl In myrng mycl.Select With Selection .Replace What:="إ", Replacement:="ا" ' .Replace What:="أ", Replacement:="ا" .Replace What:="ى", Replacement:="ي" .Replace What:=""" """, Replacement:="""""" .Replace What:=" ", Replacement:="" For i = 1 To 5 Step 2 Selection.Replace What:=Mid(mycl, i, 1), _ Replacement:=Mid(mycl, i, 1) & " " Next i End With Next mycl Application.ScreenUpdating = True Range("a4").Select و هذا بفضل الله ثم بفضل ما تعلمناه منكم استخدام دالة الاستبدال لوضع مسافة بعد الحرف و حذف الفراغاتkemas.zip تم تعديل يناير 1, 2011 بواسطه kemas 1 رابط هذا التعليق شارك More sharing options...
الخالدي قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 (معدل) السلام عليكم ورحمة الله وبركاته بارك الله في الاخوة و الاساتذة االكرام وهنا محاولة لاستخدام المعادلة التالية : =REPLACE(REPLACE(REPLACE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE($C4;" ";"");"أ";"ا");"ى";"ي");2;0;" ");4;0;" ");6;0;" ") تحياتي تعديل_ارقام_اللوحات.rar تم تعديل يناير 1, 2011 بواسطه الخالدي 1 رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 تحولت الصفحة هذه إلى مسرح إبداعات بارك الله فيكم رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر يناير 1, 2011 مشاركة قام بنشر يناير 1, 2011 السلام عليكم اخي الجبيب / كيماس ---حفظه الله كود رائع وابداع ملحوظ بارك الله فيك وجزاك الله خيرا اخي الجبيب / الخالدي ---حفظه الله نجم المعادلات الصعبة عندي احساس مسبق انك ستضيف لمسه جديدة للمعادلة بارك الله فيك وجزاك الله خيرا تقبلا تحياتي وشكري ودمتم في حفظ الله رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يناير 1, 2011 الكاتب مشاركة قام بنشر يناير 1, 2011 السلام عليم و رحمة الله وبركاته يبدو انه فاتني الكثير آسف ولكن كنت مشغول قليلا بعيد عن النت رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يناير 1, 2011 الكاتب مشاركة قام بنشر يناير 1, 2011 السلام عليكم و رحمة الله وبركاته اولا اود ان اتقدم بخالص الشكر و التقدير و العرفان لأستاذي الكريم الفاضل على متابعته الشيقة و الجميله للموضوع فلقد اخذنا من وقته الكثير فـ جزاه الله خير الجزاء على كريم تواضعه = = = = = = = = اخي الفاضل بن علية شرا لك لتعاون دالة جميله وقدرة واضحة في التعامل مع الدوال جزاك الله كل خير أخي الفاضل كيماس جزاك الله كل خير كود جميل وشغال رائع جدا بارك الله في اخي الفاضل الخالدي كما ذكر استاذي خبور نجم المعادلات الصعبة فعلا هل يخفى القمر جزاك الله كل خير واود ان اتقدم لكم جميعا بجزيل الشكر و الإمتنان على ماقدمتوه فهو والله اكثر بكثير مما كنت اتوقع جزاكم الله كل خير ولا حرمنا الله من كرمكم الذي لاينفذ رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر يناير 2, 2011 الكاتب مشاركة قام بنشر يناير 2, 2011 السلام عليكم و رحمة الله وبركاته اكرر شكري و تقديري الى اساتذتي و اخواني الأحبه الذين مدو لي يد المساعدة وقامو باخراج مجموعة نادرة من الإبداعات أسأل الله العي العظيم ان يمن عليكم بعظيم كرمة وفضله وان يوسع لكم في رزقكم ويسهل لكم كل صعب وعسير جزاكم الله كل خير رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.