مصطفى محمود مصطفى

احسنتم جزاكم الله خيرا

السلام عليكم اخي العزيز ابو حنين ارفقت الملف بعد اضافة كود الاستاذ المبدع بن علية حاجي جزاه الله خيرا يقوم الكود بمسح البيانات باستثناء المعادلات والصيغ ربما يفي بالغرض تحياتي وشكرا لكم اضافة كود بن علية حاجي.rar

السلام عليكم اخي عمر الحسيني بارك الله بكم , انا خبرتي قليلة ويمكن لم اقوم بتطبيقه بالشكل الصحيح اشكر تعاونك معي وفقكم الله اخي عبد السلام ابو العوافي جزاكم الله خيرا .كود رائع ويعمل بشكل صحيح وفقكم الله شكرا لتعاونكم معي

السلام عليكم شكرا اخي عمر الحسيني جربت ولم يفلح بالتغيير المطلوب Sub CopyHeadersFooters() ' Dim Sh As Worksheet Sheets("البيانات").Select With ActiveSheet.PageSetup lh = .LeftHeader ch = .CenterHeader rh = .RightHeader lf = .LeftFooter cf = .CenterFooter rf = .RightFooter End With For Each Sh In Worksheets With Sh.PageSetup .LeftHeader = lh .CenterHeader = ch .RightHeader = rh .LeftFooter = lf .CenterFooter = cf .RightFooter = rf End With Next ' ActiveWindow.SelectedSheets.PrintPreview If MsgBox("هل تود الطباعة بعد المعاينة ؟", vbYesNo + vbQuestion, "طباعة") = vbYes Then ActiveSheet.PrintOut End Sub

السلام عليكم كود راس وتذييل ورقة العمل يعمل على ورقة البيانات فقط ارجو مساعدتي لجعله يعمل على جميع اوراق العمل وفقكم الله جلوس الطلبة.rar

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

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

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

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

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

الاخ سليم جزاكم الله خيرا اكثر من رائع تحياتي

السلام عليكم شكرا للاستاذين ابو البراء وسليم وجزاهم الله خيرا

السلام عليكم الاستاذ ياسر العربي حفظكم الله واثابكم شكرا للمتابعة ومساعدتي بارك الله بكم الفورم يعمل حاليا جزاكم الله خيرا

السلام عليكم اخي العزيز ياسر العربي اشكركم لتعاونكم معي ارفق الملف بعد الاضافة لبقية الفورم الموجود بالملف يحدث خطأ ارجو مساعدتي لتصحيح الخطا بارك الله بكم كود للفورم حيث يناسب جميع الشاشات لجميع أجهزة الكمبيوتر.rar

السلام عليكم الاخ العزيز ياسر العربي جزاكم الله خيرا ما شاء الله عليك , اضافة رائعة تسلم ايدك الله يحفظكم من كل سوء تحياتي

السلام عليكم اساتذتنا الافاضل المرفق فيه شاشة دخول وفورم مؤقت وفورم للانتقال الى اوراق العمل صادفتني مشكلة اثناء العمل على البرنامج في المدرسة طبعا قياس الشاشة اصغر من قياس شاشة الحاسوب الشخصي فاصبح الفورم لايظهر بالكامل وكذلك اوراق العمل لاختلاف قياس الشاشة بين الاثنين هل يمكن عمل ذلك من خلال كود يقوم في التحكم بالفورم حسب قياس الشاشة التي نعمل عليها جزاكم الله خيرا وبارك الله بكم تحياتي كود للفورم حيث يناسب جميع الشاشات لجميع أجهزة الكمبيوتر.rar

الاستاذ ابو نصار بارك الله بكم وحفظكم من كل سوء عمل ممتاز وكود رائع لكم جزيل الشكر والتقدير تحياتي

السلام عليكم الاستاذ عبد العزيز جزاكم الله خيرا شرح اكثر من جميل اخي صالح ومشاركة مني في الموضوع لغرض عدم طباعة كائن نفس الخطوات التي ذكرها الاستاذ عبد العزيز لكن تنزل للاخير ( تنسيق عنصر التحكم) ثم ترفع علامة الصح من امام طباعة كائن تحياتي الغاء طباعة كائن.rar

رائع استاذ سليم وفقكم الله تحياتي

السلام عليكم الاستاذ ابو نصار جزاكم الله خيرا عملت مثال لورقتين تم الترحيل يدوي ووضعت بيانات جديدة هذه البيانات يتم ترحيلها الى ورقة جديدة وهي حتما تكون رقم 3 اي تفتح ورقة جديدة وتاخذ الرقم الذي يلي السابقة نقوم بترحيل البيانات كاملة ومسحها من ورقة data بنفس التنسيق ولكن بدون معادلات مع الاحتفاظ بالمعادلات في ورقة data وكلما تم ترحيل بيانات جديدة في ورقة جديدة يتم اضافة مجموع الاجمالي الى الخلية k1 في ورقة data وفقكم الله وشاكرا تعاونكم معي تحياتي ترحيل الى اوراق متعددة.rar

السلام عليكم هل يمكن ترحيل البيانات من ورقة data الى ورقة أخرى تأخذ رقم 1 وهكذا كلما تصل التعبئة للبيانات الى الصف38 تترحل الى ورقة جديدة مع الإجمالي تحمل رقم مسلسل من 1 الى أي رقم ينتهي به المصنف مع ملاحظة ان مجموع اجمالي جميع الأوراق يكون في ورقة data في الخلية k1 شاكر تعاونكم معي كون الطلب لاحد أصدقاء اخواني في الله جزاكم الله خيرا وبارك الله بكم

السلام عليكم هل يمكن ترحيل البيانات من ورقة data الى ورقة أخرى تأخذ رقم 1 وهكذا كلما تصل التعبئة للبيانات الى الصف38 تترحل الى ورقة جديدة مع الإجمالي تحمل رقم مسلسل من 1 الى أي رقم ينتهي به المصنف مع ملاحظة ان مجموع اجمالي جميع الأوراق يكون في ورقة data في الخلية k1 شاكر تعاونكم معي كون الطلب لاحد أصدقاء اخواني في الله جزاكم الله خيرا وبارك الله بكم ترحيل الى اوراق متعددة.rar

السلام عليكم اخي العزيز محمد حسن اليك ملف فيه الاثنين بالمعادلات والاكواد العمل للاساتذة الكرام ارجو ان يكون هو المطلوب .. تحياتي كشف حساب بالمعادلات والاكواد.rar

السلام عليكم استاذي عبد العزيز جزاك الله خير الله ينوّر عليك ويعطيك العافية ويحفظ عيالك تحياتي

السلام عليكم المرفق ملف كان فيه فورم للانتقال لاوراق العمل بالكود اردت ان اعيد تسمية الأوراق وترتيبه للتعديل لم استطع بعدها حذفت جميع الاكواد لغرض وضع اكواد جديدة و اظهار أوراق العمل فاختفت جميعها فقط واحدة علما انها موجودة في المصنف كيف يمكن اظهارها جزاكم الله خيرا شاشة دخول شيت كنترول برقم سرى - سعيد بيرم.rar