ammarhowari قام بنشر فبراير 28, 2022 مشاركة قام بنشر فبراير 28, 2022 ممكن طريقة اضافة تسمية توضيحية شفافة لخلية اكسيل مقبول او مرفوض.xlsx رابط هذا التعليق شارك More sharing options...
محمد حسن المحمد قام بنشر فبراير 28, 2022 مشاركة قام بنشر فبراير 28, 2022 السلام عليكم أخي الكريم جرب هذا الملف المرفق تقبل تحياتي مقبول او مرفوض.xlsx رابط هذا التعليق شارك More sharing options...
ammarhowari قام بنشر فبراير 28, 2022 الكاتب مشاركة قام بنشر فبراير 28, 2022 جزاك الله خيراً لكن المطلوب بدون قائمة منسدلة ممكن لو تنحل عن طريق كود او غير شي بس بدون قائمة منسدلة رابط هذا التعليق شارك More sharing options...
lionheart قام بنشر مارس 1, 2022 مشاركة قام بنشر مارس 1, 2022 The request is weird a little and using data validation list is better than using the code in worksheet module Generally here's the code (In Worksheet Module) Private Sub Worksheet_Change(ByVal Target As Range) Call Worksheet_SelectionChange(Target) End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Target If .Cells.CountLarge > 1 Then Exit Sub If .Row > 1 And .Column = 2 Then If LCase(.Value) = "yes" Or LCase(.Value) = "no" Then Application.EnableEvents = False .Value = StrConv(.Value, vbProperCase) .Font.ColorIndex = xlAutomatic Application.EnableEvents = True Exit Sub Else Application.EnableEvents = False .Value = Empty Application.EnableEvents = True End If If .Value = "" And .Offset(, -1).Value <> "" Then Application.EnableEvents = False .Value = "Type 'Yes' to accept - Type 'No' to reject" With .Font .Name = "Calibri" .FontStyle = "Regular" .Size = 9 .Color = RGB(217, 217, 217) End With Application.EnableEvents = True End If End If End With End Sub 3 رابط هذا التعليق شارك More sharing options...
محمد حسن المحمد قام بنشر مارس 1, 2022 مشاركة قام بنشر مارس 1, 2022 السلام عليكم ورحمة الله وبركاته ما شاء الله بارك الله كود رائع أخي الحبيب @lionheart أسأل الله تعالى أن يزيدك من نعمه ومن علمه آمين. 1 رابط هذا التعليق شارك More sharing options...
ammarhowari قام بنشر مارس 2, 2022 الكاتب مشاركة قام بنشر مارس 2, 2022 @lionheart استاذنا الحبيب عند ادخال قيمة في الخلايا والنقر في خلية اخر تنمسح القيمة التي كتبناها رابط هذا التعليق شارك More sharing options...
lionheart قام بنشر مارس 2, 2022 مشاركة قام بنشر مارس 2, 2022 You are allowed to type yes or no only 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.