Eng_A_Shawky

ماشاء الله ولا حول ولا قوة إلا بالله أبداع X تميز X تألق لا أملك إلا أن ادعو لكم اخواني الكرام عن ظهر الغيب، أعزكم الله جميعا وشرح صدوركم وييسر لكم جميع أموركم وفتح الله عليكم فتوح العارفين كان الله دائما في عونكم لما تبذلوه من مجهود في معاونة أخوانكم ، بارك الله فيكم وجزيتم كل خير كم من الإفادة التي استفدتها منكم أخواني الأحباء وبإذن الله تعالى سأحاول فهم كيفية عمل هذا الكود لتطبيقه على أوراق عمل أخرى فعلا لايقل أي عمل عن الآخر في الأهمية فجميع الأعمال تم تقديمها من عمالقة المنتدى بارك الله فيكم وجزيتم كل خير

وعليكم السلام ورحمة الله وبركاته حياك الله وجزيت كل خير أخي الغالي على تقديم المساعدة، بالفعل الملف يقوم بالترحيل لكن لي سؤال إن لم أكن أثقل عليك: لماذا يتم مسح البيانات المرحلة من اوراق العمل الخاصة بكل شهر إذا تم ترحيل بيانات جديدة عليها؟ بارك الله فيك

اين انت يا غالي ، برجاء المساعدة بارك الله فيكم

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

حياك الله اخي الغالي ابو تامر مشرفنا القدير، وبالفعل الدالة إحدى العجائب كما قلت وبالفعل استخدمها في البحث فهي الملكة الاولى للبحث و استخراج البيانات كما أخبرت لكن ما اريده هو ان يتم ترحيل البيانات من ورقة العمل المسماه "الرئيسية" الى صفحات الشهر المناظر تبعا لاسم الشهر ومن ثم مسح البيانات الموجودة بورقة العمل لتصبح خالية لإدخال بيانات جديدة بها الفكرة كالتالي: سيتم كتابة البيانات كل عشرة ايام في هذه الورق "الرئيسية" (بمعنى انه سيتم كتابة ماحدث في اليوم الاول لكل معدة على حدى ومن ثم الثاني وحتى اليوم الثالث) وسيتم طباعة هذه الورقة كل عشرة ايام وما اريده هو ان يتم ترحيل البيانات بعد طباعة الورقة لتصبح فارغة وجاهزة لإدخال عشرة ايام جديدة ومن ثم ترحيلهم واضافتهم على البيانات المرحلة سابقا وهكذا

السلام عليكم ورحمة الله وبركاته قمت بإنشاء ملف لأدخال البيانات للمعدات بالعمل، ما اريده ان يتم ترحيل هذه البيانات عند الضغط على الزر "ترحيل" على حسب الشهر، بمعنى البيانات الخاصة بشهر يناير يتم ترحيلها الى ورقة العمل التي تسمى يناير والبيانات الخاصة بشهر فبراير يتم ترحيلها الى ورقة العمل المسماه فبراير وهكذا حاولت عملها بقاعدة IF لكنها لم تنجح معي فلازلت مبتدأ في البرمجة باستخدام VBA بارك الله فيكم وجزيتم كل خير Transfer.rar

السلام عليكم ورحمة الله وبركاته بارك الله فيك أخي الغالي هادي سالم على تقديم يد العون والمساعدة، جزيت كل خير عني وعن ما تفعله من خير ، كان الله في عونك دائما لطالما استفدت من مواضيعك الموجودة بالمنتدى والتي تكثر بها المعلومات بالنسبة للترحيل، فالملف المرفق يرحل بالفعل بالمكان المناسب، ففكرة عمل الملف انه سيتم ادخل البيانات اولا في الشيت المسمى "الرئيسية" ومن ثم سأقوم بانشاء مفتاح يسمى "ترحيل" حيث يتم الترحيل تبعا لاسم الشهر ولرقم المعدة بمعنى انه سيتم نقل كل البيانات الخاصة بكل المعدات بشهر يناير الى ورقة العمل المسماه "يناير" وفي نفس الوقت سيتم نقل البيانات الخاصة بكل معدة الى ورقة العمل الخاصة بها وبذلك سيكون لدي ورقة عمل خاصة بالمعدة (حركة جميع الشهور ) وورقة عمل اخرى خاصة بالشهر (حركة بيانات جميع المعدات خلال الشهر) اتمنى ان اكون اوضحت لك ما اقصده اعزك الله اخي الكرم ورفع من قدرك بالأيمان، بالفعل استفدت من ورقة العمل التي ارفقتها الي وقمت بعمل خانة الإجمالي بنهاية كل مدخل بارك الله فيك وينقصني الآن نقطة الترحيل والتنسيق اسأل الله أن لا أكون مثقل عليك في طلبي ان توضحها إلى (الترحيل من الشيت المسمى "الرئيسية" الى ورقة عمل كل شهر تبعا لاسمه والترحيل الى كل ورقة عمل خاصة بكل معدة تبعا لرقمها) حفظك الله أخي

اين انتم يا عباقرة الموقع هل ما اطلبه لايمكن تنفيذه يا اخوان؟ افيدوني بالله عليكم ماتوصلت اليه انه يمكن التنفيذ عن طريق قاعدة If لكن ينقصني صيغتها في صورة Range فقد قمت بتطبيقها عن طريق الخلايا (اي لخلية واحدة فقط) ارفقت لكم الملف مره أخرى Machines_1.rar

سؤال : هل ما أطلبه يمكن تنفيذه بسهولة وموجود أم يصعب؟ (هو سؤال حول امكانية تنفيذ ما أريد) بالنسبة للجمع وجدت له حل وهو ان أضع TextBox في بداية العمود ومن ثم اساوي قيمتها بقيمة خلية أخرى بعيدة عن ورقة العمل ويكون مكتوب فيها معادلة الجمع وبالتالي فسيتم الجمع لاي بيانات مدخلة بالنسبة للأطار حاولت أستخدام قاعدة If معه لكن لم تنجح المحاولة معي ترحيل البيانات المشروط لم ينجح معي بتاتا ولازلت أحاول إلى إن يمن الله علي أو على أحد من اخواني بالحل السليم بارك الله فيكم

السلام عليكم ورحمة الله وبركاته بارك الله فيكم اخواني الكرام على هذا الجهد الطيب جزاكم الله عنه خير الجزاء استفدت كثيرا من بحثي بالمنتدى، لم اكن استطع ان اقوم بعمل ماكرو للطباعة وبفضل الله تعالى ثم المنتدى والصحبة الطيبة بهذا الصرح الكبير تمكنت من البرمجة بلغة ال VBA لأخي العزيز أكسيلجي الفضل الكبير لبدأي هذا البرنامج فقد وضع قدمي على اول الطريق بارك الله فيه وفيكم وجزيتم خير الجزاء وقفت معي امور قليلة على انهاء ما اريد عمله وهي الترحيل والتنسيق والجمع التلقائي أرفقت لكم ملف لاوضح ما اريد ان اقوم بعمله وللتوضيح أكثر أولا يتم ادخال البيانات من خلال نموذج الاخال، ما اريد عمله هو ان يتم الجمع التلقائي للتكلفة الاجمالية للبيانات المدخلة، بمعنى لو ادخلنا سبعة بيانات فيتم جمع تكلفتهم بالخلية الثامنة وهكذا ثانيا: هل يمكن ان يتم وضع اطار للصفوف التي تحتوي على بيانات بصورة تلقائية؟ بمعنى انه عند ادخال بيان الى الصف يتم وضع اطار له وإن لم يكن به بيان لايتم وضع اطار للصف اثقل عليكم بسؤالي الاخير وهو عن ترحيل البيانات واعذروني على سؤاله فلازلت مبتدأ بالVBA ومسألة ترحيل البيانات تصعب علي فهمها من اول وهلة فبحث بالمنتدى ووجدت الكثير من المواضيع المتعلقة بترحيل البيانات لاخوان لهم ثقلهم بالمنتدى (اخشى ان اذكر اسماء فيذهب عن بالي ذكر احدهم فاقلل من شأنه الكبير) لكن ما اريده هو ان يتم ترحيل البيانات بصورة نستمرة عن طريق الضغط على مفتاح Command ،ويكون الترحيل كالتالي: أولا يتم الترحيل تبعا لرقم المعدة الى الصفحة الخاصة بالمعدة ثانيا: الترحيل تبعا لاسم الشهر الى ورقة العمل الخاصة بالشهر (طبعا سنتجاهل هنا رقم المعدات) وان يكون الترحيل متتابع، بمعنى انه اذا تم ادخال بيانات جديدة ومن ثم ترحيلها يتم ترحيلها في صفوف تلي البيانات القديمة دون احلالها لمكانها وإن كان من الممكن ترحيل خانة الاجمالي معهم اسأل الله ان اكون قد أوضحت مقصدي بارك الله فيكم وجزيتم خير الجزاء

