obad65 قام بنشر يوليو 29, 2019 مشاركة قام بنشر يوليو 29, 2019 السلام عليكم ورحمة الله وبركاته آمل من الأخوة مساعدتي حسب الشرح بالمرفق أريد استخراج قيمة من خلية بدون الحروف المكتوبة بشرط كما هو موضح في المرفق مع خالص شكري للجميع A.xlsx رابط هذا التعليق شارك More sharing options...
أفضل إجابة Ali Mohamed Ali قام بنشر يوليو 29, 2019 أفضل إجابة مشاركة قام بنشر يوليو 29, 2019 وعليكم السلام تم تنفيذ طلبك بمعادلة IF مع دالة معرفة LETTEROUT Function LETTEROUT(RNG As Range) Dim I As Integer For I = 1 To Len(RNG) Select Case Asc(Mid(RNG.Value, I, 1)) Case 0 To 64, 123 To 197 LETTEROUT = LETTEROUT & Mid(RNG.Value, I, 1) End Select Next I End Function وهذه هي المعادلة المطلوبة =IF(RIGHT(B2,2)="AM",LETTEROUT(B2),IF(RIGHT(B2,2)="PM",LETTEROUT(B2)+12,"")) A.xlsm 3 رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر يوليو 29, 2019 مشاركة قام بنشر يوليو 29, 2019 جرب هذا الملف بعد اذن اخي علي طبعاً Time_AM_PM.xlsm 2 رابط هذا التعليق شارك More sharing options...
obad65 قام بنشر يوليو 30, 2019 الكاتب مشاركة قام بنشر يوليو 30, 2019 جزاكم الله ألف خير أساتذي الأفاضل علي وسليم كلا الدالتين تعمل بشكل سليم وتعطي النتيجة المطلوبة أسأل الله ان يكتب لكم الأجر والمثوبة ويرزقكم من فضله رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان