سؤال حول"اعداد تقرير من نطاق معين اتوماتيكيا من خلال فورم" للأخ خبور

[أبو العقاب]

أخواني الكرام

برنامج الأخ خبور المثبت في موضوع "اعداد تقرير من نطاق معين اتوماتيكيا من خلال فورم"

في غاية الروعة وحلّ لي مشكلة كبيرة كنت أعني منها فبارك الله به

ولي استفسار

في المرفق طبقت البرنامج على الشهادات لإدخال المواد

حين أدخل المواد تظهر المواد في الخلاياb1 , c1 ....... وهكذا في ورقة أدخل العلامات

ولكنى أريد اظهار المواد في خلايا مدمجة

فمثلا لو اخترت المواد اللغة العربية والرياضيات مثلا

أريدها أن تظهر مادة اللغة العربية في خلية مدمجة c1-b1 ومادة الرياضيات

في خلية مدمجةe1-d1

وهكذا....

فهل هذا ممكنا

تابعوا المرفق وفيه شرح لما أريد

shehadat.rar

[عبدالله المجرب]

ارجو ان يكون هذا هو المطلوب

shehadat.rar

[أبو العقاب]

أخي الحبيب ولد المجرب

أشكرك على تفاعلك معي وجزاك الله خير الجزاء

ولكن الملف الذي أرفقته هو عينه مرفقي ولا يوجد أي تعديل عليه

لعلك أخطأت في ارفاق الملف المطلوب

يرحمك الله

[عبدالله المجرب]

بالفعل اخطاءت اخي وارجو ان تعذرني

اليك المرفق

shehadat1.rar

[عبد الفتاح كيرة]

أخانا أبا أحمد

ما شاء الله حل جيد

يمكنك إضافة السطر التالى السطر رقم 8

Private Sub Kh_Start(iColumn As Integer)

Dim RCount As Long, C As Integer

C = Cells(iRow, Columns.Count).End(xlToLeft).Column + 2

With MyRng

    RCount = .Rows.Count


    Cells(iRow, C).Resize(RCount, 1).Value = _

    .Cells(1, iColumn).Resize(RCount, 1).Value

    []Sheets(2).Range(Cells(iRow, C), Cells(iRow, C + 1)).MergeCells = True[

End With

End Sub

مع إلغاء الأسطر التى أضفتها

shehadat-kemas.zip

تم تعديل ديسمبر 19, 2010 بواسطه kemas

[أبو العقاب]

أشكركم أخواني

ولد المجرب و kemas

لكم كل احترام

[yamz]

أخواني الكرام برنامج الأخ خبور المثبت في موضوع "اعداد تقرير من نطاق معين اتوماتيكيا من خلال فورم" في غاية الروعة وحلّ لي مشكلة كبيرة كنت أعاني منها فبارك الله فيه ولي استفسار

عند وضع البيانات داخل جدول

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

مرفق مثال

yehia_test1.rar

[الـعيدروس]

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

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

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

اخوكم : ابو نصار

تم تعديل أبريل 10, 2011 بواسطه alidroos