ابو حمادة قام بنشر يناير 13, 2017 مشاركة قام بنشر يناير 13, 2017 السلام عليكم ورحمة الله تعالي وبركاته الاخوة الاجلاء ممكن المساعده في وضع كود لفصل الارقام والحروف كما موضح في الصوره الاتيه مرفق ملف للمطلوب ولكم جزيل الشكر فصل الارقام عن الحروف.rar رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يناير 13, 2017 مشاركة قام بنشر يناير 13, 2017 وعليكم السلام قم بإدراج موديول جديد وضع الدالة المعرفة التالية فيه Function AlphaNum(txt As String, Optional numOnly As Boolean = True) As String With CreateObject("VBScript.RegExp") .Pattern = IIf(numOnly = True, "\D+", "-?\d+(\.\d+)?") .Global = True AlphaNum = .Replace(txt, "") End With End Function ثم في حدث الفورم ضع الكود التالي Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) TextBox3.Value = AlphaNum(TextBox1.Value, 0) TextBox2.Value = AlphaNum(TextBox1.Value, 1) End Sub 3 رابط هذا التعليق شارك More sharing options...
ابو حمادة قام بنشر يناير 13, 2017 الكاتب مشاركة قام بنشر يناير 13, 2017 الف الف شكر استاذي الغالي جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يناير 13, 2017 مشاركة قام بنشر يناير 13, 2017 وجزيت خيراً أخي الكريم أبو حماده بمثل ما دعوت لي رابط هذا التعليق شارك More sharing options...
حليم ناصر قام بنشر يناير 13, 2017 مشاركة قام بنشر يناير 13, 2017 سلام عليكم اخي ابو حمادة ممكن ترفق الملف كيف اصبحت النتيجة لاني لم افهم كيفية وضع موديول جديد ووضع الدالة فيه زجزاك الله خيرا وكل الاغضاء والسلام عليكم ورحمة الله تعالى وبركاته 1 رابط هذا التعليق شارك More sharing options...
ابو حمادة قام بنشر يناير 14, 2017 الكاتب مشاركة قام بنشر يناير 14, 2017 8 ساعات مضت, حليم ناصر said: سلام عليكم اخي ابو حمادة ممكن ترفق الملف كيف اصبحت النتيجة لاني لم افهم كيفية وضع موديول جديد ووضع الدالة فيه زجزاك الله خيرا وكل الاغضاء والسلام عليكم ورحمة الله تعالى وبركاته حاضر اخي الكريم الملف جاهز فصل الارقام عن الحروف.rar رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يناير 14, 2017 مشاركة قام بنشر يناير 14, 2017 أخي الكريم حليم لابد من معرفة الأساسيات للتعامل مع المنتدى بشكل ميسر لك ولغيرك وقد خصصت لذلك موضوع من فترة أرجو أن يفيدك إن شاء الله رابط الموضوع من هنا 1 رابط هذا التعليق شارك More sharing options...
حليم ناصر قام بنشر يناير 14, 2017 مشاركة قام بنشر يناير 14, 2017 سلام عليكم اخي ابو حمادة اخي ياسر خليل أبو البراء جزاكم الله خيرا وكل الاغظاء وجعلها في ميزان حسناتكم والسلام عليكم ورحمة الله تعالى وبركاته 1 رابط هذا التعليق شارك 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.