بارك الله فيك وجزيت كل خير أخي Justice أسطوانة رائعة ومفيدة جدا بأذن الله تؤجر عن كل معلومة منها خير الجزاء

بارك الله فيك وجزيت كل خير

بارك الله فيكم وجزيتم كل خير عنا مبتدأ بالبرمجة بالأكسل والحمد لله وجدت الإفادة الكبيرة في هذا الموضوع

السلام عليكم ورحمة الله وبركاته والله اخي انا ما فهمت الفكرة من الملف، استسمحك ان توضحها لي

بارك الله فيك وجزاك الله كل خير أخي، جعل الله المحبة في الله بيننا وحبب فيك الناس اجمعين ويسر عليك من امورك العسيرة كلها قدر ما يشاء فائق احترامي لك فقد قمت بعمل البرنامج بفضل الله اولا وتوفيقه ثم بفضل مساعدتك لي قمت بعمل قائمة رئيسية ووضعت فيها Command Button's لكي استطيع التنقل بين اوراق الاعمال بالشيت وايضا استطعت عمل Combo box لكي ادرج أرقام المعدات فيه ليتم الاختيار منه كما اوضحت لي اخي في الحقيقة هو اول برنامج أقوم بعمله عن طريق الفورم، والحمد لله أستاذ عزيز وله وزنه وثقله قام بارشادي للطريق وبتوفيق من العزيز العليم تمكنت من اخراج البرنامج باذن الله سأقوم بمراجعة الموضوع الذي أرجحته إلى وابدأ بالكتب الصغيرة الحجم كما قلت يتبقى لي سؤال يا غالي وهو عن كيفية حماية الملف؟ فأريد ان اقوم بعمل حماية على الـ VBA التي قمت بعملها ضد التعديل أو المسح وايضا هل من طريقة تمكنني من عمل حماية للخلايا، بمعنى انني اريد ان يتم ادخال البيانات من الفورم (النموذج) فقط ولا يمكن ان يتم تعديل البيانات او مسحها عن طريق الشيت بالاكسل فعند عمل Protect للشيت لا يمكن أن يتم إدخال البيانات فائق احترامي لك اخي

استاذي العزيز ، هذا هو المطلوب بعينه ، بارك الله فيك وجزيت كل خير عن ما فعلته وما ستفعله من تقديم العون والمساعدة لمن يحتاجها والله إن كلمات الشكر لا توفيك حقك واجرك سأظل ادعو لك كما اخبرنا حبيبنا المصطفى (عليه افضل الصلاة والسلام) حتى اشعر اني اوفيتك حقك اعزك الله اخي الحبيب ورفع من قدرك بالايمان وحفظك باسمه الذي لا يضر معه شئ في الارض ولا في السماء وبأذن الله سأقوم بتطبيق هذا على كل اوراق العمل التي اعمل عليها حتى يسهل إدخال البيانات بها، واستأذنك اخي إن عسر علي فعل شئ ان أقوم بأستشارتك فيه لي سؤال يا غالي: أي الكتب ترجح قرائته لكي يمكنني تعلم الفيجوال بيزيك الخاص بالأكسل ؟ بارك الله فيك وجزيت كل خير عنا

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

السلام عليكم ورحمة الله وبركاته بارك الله فيكم وجزيتم كل خير عنا لما تقوموا به في هذا الصرح الكبير وجعله الله ثقيلا في ميزان حسناتكم اسأل الله ان لا اكون اثقل عليكم بسؤالي هذا، صراحة انه لاتوجد لدي خبرة بالفورم فقد بدأت في عملها منذ يومان فقط، أقوم بعمل برنامج لتسجيل المعدات للشركة فأقوم فيه بتسجيل البيانات للمعدات وتواريخ الصيانة وقطع الغيار المستخدمة والتكلفة والوقود المستهلك وتكلفته وهكذا كما ستلاحظون بورقة العمل قمت بتصميم فورم لكي يتم ادخال البيانات من خلالها الى الاعمدة على ان يتم التنقل بين الصفوف تلقائيا (بمعنى انه عن الانتهاء من ادخال القيم الخاصة بالصف الاول والضغط على مفتاح أدخال ينتقل تلقائيا الى الصف الذي يسبقه وهكذا) لكنني لم استطع ان اقوم بعمل ذلك أي ما اريده هو ان يتم كتابة البيانات من خلال الفورم ومن ثم الضغط على إدخال فيتم ادراج البيانات المدخلة في الصف وينتظر بيانات جديدة لكي يتم ادخالها في الصف الذي يليه وهكذا قمت بعمل ذلك عن طريق عمل Data List ومن ثم أختار Form فيقوم بعمل شئ شبيه بما اريده، لكن الفورم لاتظهر الا اذا تم اختيار ذلك من القائمة اتمنى ان اكون اوضحت ما اريد عمله ولا ارهقكم في فهمه واثقل عليكم في توضيح كيفية عمل ذلك لانني سوف اقوم بعمله على اكثر من ورقة عمل ولي سؤال آخر اطال الله عمركم وصبركم وهو : هل يمكن عمل قائمة اختيارية في الفورم؟ بمعنى انه بجوار كلمة "البيان" الموجودة بالفورم اريد ان اقوم بعمل Drag Down Menu ليتم الاختيار بين (صيانة دورية - صيانة وقائية - سولار - زيت) والقيمة المختارة يتم كتابتها في المكان المخصص لها بالجدول وفضلا لا امرا لو توضحوا لي كيفية عمل ذلك لانني سأقوم بتطبيقه على اكثر من ملف بارك الله فيكم وجزيتم كل خير Machines.rar

بارك الله فيك وجزيت خيرا

حياك الله اخي الحبيب على سرعة الرد والاستجابة السريعة بارك الله فيك وجزيت كل خير عنا وجدت حل لتلك المشكلة الا وهو عمل Data Filter ومنه سأتمكن من عرض التصنيفات التي اريدها بارك الله فيك وجزيت خيرا عنا

السلام عليكم ورحمة الله وبركاته بارك الله فيكم وجزاكم كل خير على المجهود الجبار المبذول بهذا الصرح الكبير جعله الله ثقيل في ميزان حسناتكم هذا اول طلب لي وأسأل الله ان اجد اجابته عندكم بدأت أستخدام الأكسل منذ فترة قصيرة وقمت بعمل ورقة عمل خاصة بالجامعة يتم فيها حساب درجات الطلاب لكل مادة وتقديرهم (بداية من الراسب وحتى الممتاز) في هذه المادة ومن ثم يتم حساب المجموع الكلي للطلاب وتقديره العام (من راسب إلى ممتاز) ما أريد عمله هو ورقة عمل تحتوي على أسماء الطلاب مقسمة إلى مجموعات: مجموعة تحتوي على الطلاب الحاصلون على تقدير ممتاز وأخرى تحتوي على الحاصلون على جيد جدا وهكذا إلى أن ننتهي بالطلبة الراسبون وسيتواجد بينهم مجموعتان احداهما للطلاب المنقولون بمادة واخرى للطلاب المنقولون بمادتين (يتم كتابة التقدير "منقول بمادة" أو "منقول بمادتين") كل مجموعة أريدها ان تكون مرتبة ترتيبا أبجديا مع ان ينتقل صف التقديرات الحاصل عليه الطالب في كل ماده الى جوار اسمه في المجموعة المنضم اليها واريد أن تتم هذه العملية تلقائيا بدون تدخل فهل هناك دالة أو مجموعة من الدوال يمكنها عمل ذلك؟ ارفقت لكم ملف لأوضح فيه ما اريد فعله أسأل الله أن اجد الحل عندكم بارك الله فيكم وجزيتم خير الجزاء Grade_Base.rar

بارك الله فيك وجزيت عنا خير الجزاء

بارك الله فيك وجزاك عنا كل خير