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

أبومروان

03 عضو مميز
  • Posts

    308
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    6

كل منشورات العضو أبومروان

  1. وعليكم السلام ورحمه الله وبركاته لعله المطلوب =FORECAST(AL$3,$B$3:$AK$3,$B5:$AK5) TEST.xlsx
  2. شاهد الموضوع ادناه
  3. وعليكم السلام ورحمه الله وبركاته استخدام الدالة trim في علاج هذه المشكلة ونكتب في خلية فارغة =trim(d2) ونقوم بتطبيق الدالة على هذه الحالة
  4. وجدت هذا الكود ولم اجربه للامانه Sub ExportUserForms() Dim i As Integer For i = 1 To 25 UserForms(i).Export "C:\Users\User\Documents\UserForm" & i & ".frm" Next i End Sub جرب واخبرنا بالنتيجة
  5. وعليكم السلام ورحمه الله وبركاته يمكنك استخدام هذه المعادله =TEXT(A8,"dddd") استخراج اسم اليوم.xls
  6. راجع الموضوع أدناه ⬇️ لعله يفيدك
  7. وعليكم السلام ورحمه الله وبركاته استخدم هذا الكود للاضافه للترحيل بعدا لتعديل عليه بما بناسب الشيت المرفق . Dim i As Byte, Last As Long, Sh As Worksheet Set Sh = Sheets("data") With Sh Last = .Cells(Rows.Count, 2).End(xlUp).Row + 1 For i = 1 To 17 .Cells(Last, i).Value = Me.Controls("Tx" & i).Value Me.Controls("Tx" & i) = "" Next End With tx1.SetFocus
  8. سلمت يمينك يا استاذ👌🌹 @محمد يوسف ابو يوسف
  9. اي كود يعطيك خطأ برجاء ارفق صوره من الخطأ للوصول للحل افضل 🌹
  10. سيتم تحويل حالة العرض الخاصة بكل صفحة بعد تنفيذ هذا الكود. إذا كانت الصفحة مرئية، فسيتم إخفاءها. وإذا كانت مخفية، فستصبح مرئية. يمكنك ضبط الكود حسب احتياجاتك Sub ShowHideSheets() Dim sht As Worksheet For Each sht In ThisWorkbook.Worksheets If sht.Visible = True Then sht.Visible = False Else sht.Visible = True End If Next sht End Sub كود فورم 1 به شاشة دخول للورك بوك Private Sub CommandButton1_Click() ' تحقق من صحة اسم المستخدم وكلمة المرور If TextBox1.Value = "اسم المستخدم الصحيح" And TextBox2.Value = "كلمة المرور الصحيحة" Then UserForm2.Show ' اعرض UserForm2 إذا كانت بيانات الدخول صحيحة Else MsgBox "اسم المستخدم أو كلمة المرور غير صحيحة" ' أظهر رسالة خطأ إذا كانت بيانات الدخول غير صحيحة End If End Sub
  11. وعليكم السلام ورحمه الله وبركاته اتفضل استاذ @2saad لعله المطلوب وهذا كود اظهار الفورم هذا كود اظهار الصفحه والاخفاء Private Sub CommandButton4_Click() Sheets("a").Visible = True Sheets("n").Visible = False Sheets("k").Visible = False Sheets("l").Visible = False Sheets("m").Visible = False Sheets("i").Visible = False Sheets("j").Visible = False Sheets("b").Visible = False Sheets("f").Visible = False Sheets("g").Visible = False Sheets("h").Visible = False Sheets("d").Visible = False Sheets("e").Visible = False End Sub محمد.xls
  12. السلام عليكم ورحمه الله وبركاته جزاك الله خيرا 🌹
  13. وعليكم السلام ورحمه الله وبركاته انظر الموضوع أدناه لعله يفيدك
  14. جزاك الله خيرا 🌹 وبارك الله فيك 🌹
  15. استاذي الضافل @ابو صقر اقترح عليك بعض الدروس قد تفيد وتفح لك الباب اقرا بعض الموضوعات المنتدي وافتح الملفات وحاول تفهم المقصد الشروحات وفهم الاكواد التعليم ياتي واحده واحده
  16. وعليكم السلام ورحمه الله وبركاته مفيش احسن من هذا المنتدى الرائع به من الخبراء في مجال الاكواد و المعادلات في الاكسل . وهذه سلسله رائعه جدا قد تكون بابك في المعرفة
  17. استاذي ومعلمي @محمد حسن المحمد دايما بنتعلم من حضرتك واديما حضرتك سباق🌹 جزاك الله خيرا علي مجهوداتك الرائعه 🌹🌹
  18. طرق حساب النسبة المئوية في الاكسل يمكنك حساب النسبة المئوية في Excel باستخدام الصيغة التالية: (قيمة/الإجمالي)*100% على سبيل المثال، إذا كنت تريد حساب النسبة المئوية للعدد 500 من إجمالي 1000، يمكنك استخدام الصيغة التالية: (500/1000)*100% = 50% يمكنك إدخال هذه الصيغة مباشرة في الخلية التي تريد عرض النتيجة فيها، أو بإمكانك كتابتها في خلية جديدة والإشارة إليها في الخلية التي تريد عرض النتيجة فيها. كما يمكنك استخدام الدالة PERCENTAGE في Excel لحساب النسبة المئوية. يمكن استخدام هذه الدالة كالتالي: =PERCENTAGE(قيمة, الإجمالي) على سبيل المثال، إذا كنت تريد حساب النسبة المئوية للعدد 500 من إجمالي 1000، يمكنك استخدام الصيغة التالية: =PERCENTAGE(500, 1000) وستقوم Excel تلقائيًا بحساب النسبة المئوية وعرض النتيجة في الخلية التي كتبت الصيغة فيها
  19. وعليكم السلام ورحمه الله وبركاته بارك الله فيكم وجزاكم الله خيرا على الموضوع الرائع 🌹
×
×
  • اضف...

Important Information