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

zahraamohamed

عضو جديد 01
  • Posts

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

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

مشاركات المكتوبه بواسطه zahraamohamed

  1. ألف شكر لحضرتك استاذ حسين مامون

    ان عايزة اكتب رقم 1 مثلا

    يظهر 1 وبجانبه صفرين وشرطة وقوس يه 1%

    1.00- (1%)

    بارك الله فيك استاذ حسين

    لو مانفع بالفورمات لو ينفع كود

    عندما اكتب فى الخلية

     رقم 1 مثلا

    يظهر 1 وبجانبه صفرين وشرطة وقوس يه 1%

    1.00- (1%)

    والخلية التى تليها اذا كتبت 2

    يظهر 2 وبجايبهاصفرين وشرطة وقزس به 1.5%

    2.00- (1.5%)

    بارك الله فيكم

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

    بداية اتقدم بالشكر للاستاذ ابراهيم الحداد ساعدنى بكود الترحيل

    الاستاذ سعد عابد تعديل كود الترحيل وصمم كود التقرير المرفق بالمتغيرات له كل الشكر 

    وخالص الدعاء والله

    ما احتاجه اما تعديل للكود المرفق او كود جديد بشيت جديد بالاجماليات للمدين والدائن

    نوع التقرير المرفق هى افرادى احتاج نفس التقرير بس اكتب اجمالى فيتم  استدعاء اجمالى الشرح والكود بالشيت المرفق

    بارك الله فيكم

    مدين دائن تقرير الزهراء - Copy.xlsm

  3. السلام عليكم اخوانى اواجه مشكلة فى التنفيذ بالاكسيل لان التقرير المطلوب صعب شوية

    فهل من مساعد يأخذنى الى عالم الاكسيس والانضمام اليكم من خلال مساعدتى فى تنفيذ القاعدة 

    بارك الله فيكم

    مدين دائن الزهراء.xlsm

  4. السلام عليكم اهل المنتدى مشرفين واعضاء

    احتاج معاونة لوجه الله 

    الشيت المرفق اسفل وضعت مثال بشيت واحد بس التطبيق هيكون على كل الشيتات سواء للترحيل او التقرير

    اضفت شرح تفصيلى للترحيل للمدين والدائن اذا كانت العمود رقم اما اذا كان فارغ لايرحل

    واضفت شرح تفصيلى للتقرير الذى يتغير بتغير الاختيارات 

    ان شاء الله ان شاء الله لايصعب عيكم

    مدين دائن الزهراء.xlsm

  5. اشكرك لا علاقة باللون استاذ سليم

    المقصود من اللون هو توضيح ان اذا كانت الصفوف مثل هذه تختفى

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

    اشكرك

    متفهمة موقفك 

    انتظر مساعدة احد الاساتذة اكرر شكرى

  6. تم عمل التعديل استاذ سليم حاصبيا والنتيجة مختلفة عن النتائج المرغوب الحصول عليها

    اعتذر لحضرتك واشكرك

    الفرق بالمبف المرفق بين ما نحصل عليه بالمكرو والمرغوب فيه كل الصفوف الملونة بالاصفر الناصع مطلوب اخفائها حيث انها اما تساوى0 او فارغة

    اشكرك

    zahra_Final.xlsm

  7. نفذت التعديل لم يحدث شىء استاذ سليم حاصبيا

    Sub Hide_row(ByVal x)
     Dim t%, m%
     With Sheets("sheet1")
      t = .Cells(Rows.Count, x).End(3).Row
    '   For m = 3 To t Step 2
      For m = 3 To t
          If .Cells(m, x) = 0 Or _
             .Cells(m, x) = vbNullString Then
             .Cells(m, x).EntireRow.Hidden = True
          End If
      Next
     End With
    End Sub

     

    zahra_Final.xlsm

  8. لم تقم الاضافة بالغرض منها

    جائز انا مش عارفة اوصل المطلوب لحضرتك

     الكود القديم غير مستخدم فى هذه الحالة لا احتاجه انا كل ما احتاجه اخفاء كل الاعمدة عدا العمود الذى اختاره

    بعد اختيار العمود يظهر فقط العمودa والعمود الذى اخترته

    بعد ذلك اخفاء الصفوف التى بها صفر والفارغة ويبقى فقط السطر من العمود a اسفله السطر الذى به بيانات من العمود المختارليكون بالشكل المرفق فأقوم بالطباعة مباشرة

    حيث اقوم بهذا يدويا وساعات كثيرة اخفى صفوف بها بيانات

    مع الشكر 

    zahra_M.xlsm

  9. حضرتك من قام بكتابة الكود لك كل الشكر

    الله يفتح عليك الجزء الاول ممتاز استاذ سليم حاصبيا

    احتاج بعد اخفاء الاعمادة العمود الظاهر الصفوف التى فيها صفر والفارغة تختفى

    جزاك الله كل خير وفرج همك وابعد الحزن عنك .... والهدف هو الطباعة

    مثلا انا اخترت عمود we اريده يظهر بالشكل الى فى الملف مشكور

    zahra_M.xlsm

×
×
  • اضف...

Important Information