عادل حنفي قام بنشر يونيو 4, 2010 مشاركة قام بنشر يونيو 4, 2010 السلام عليكم اخواني الاعزاء كثير منا يبحث لان يكتب كود و يضغط علي ذر لينفذ امر ما و تم عمل دورات كثيرة لذلك اليوم جاءتني فكرة جديدة بطريقة تفاعليه اتمني ان ان يكتب لها النجاح مارايكم اذا دخلنا مباشرة لما نريد و ماريده هنا سابدأ فكرته فسوف اطرح شيئ اريد عمله مهما كان بسيطا و بالتالي شرح طريقة تنفيذه عمليا دون الدخول في مذكرات و مقالات محاولة مني للاختصار و الدخول في صلب الموضوع و الكل طبعا مدعو للاسئلة و ايضا مدعو للرد علي الاسئلة و كلما كانت الاسئلة بسيطه استفاد منها كل من يريد التعلم و ايضا تجعل الرد عليها بسيطا دون الدخول في اشياء كبيره لايستطيع منها المبتدئ فهم شئ و في المجمل قد يكون هذا موضوعا مرجعا لكل مبتدئ و سأبدأ من عندي في مشاركة لاحقة بسؤال ثم الاجابة عليه كبداية و لا يخجل احد من سؤاله مهما كان بسيطا فهذا الموضوع اقصد به هذا النوع من الاسئلة فانا اريد الكل هنا حتي الذي لا يعرف شسئ مطلقا و الرجاء البساطة في الاسئلة حتي لا يكون هناك الحاجة لوقت طويل للاجابة عليها و يفقد الموضوع المقصود منه ارجو ان يكون موضعا يستفاد منه اكبر عدد و يشترك به اكبر عدد سواء من الاعضاء الجدد و الي المشرفين جميعا و سيكون الفيصل في استمرار الموضوع من عدمه هو تفاعلكم جميعا سواء بالاسئلة او بالرد عليه خالص تحياتي و تقدير 1 رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يونيو 4, 2010 مشاركة قام بنشر يونيو 4, 2010 سر على بركة الله أخي الحبيب فنحن في حاجة لمثل تلك الأمور التي تبدو بسيطة ولكنها في النهاية تصبح ذات مغزى وهدف بارك الله فيك وجعل أعمالك في موازين حسناتك يوم القيامة أخوك أبو البراء رابط هذا التعليق شارك More sharing options...
ابو الآء قام بنشر يونيو 4, 2010 مشاركة قام بنشر يونيو 4, 2010 بارك الله فيك اخى الكريم وليكن انا اول السائلين ؟ ما الفرق بين المعادلات العادية و المعادلات الضيف؟ وكيف يكم الاستغناء عن وضع معادلة الترحيل فى كل خليه واستبدالها بكلمة ترحيل يااار يت شرح مبسط؟ ولك خالص تحياتى اخيك ابو الاء . رابط هذا التعليق شارك More sharing options...
عادل حنفي قام بنشر يونيو 4, 2010 الكاتب مشاركة قام بنشر يونيو 4, 2010 كيف تجعل عند الضغط علي ذر ان تحدد خليه معينه او مجموعة خلايا معينه؟ افتح ملف جديد من view ثم Toolbars و اختار control Toolbox و ذلك لاظهار شريط الادوات الذي سنحتاجه كثيرا في عملنا و بعد ذلك نضغط بالماوس علي شكل الزر الموجود علي هذا الشريط و نذهب بالماوس الي اي مكان فارغ داخل الشيت و نذعط علي زر الماوس الايسر دون ان نترك الزر نحدد حجك الزر برسمه بالماوس علي الشيت ستجد في هذا الوقت انك في وضع التصميم اي في الوضع الذي يمكنك من التعديل علي شكل الزر و كذلك كتابة الكود لهذا الزر و ايضا عند الضغط علي الزر بزر الماوس الايسر و اختيار Properties ستظهر لك قائمة تستطيع التعديل بها علي مواصفات الزر و كذلك اسمه جرب بها لمعرفة ما تستطيع عمله بها و لمعرفة انك في وضع التصميم او التنفيذ اولا شتجد شكل زر الماوس مختلفا في كلا الوضعان كذلك فانه في وضع التصميم ستجد علي الشريط الذي اظهرناه سابقا ايقونه علي شكل مثلث اقصي يسار الشريط فاذا كانت مضغوطه فمعناه انك في وذع التصميم و ان لم تكن فانك في وضع التنفيذ اي الوضع الذي اذا ضغط فيه علي الزر و كنت قد كتبت له كود سيقوم بتنفيذ هذا الكود نضغط علي الزر مرتان شتظهر لنا صفحة محرر الاكواد و ستجد سطران يها الاول Private Sub CommandButton1_Click() و الثاني End Sub و هذان السطران هما الذان سكتب بينهما الكود الذي نريده و الذي سينفذ عند الضغط علي الزر ناتي هنا الي ما نريد ان يقوم به الزر و هم اولا تحديد خليه معينه عند الضغط علي الزر و لتكن الخليه H11 و سيتم كتابة هذا السطر بين السطران السابقا Range("H11").Select ليكون الشكل النهائي كالتالي Private Sub CommandButton1_Click() Range("H11").Select End Sub اما اذا اردت تحديد مجموعة خلايا او مدي معين و ليكن من H11 الي H20 Private Sub CommandButton1_Click() Range("H11:H20").Select End Sub اغلق محرر الاكواد و اضغط علي المايقونة المثلث في الشريط السابق ذكر لنكون في وضع التصميم و اضغط علي الزر لتعرف نتيجة ما قمت بعمله جرب عمل هذا و اترك لتكيرك المجال للادراك و الاستنباط و التخيل لتساعد نفسك علي التعلم و بسرعة انا قصدت هنا ان اتوسع في التفاصيل شيئا ما لان النقطه التي ستفصل مرة ستعرف انها مهصلة مسبقا و المفرض من دخل علي الموضوع قد عرفها و بالتالي لن تشرح مرة اخري هذا البدايه وسنري ما يحدث لاحقا اما المتابعة او التوقف حاولت ارفاق مثالا لكن لا ادري هل العيب من عندي ام لا فلم يتم رفع الملف و امس حدث نفس الشئ مع ملف اخر المهم الموضوع بسيط جربوا واخبروني النتيجة خالص تحياتي و تقديري 1 رابط هذا التعليق شارك More sharing options...
عادل حنفي قام بنشر يونيو 4, 2010 الكاتب مشاركة قام بنشر يونيو 4, 2010 السلام عليكم اخي YasserKhalil بارك الله فيك و انت معي ايضا و مدعو للمشاركة معنا و قد يكون هذا الموضوع محققا لما كنت تصبوا اليه انت ايضا في موضوعك مكتبة الاكواد اخي abo_alaa وبارك الله فيك اخي و ليس تمنعا في الاجابة عليك و لكن انا ان سمحت لي اريد الاسئلة متسلسلة من البداية و حتي النهاية لتدرج الفهم عند من يرجع الي الموضوع و لعدم تشتت الموضوع ويذهب الهدف منه لكم مني جميعا خالص التحية رابط هذا التعليق شارك More sharing options...
امان قام بنشر يونيو 6, 2010 مشاركة قام بنشر يونيو 6, 2010 السلام عليكم ورحمة الله بصراحة فكرة رائعة جدا وكم نحن بحاجة لمثل هذه الطرق التفاعلية والتي توضح للسائل الكيفية التي يتم بها وضع الحلول أتمنى ان يأخذ الموضوع حقه من الجميع حتى ولو طال به الأمد خاصة ان هذه الفترة قد تكون شبه ميتة بسبب كثرة انشغال الاخوان بإمتحانات نهاية العام تحية تقدير للجميع ولأخي الفاضل aah_aah2008 على مبادرته الجميلة رابط هذا التعليق شارك More sharing options...
أيسم إبراهيم قام بنشر يونيو 6, 2010 مشاركة قام بنشر يونيو 6, 2010 السلام عليكم جميعا أستاذنا الأستاذ عادل جزاك الله كل خير على الطرح الرائع و الطريقة المبتكرة ندخل في الموضوع بعد أن قمنا بتحديد المدى المطلوب كما شرحت كيف يمكننا أن ننفذ أمر ما على المدى الذي تم تحديده؟؟ وليكن الأمر مثلا مسح محتويات هذا المدى هل سيكون الكود بالشكل التالي Private Sub CommandButton2_Click() Range("A1:A10").Select Selection.ClearContents End Sub المرفق ملف تم فيه تنفيذ شرح الأستاذ عادل والمتابعة من بعده بجزئية مسح محتويات المدى دمتم بخير أيسم إبراهيم RANGESELECTION.rar رابط هذا التعليق شارك More sharing options...
السيد عبد الفتاح قام بنشر يونيو 6, 2010 مشاركة قام بنشر يونيو 6, 2010 السلام عليكم ورحمة الله وبركاته الأخ العزيز / aah_aah2008 بوركت وزادكم الله علماً بارك الله خطاك ونفع بعلمكم فامض في طريقك يا أخي ونحن لك مؤيدون بالفعل موضوع يستحق المشاركة والتفاعل ونرجو من الله أن يتم طرح مواضيع وأفكار جديده يتم الإستفادة منها جزاكم الله خيراً رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر يونيو 6, 2010 مشاركة قام بنشر يونيو 6, 2010 السلام عليكم =========== بارك الله فيك اخى عادل ان شاء الله ستكون مشاركات مفيدة وهذا شرح لمشاركتك رقم 4 ليستفيد منها جميع الاخوة شرح مشاركة 4 عادل حنفى.rar رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر يونيو 6, 2010 مشاركة قام بنشر يونيو 6, 2010 الأخ عادل جزاكم الله خيراً على هذا الموضوع الذي سيكون له أثر واضح وملموس في تعلم كثير من الأعضاء بارك الله فيك أخي هشام شغل على ميه بيضه ياريت تواصل العمل على هذا المنوال الشرح بالفلاشات .. ممتع ومفيد وذو أثر ملموس في عملية التعلم الشكر موصول للأخ أيسم إبراهيم على الملف المرفق أخوكم أبو البراء رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر يونيو 6, 2010 مشاركة قام بنشر يونيو 6, 2010 ممتاز جدا يبدو أن هذا صيف تعلم الأكواد سؤال ما معنى [a1] و ما الفرق بينها و بين cell(1,1) و range("a1") رابط هذا التعليق شارك More sharing options...
اوفيس 2003 قام بنشر يونيو 6, 2010 مشاركة قام بنشر يونيو 6, 2010 رااااااااااااااااااااااااااااااائع رااااااااااااااااااااااااااااااااااااائع اتمنى اتمنى ان تظلو هكذا شرح نظري وشرح عملي بالفلاش الله يبارك فيكم رابط هذا التعليق شارك More sharing options...
عادل حنفي قام بنشر يونيو 6, 2010 الكاتب مشاركة قام بنشر يونيو 6, 2010 السلام عليكم اخي امان بارك الله فيك و دعواتك اخواني ايسم ابراهيم هشام شلبي اشكركما علي المرور و كلماتكما الجميله و سعدت باضافتكما و التي اتمني ان تكون مستمره ان شاء الله اخي YasserKhalil بارك الله فيك اخي kemas المقصود بـ RANGE("a1") اي الخليه a1 اما المقصود بــ CELLS(I,1) هنا قد يكون مطلوب ان الكود يكرر عمله علي عدة صفوف في مدي معين في اي عمود نختاره و هنا سيكون شكل الكود كالتالي For I = 4 To 13 If Cells(I, 4) = "" Then Cells(I, 4).Interior.ColorIndex = 34 End If Next او بالشكل التالي X = 4 For I = 4 To 13 If Cells(I, X) = "" Then Cells(I, X).Interior.ColorIndex = 44 End If Next و الكود معناه ان يمر الكود علي الخليه الموجوده بالصفوف من 4 الي 13 و العمود الرابع فان وجدها خاليه يعطيها لون اخر مرفق ملف يوضح المقصود خالص تحياتي 2.rar رابط هذا التعليق شارك More sharing options...
الحسامي قام بنشر يونيو 7, 2010 مشاركة قام بنشر يونيو 7, 2010 السلام عليكم اخي العزيز عادل حنفي موضوع اكثر من رائع وسيستفيد منه الجميع ان شاء الله جعله الله في ميزان حساناتك وبارك الله فيك اخوك عماد الحسامي رابط هذا التعليق شارك More sharing options...
exedragon قام بنشر يونيو 7, 2010 مشاركة قام بنشر يونيو 7, 2010 موضوع جميل وبارك الله فيك وجزاك خير ان شاء الله رابط هذا التعليق شارك More sharing options...
أبوعبد الله قام بنشر يونيو 7, 2010 مشاركة قام بنشر يونيو 7, 2010 أخي الحبيب / عادل مشاركة قيمة بكل المقاييس وأتمنى لك كل التوفيق مع كل من سيشارك بها فلك جزيل الشكر والتقدير والشكر موصول للأخوة الأعزاء هشام شلبي وأيسم إبراهيم ، وإلى الأمام دائماً على بركة الله . مع حبي وتقديري أبو عبدالله رابط هذا التعليق شارك More sharing options...
عادل حنفي قام بنشر يونيو 7, 2010 الكاتب مشاركة قام بنشر يونيو 7, 2010 السلام عليكم اخي العزيز الحسامي اشكرك علي كلماتك و علي مرورك الكريم اخي و حبيبي ابو عبدالله الله يباركلك في كل خطواتك فانت اخا عزيزا و طبعا انتم معنا انت و الاخ الحسامي لاثراء الموضوع لاستفادة اكبر عدد ممكن خالص تحياتي و تقديري رابط هذا التعليق شارك More sharing options...
يوسف عطا قام بنشر يونيو 7, 2010 مشاركة قام بنشر يونيو 7, 2010 الأخ الكريم صاحب الدار (الموضوع) الأخوة الأعزاء الضيوف بعد التحية والسلام الموضوع ممتاز وأكثر من رائع ولكن تفضل الأخ الكريم صاحب الدار وذكر أنه يرغب أن يكون الموضوع متسلسلاً ومتدرجاً وفهمت أنه يقصد التدرج من الأكواد السهلة البسيطة ككود التحديد ثم كود المحو كما تفضل الأخ ايسم وهكذا أكواد سهلة وبسيطة ومستخدمة بكثرة فى البداية وتتدرج شيئاً فشيئاً للأصعب والأكثر تعقيداً ولكن لا أعلم وجدت الموضوع يقفز قفزة قوية بالسؤال فى المشاركة رقم 11 والرد عليه فى المشاركة رقم 14 فأحسست أنه ربما سيؤدى تكرار هذا الوضع لتفريغ للموضوع من هدفه وهو التدرج والتبسيط والتعليم أعتذر لو كان رأيى مخالفاً لبعض الآراء ولكنى لا أقصد به إلا الخير وفى هذا المجال دعنى أسأل سؤال فى البداية ما هى الطرق المختلفة (الأوضاع المتنوعة) لوضع الكود فى مكانه مثلاً الكود الذى ينفذ بمجرد فتح الملف والكود الذى ينفذ بضغط زر والكود الذى ينفذ فى ورقة محددة والكود الذى ينفذ فى جميع أوراق الملف لا أعرف هل أنا بهذه الأسئلة أناقض كلامى بالأعلى أم أن هذا يعتبر تمهيد يجب أن نعرفه عند بداية التعامل مع الأكواد شاكر لكم جميعاً رابط هذا التعليق شارك More sharing options...
BuFaisal قام بنشر يونيو 8, 2010 مشاركة قام بنشر يونيو 8, 2010 اخواني الاعزاء في البداية اود العتذار لتكرار طلبي وذلك لانني وضعته في موضوع مستقل سابقاً باسم "أستفسار عن الترحيل الى ملف اخر" وتكرار استفساري هنا ليس للالحاح ولكن اعتقد ان وقت طرح الموضوع سابقاً كان غير مناسب لتزامنه مع المشاكل التي طرأت على المنتدى حيث كان استفساري كتالي : لو فرضنا انه لدي فورم "جدول" يجمع البيانات من اقسام او فروع مختلفة واود ان اصدر هذه المعلومات الى ملف اخر "قاعدة بيانات اساسية" على ان يقوم بتالي 1- كل فورم سيكون له رقم خاص لذلك عند الترحيل سيبحث اذا كان هذا الرقم موجود في قاعدة البيانات ويطرح استفسار حذف جميع بيانات القديم وستبداله بالجديد او الغاء 2- كل فورم سيكون به مدخلات من اماكن متفرقة في الفورم ولكن تم تجميعها في شيت خاصة في نفس الفورم على شكل سطر ليناسب تنضيم قاعدة البيانات - وفي الوقت الحالي اقوم بنسخ هذا السطر والبحث عن رقم الفورم اذا كان موجوداً في قاعدة البيانات لستبداله بالمعلومات الجديدة او لصق السطر جديد كمدخل جديد في قاعدة البيانات 3- سيكون موقع قاعدة البيانات ثابت في الكمبيوتر واسم الصفحة لن يتغير لتسهيل عملية الترحيل 4- الفورمات عادةً يتم استلامها عن طريق الايميل فهل يمكن ان نرحل البيانات مباشرة عن طريق فتح الرابط وتفعيل كود الترحيل حيث ان قاعدة البيانات ثابته في موقعها المحدد على الكمبيوتر ولتسهيل العملية يوجد مثال للمطلوب من اعداد استاذي الكبير بوعبد الله ادام الله ضله الكريم لكن يصدر من صفحة الى اخرى في نفس الملف وقد حاولت جاهداً ان اعدل عليه ليتناسب مع احتياجاتي ولكن قلة الخبرة حالت دون الوصول الى المطلوب وفي الختام اعتذر عن التكرار والاطاله اخوكم بوفيصل ترحيل بوليصة تأمين-1.rar رابط هذا التعليق شارك More sharing options...
وائل مراد 700 قام بنشر يونيو 8, 2010 مشاركة قام بنشر يونيو 8, 2010 (معدل) فكرة جميله وموضوع رااااااااااااااائع أنا كنت أبحث على طريقة كيف أتعلم الكود وإن شاء الله سوف أتعلم معكم لكني نريد أن نتعلم أيضاً ما هي الطرق أ, الأساليب المتبعة لكي أنا اصمم كود جديد ليس أن أخذه جاهز منكم ليس تقليلاً بكم ولكن تحيقيق لبعض متطلباتي في مجال عملي وفي مساعدة غيري إن إستطعت والله المستعان وبارك الله فيكم جميعا ً تم تعديل يونيو 8, 2010 بواسطه wael700 رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر يونيو 8, 2010 مشاركة قام بنشر يونيو 8, 2010 السلام عليكم =========== فى اطار نفس الموضوع وقبل الانتقال الى موضوع اخر اود اضافة بعض الاوامر المرتبطة ب CommandButton1_Click() هذا زر امر طباعة Private Sub CommandButton1_Click() ActiveWorkbook.PrintOut End Sub هذا زر اختيار ورقة معينة ولتكن ورقة4 Private Sub CommandButton1_Click() Sheets(ورقة4").Select End Sub امر حفظ Private Sub CommandButton1_Click() ActiveWorkbook.Save End Sub امر خروج Private Sub CommandButton4_Click() ActiveWorkbook.Close End Sub امر كتابة تاريخ اليوم فى خلية محددة Private Sub CommandButton1_Click() Range("A1") = Now End Sub امر معاينة Private Sub CommandButton1_Click() ActiveWindow.SelectedSheets.PrintPreview End Sub امر اظهار فورم Private Sub CommandButton1_Click() UserForm1.Show End Sub امر تحديد مدى معين Private Sub CommandButton1_Click() Columns("D:D").Select End Sub امر تحكم فى عرض عمود معين Private Sub CommandButton1_Click() Columns("D:D").ColumnWidth = 2.50 End Sub امر اخفاء عمود Private Sub CommandButton1_Click() Columns("F:F").Select Selection.EntireColumn.Hidden = True End Sub امر تحديد صف Private Sub CommandButton2_Click() Rows("8:8").Select End Sub امر تحديد عرض صف Private Sub CommandButton2_Click() Rows("16:16").RowHeight = 2.24 End Sub 2 رابط هذا التعليق شارك More sharing options...
امان قام بنشر يونيو 8, 2010 مشاركة قام بنشر يونيو 8, 2010 السلام عليكم ورحمة الله بارك الله فيك اخي هشام وبارك في جميع من شارك في الموضوع لدي استفسار بسيط هناك اختلاف بين اوفيس 2003 و اوفيس 2007 في طرق عرض الخيارات واشرطة الادوات فهل من الممكن وضع امثلة على اوفيس 2007 لمزيد من التوضيح ؟؟ استفسار اخر وهو معاناة بالنسبة لي وهي طريقة ربط CommandButton بالكود حتى يتم تنفيذ المطلوب فمع كثرة المحاولة الا أنني اجد صعوبة في ذلك فهل من شرح وافي ومبسط لهذه النقطة وشكر الله لكم جميعا اخوكم رابط هذا التعليق شارك More sharing options...
يوسف عطا قام بنشر يونيو 8, 2010 مشاركة قام بنشر يونيو 8, 2010 (معدل) تحية وسلام للجميع سؤال بسيط هل يوجد فرق بين عمل الماكرو وعمل الكود لو كانا يحققان نفس الهدف ؟؟ يعنى مثلاً ايهما أفضل؟؟ أيهما يؤدى لزيادة حجم الملف أكثر ؟؟ ايهما أسهل فى التنفيذ بالنسبة للإيكسيل؟؟ الف شكر تم تعديل يونيو 8, 2010 بواسطه يوسف عطا رابط هذا التعليق شارك More sharing options...
يوسف عطا قام بنشر يونيو 8, 2010 مشاركة قام بنشر يونيو 8, 2010 تحية وسلام للجميع سؤال بسيط بعد عمل الكود أردت عمل إسم للزر الذى ينفذه فلم استطع كيف يمكن تعيين إسم مكتوب على الزر ؟؟ وكيف أتمكن من تعديل شكل الزر ليصبح مثلاً ثلاثى الابعاد أو على شكل صورة أو ايقونة الف شكر مقدماً رابط هذا التعليق شارك More sharing options...
هشام شلبى قام بنشر يونيو 8, 2010 مشاركة قام بنشر يونيو 8, 2010 السلام عليكم =========== اخى يوسف طاب مساءك على حسب ما فهمت هناك امران الزر العادى او CommandButton شاهد المرفقان JOOOOOO.rar JOOOO2.rar رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان