اذهب الي المحتوي
أوفيسنا

احمد محمود عبد الفتاح

03 عضو مميز
  • Posts

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

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

مشاركات المكتوبه بواسطه احمد محمود عبد الفتاح

  1. في ملف خاص بشغلي كنت 

    فيه معادلات كتير 

    من فتره مش عارف عملت ايه اتحولت بعضا الصفوف الى اللون الازرق كما موضح في الصور كما موضح بالمرفق

    المشكله اللي مقابلاني حاليا اما اجي اعمل سيرش على رقم في عمود معين بيضملي في نتائج البحث رقم الصف بالاضافة الى محتوى الخليه 

    مثلا ببحث عن رقم ٢٠ في عمود B

    يطلعلي في نتائج البحث خليه b20

    بالرغم ان محتواها رقم تاني خالص 

    ارجو اني اكون عرف اوصل طلبي

    شاكرين لكم 

    Capture.JPG

  2. السلام عليكم جميعاً 

    معايا ايميل وباسوورد لحوالي 1000 طالب 

    من المفترض انني اوزعهم على الطلاب بسرية

    هل يوجد إمكانية أو أي فكره من الممكن أنني ادخل جميع البيانات للطلاب 

    وادي للطالب لينك يدخل عليه وبمجرد ان يدخل البيانات المطلوبة يتم إرسال له

    الإيميل والرقم السري الخاص به

    أو اي فكره مماثلة عشان العدد كبير جدا وصعب انني اوزع لكل طالب 

  3. الان, ياسر خليل أبو البراء said:

    وعليكم السلام أخي أحمد

    جرب الدالة المعرفة التالية علها تفي بالغرض

    
    Function Initials(str As String) As String
        Dim sTemp()     As String
        Dim i           As Long
    
        sTemp = Split(str)
    
        For i = 0 To UBound(sTemp)
            If sTemp(i) Like "[أ-ي]*" Or UCase(sTemp(i)) Like "[A-Z]*" Then
                Initials = Trim(Initials & "" & UCase(Left(sTemp(i), 1)))
            End If
        Next i
    End Function

    لاستخدام الدالة في ورقة العمل

    
    =Initials(A1)

     

    شكراً أخ ياسر  وأخ بن عليه على تعاونكما

    وأثقل عليكم بإضافه

    لو كانت الخلية تحتوي على كمات باللغة العربية واللغة الإنجليزية ورموز مثل ( الأقواس مثلا)

    هل من الممكن تجاهل كلمات العربية والرموز وإختصار الكلمات باللغة الإنجليزية فقط

    فمثلا الخلية A1 = احمد محمود عبد الفتاح  (Ahmed Mahmoud Abd Elfattah )

    أرغب أن يكون الناتج = AMAE

  4. يمكنك تجربة هذا الكود (منقول) 

    Sub MyFooter()
        Dim xTxt As String
        Dim xAddress As String
        Dim xRg As Range
        Dim xCell As Range
        On Error Resume Next
        xAddress = ActiveWindow.RangeSelection.Address
        Set xRg = Application.InputBox("Select the row you will insert repeatedly at the bottom:", "Kutools for Excel", xAddress, , , , , 8)
        If xRg Is Nothing Then Exit Sub
            For Each xCell In xRg
                xTxt = xTxt & xCell.Value & " "
            Next
            ActiveSheet.PageSetup.LeftFooter = xTxt
        End Sub

     

    • Like 1
  5. 15 ساعات مضت, زيزو العجوز said:

    السلام عليكم ورحمة الله

    اكتب المعادلة التالية فى الخلية C3 ثم اسحب نزولا

    ثم اضغط CRTL+SHIFT+ENTER

    
    =IFERROR(INDEX(المخزون!$A$2:$A$28;SMALL(IF(المخزون!$C$2:$C$28=0;ROW(المخزون!$C$1:$C$27);"");ROW()-2);1);"")

     

    شكراً أخ زيزو على إجابتك

    وتم تطبيقها بالفعل ولكن في حالة تطبيق المعادلة على مجموعة خلايا معينة لم يظهر لها اي نتيجة

    (ملاحظة الملف المرفق تم تطبيق المعادلة على الخلايا المظللة بالون الأصفر )

    Book2.rar

  6. السلام عليكم أخواتي الكرام

    مرفق ملف مكون من شيتين

    الأول رصيد المخزن وبه رقم المنتج وإسم المنتج والمخزون

    والثاني شيت فاضي 

    المطلوب ترحيل أرقام المنتجات (أوتوماتيكيا) في حالة أن رصيد المنتج في الشييت الأول يساوي (صفر)

    مرفق الملف

     

    Book1.rar

  7. 2 ساعات مضت, زيزو العجوز said:

    السلام عليكم ورحمة الله

    اكتب المعادلة التالية :

    
    =MAX(IF(E3=B$2:B$14;$A$2:$A$14;""))

    ثم اضغط "Crtl + Shift + Enter"

    ثم اسحب نزولا حتى آخر خلية

    شكراً استاذ زيزو 

    تم تطبيق المعادلة

    ولكن عندي استفسار بإفتراض ان عندي الخلية E6  فاضيه هل من الممكن لا يعطيني أي رقم للحركة 

    موضح استفساري بالمرفق

     

    OFFICE.rar

  8. عندي مشكلة في طباعة أي ملف إكسل على جهازي

    دائماً في حالة طباعة ملف إكسيل مثلا (10 ورقات) يطبع أول ورقة ثم تاني ورقة بتبقا فاضيه وبعد كده يكمل طباعة

    ولو باطبع ورقة واحدة من ملف إكسيل يطبع ورقتين الأولى الملف المطلوب والثانية ورقة فاضية

    أرجو المساعدة

  9. السلام عليكم إخواتي الكرام

    بعمل جدول مراقبات إمتحانات الفصل الدراسي الثاني على ملف وورد

    كثيراً ما أخطئ وأكرر بالخطأ إسم لأحد المراقبين في نفس اليوم وفي نفس الوقت في لجنة أخرى 

    هل يوجد طريقة للبحث عن تكرار الإسم في نفس المادة في لجنة أخرى

    يتم تطبيقها على الجدول بالكامل

    شكراً

     

×
×
  • اضف...

Important Information