نجوم المشاركات
Popular Content
Showing content with the highest reputation on 09/28/18 in all areas
-
أهلا بكم.. إليكم هذه التجربة البسيطة لتوظيف صفحات HTML في عرض البيانات بشكل جذاب ومميز .. للعلم.. كان العمل على قدر السؤال فقط. Dashboard.zip4 points
-
2 points
-
السلام عليكم و رحمة الله تعالى وبركاته إخوتي الكرام حياكم الله. إليكم هذا البرنامج الصغير الذي يقوم بإظهار شريط طباعة مع كل تقرير و بإستعمال أكواد قليلة يقوم شريط الطباعة بضبط إعدادات الصفحة ، طباعة الصفحة الحالية، طباعة الصفحات التي تريدها حسب الإختيار، التكبير و التصغير ، الإنتقال بين السجلات، عرض مجموعة من الصفحات في التقرير. رغم أنه يوجد مثال من قبل للأستاذة زهرة حفظها الله. إلا أنني في هذا المثال إستعملة طريقة مغايرة قليلا و بإستعمال أسطر أقل. إنشاء شريط طباعة.rar1 point
-
هذا البرنامج تعبت عليه منذ ما يقارب 3 اشهر .. ارجوا ان تستفيدوا منه .. ولا ارغب سوى بالدعاء لي بالصلاح والهدايه .. واي استفسار انا جاهز به ان شاء الله .. اخوكم اسماعيل .. Customers.rar1 point
-
السلام عليكم عندنا جدول من صفوف كثيرة بحيث لا تتسع لها صفحة واحدة كيف نقوم بطباعة كل عدد محدد من الصفوف (انت تختاره) مع جمع الارقام في كل ورقة طباعة في اسفلها و تكرار رأس الجدول في كل ورقة طباعة و اذا كانت قسمة عدد الصفوف على العدد الذي اخترته لا تساوي عدداً صحيحاً كيف يتصرف الاكسل كل ذلك في هذا الملف Smart_Printing.xlsm1 point
-
1 point
-
1 point
-
1 point
-
1 point
-
1 point
-
1 point
-
ما شاهدته بالرابط لا يصدق ... علم غزير و خلق رفيع و الأجمل هو أن السائل من أجاب على سؤاله بعد شهرين و نيف !!1 point
-
جرب هذا بمجرد ادخال الرقم خطأ والضغط على انتر يقوم بمسح التكست بوكس Microsoft Excel Worksheet.xlsm1 point
-
تفضل لك ما طلبت كلمة السر :123 يمكنك تغييرها كما تريد من داخل الكود Microsoft Excel Worksheet.xlsm1 point
-
1 point
-
1 point
-
1 point
-
1 point
-
1 point
-
احنا اتفقنا بلاش Activate ولا Select ديه ولا لزوم لهذا السطر نهائياً ws.Range("A" & cel.Row).Resize(1, 9).Activate يكفي هذا الماكرو Sub Fixe_data() Dim lr% With Sheets(1) lr = .Range("A2").CurrentRegion.Rows.Count .Range("A2").Resize(lr, 9).Value = .Range("A2").Resize(lr, 9).Value End With End Sub او اكثر اختصاراً Sub fix_data() With sheets("1").Range("A1").CurrentRegion .Value =.Value End With End Sub1 point
-
يمكن عمل الكودين فقط فى حالة اذا تم فتح صفحات بإسم الصنف ولكن انصحك بعمل ملف اخر لهذا الطلب أفضل لأنه كلما زاد من حجم الملف الواحد كلما ثقل وصعب العمل بكفاءة تفضل الملف بعد تحرير عمود السعر 11حساب العملاء(1).xlsm1 point
-
1 point
-
1 point
-
1 point
-
تفضل لك كل ما طلبت تحويل من عدة صفوف الى عمود واحد(1).xlsm1 point
-
قمت بتصميمه لمدرستنا ومن باب العلم لا يحتكر حبيت انزله في هذا القروب الرائع الذي استفدنا منه الكثير اشكرك على المرور صديقي1 point
-
1 point
-
1 point
-
برنامج المتابعة اليومية للطلاب يحتوي عل التالي : 1- الغياب اليومي للطلاب 2- تسجيل الملاحظات لكل طالب اثناء الحصة من تأخر - آداء الواجبات - السلوك الذي يصدر من الطالب اثناء الحصة .... 3- طباعة تقارير لكل طالب على حده 4- طباعة تقارير خاصة بكل شعبة 5- طباعة احصائيات عن الغياب والسلوكيات المختلفة لكل طالب. 6- استمارة تحويل الطالب على لجنة السلوك بالمدرسة 7- يمكنك حفظ السجل على شكل ملف اكسل. اتمنى ان يحيز اعجابكم ويساعد المعلمين على متابعة الطلاب Follow-Up.rar1 point
-
السلام عليكم ورحمة الله وبركاته عند مراجعتي للبرنامج وجدت ان هناك خطأ في كود أحد الأزرار فبحمد الله تم تعديل هذا الخطأ مع إلغاء زرين في الواجهة الرئيسية للبرنامج واضافة التاريخ والوقت للشاشة الرئيسية شكرا لكم Marks final Access2013.rar Marks final Access 2003.rar1 point