طارق محمود قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 السلام عليكم ورحمة الله وبركاته علي نسق الموضوع الرائع والمتميز "هل تعلم---------- معلومات تخص ListBox" لأخونا وأستاذنا الجليل / عبد الله باقشير (خبور خير) كما هي مواضيعه دائما ، أعزه الله وبارك له في جهده ووقته أردت أن نبدأ معا موضوع مشابه بعنوان "ماذ تفعل لو" وقصدت هنا أن نتعرض للمسائل التي نحتاجها كثيرا ، علي إختلاف وظائفنا واهتمامتنا تلك المسائل التي قد تأخذ الكثير من الوقت وقد يكون عند أحدنا حل سريع لها (بالمعادلات أو الأكواد) أو إن جاز التعبير (بعض التحايلات علي الإكسل) وللعلم سأستعين بأمثلة موجودة في كتاب إسمه : EXCEL-2007-Formulas_John Walkenbach أرجو أن يعجبكم الموضوع وان يشارك الجميع بما يفتح به الله عليه ملاحظة : بناءا علي طلب أخونا الفاضل حسين في المشاركة #27 من الموضوع سأضع فيما يلي فهرس للموضوعات 1- المسألة الأولي : تظليل سطر وتترك سطر -------------------------------------------- بدءا من المشاركة # 2 2- المسألة الثانية : تشكيل بياني أوتوماتيكي لآخر عدد محدد من البيانات -------------------------------------------- بدءا من المشاركة # 22 3- المسألة الثالثة : الحصول علي آخر (أحدث) سعر / بيان -------------------------------------------- بدءا من المشاركة # 34 رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر مارس 8, 2012 الكاتب مشاركة قام بنشر مارس 8, 2012 ماذ تفعل لو - المسألة الأولي بسم الله نبدأ سأبدأ بمسألة سهلة نسبيا ماذ تفعل لو تريد تظليل سطر وتترك سطر (في حالة البيانات الكثيرة وخشية زيغ البصر أثناء القراءة) والسؤال : ماهي أسهل وأسرع وسيلة لعمل ذلك في المرفق ورقتين بهما نفس البيانات ، الأولي ليس بها أي عمليات الثانية تم معالجة هذا الأمر بها ، أولا ننظر الفارق في سهولة القراءة بينهما ثم بسهولة تكتشفون العملية التي تمت علي الورقة الثانية وأنتظر تعليقاتكم ومشاركاتكم بأي مسائل تدخل تحت نفس العنوان تظليل سطر وترك سطر.rar رابط هذا التعليق شارك More sharing options...
الشهابي قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 أستاذنا القدير/ طارق محمود أولا : بكل حب وتقدير واحترام أشكرك على هذا الموضوع الذي أضنه سوف يكون مفيد إن شاء الله لكل الأعضاء وإن شاء الله تطرق فيه مسائل عدة مفيدة جزاكم الله كل خير وبالنسبة لنضليل سطر وترك سطر حسب الملف المرفق وحسب فهمي البسيط وطرقتي في التضليل تضليل السطر الثاني ثم يتم تحديد السطر الأول مع الثاني وعمل نسخ وبعد ذلك يتم تضليل بقية الأسطر في جدول البيانات ومن ثم عمل لصق خاص - لصق التنسيقات وربما في طرق أخرى منكم نستفيد جزاكم الله خير رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر مارس 8, 2012 الكاتب مشاركة قام بنشر مارس 8, 2012 السلام عليكم أخي الحبيب / الشهابي أولا شاكر جدا لمرورك الكريم وكلماتك الطيبة وحسب فهمي البسيط وطرقتي في التضليل تضليل السطر الثاني ثم يتم تحديد السطر الأول مع الثاني وعمل نسخ وبعد ذلك يتم تضليل بقية الأسطر في جدول البيانات ومن ثم عمل لصق خاص - لصق التنسيقات طبعا ممكن ذلك يأأخي ، ولكن يعيبها أنك إذا حذفت سطر لن يتم المحافظة علي شكل التنسيق ثم أننا إتفقنا ان نصل للمطلوب بسرع الطرق وفي حالتنا هذه الأسرع هو التنسيق الشرطي قف علي المجال وتحقق من التنسيق الشرطي عليه رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 السلام عليكم حل جميل =MOD(ROW();2)=1 ويمكن ان تستخدم نفس الشروط المستخدمة في التنسيق الشرطي ولكن بالكود رابط هذا التعليق شارك More sharing options...
الشهابي قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 ما شاء الله أستاذنا الكريم طارق تصدق حاولت أن أبحث عن حلك في كافة علامات التبويب إلا التنسيق الشرطي لم يخطر ببالي هذا ما توقعته منكم إستاذنا الكريم درر ثمينة تنثرونها لنا زادكم الله علما ورفعة منتظرين المزيد رابط هذا التعليق شارك More sharing options...
محمد مصطفى ابو حمزة قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 تحفة بس ممكن نعرف ايه دالةmod دى لو سمحت رابط هذا التعليق شارك More sharing options...
Eid Mostafa قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 أخى العزيز / طارق عمل أكثر من رائع وأحييك عليه وفقك الله إلى ما فيه خير الجميع خالص شكرى وتقديرى أخوك عيد مصطفى رابط هذا التعليق شارك More sharing options...
عبدالله المجرب قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 السلام عليكم هذا الكود يطبق عمل التنسيق الشرطي الكوجود في ملف الاستاذ طارق يوضع في حدث ورقة العمل المطلوبة Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Count > 1 Then Exit Sub If Not Intersect(Target, [A1:D596]) Is Nothing Then For i = 1 To [A1000].End(xlUp).Row If Cells(i, 1).Row Mod 2 = 0 Then Range(Cells(i, 1), Cells(i, 4)).Interior.ColorIndex = 40 Else Range(Cells(i, 1), Cells(i, 4)).Interior.ColorIndex = xlNone End If Next End If End Sub رابط هذا التعليق شارك More sharing options...
أبو ردينة قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 و عليكم السلام و رحمة الله وبركاته فكرة أكثر من ممتازة جزاك الله خيرا و نفع بك و بالجميع يا رب و علمنا ما ينفعنا - آمين رابط هذا التعليق شارك More sharing options...
elsedik قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 فكرة ممتاز يا استاذ طارق جزاك الله كل خير رابط هذا التعليق شارك More sharing options...
الخالدي قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 السلام عليكم ورحمة الله موضوع ممتاز أخي طارق واسمح لي بالمشاركة ماذا تفعل لو تريد تظليل سطر وتترك سطر (في حالة البيانات الكثيرة وخشية زيغ البصر أثناء القراءة) وماذا تفعل لو كانت هناك صفوف مخفية في المرفق حل بالتنسيق الشرطي -------------------- وللعلم أنماط الجداول الرسمية في اكسل 2007و2010(تسمى القوائم في اكسل2003) تقوم بتلوين الأسطر دون ان تتأثر بإخفاء أو حذف أو دراج صفوف في امأن الله تظليل سطر وترك سطر مع وجود صفوف مخفية.rar رابط هذا التعليق شارك More sharing options...
نورسعيد قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 يا أساتذة معذرة أنا مش شايف أى اكواد مكتوبة ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر مارس 8, 2012 مشاركة قام بنشر مارس 8, 2012 ======================== الاخ الحبيب/ طارق محمود ======================== و رابط هذا التعليق شارك More sharing options...
أبو أنس حاجب قام بنشر مارس 9, 2012 مشاركة قام بنشر مارس 9, 2012 السلام عليكم ورحمة الله وبركاته أستاذي الفاضل طارق محمود حفظك الله واثابك من الخير ما ترضى أبوأنس رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر مارس 9, 2012 الكاتب مشاركة قام بنشر مارس 9, 2012 السلام عليكم أخي الحبيب / الخالدي وللعلم أنماط الجداول الرسمية في اكسل 2007و2010(تسمى القوائم في اكسل2003) تقوم بتلوين الأسطر دون ان تتأثر بإخفاء أو حذف أو دراج صفوف هذا هو المطلوب من التفاعل في الموضوع بالفعل هذا الحل أحسن لو المسألة جداول والاكسل 2007 / 2010 جزاك الله خيرا رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر مارس 9, 2012 الكاتب مشاركة قام بنشر مارس 9, 2012 السلام عليكم أخي الحبيب / عبدالله المجرب (أبو أحمد) جزاك الله خيرا ، وأشكر تفاعلك المتميز أخي الحبيب / محمد مصطفى جزاك الله خيرا ، شاكرا مرورك الكريم أخي الحبيب / عيد مصطفى جزاك الله خيرا ، شاكرا مرورك الكريم أخي الحبيب / أبو ردينة جزاك الله خيرا ، شاكرا مرورك الكريم أخي الحبيب / الصديق جزاك الله خيرا ، شاكرا مرورك الكريم أخي الحبيب / نورسعيد جزاك الله خيرا ، شاكرا مرورك الكريم أخي الحبيب / عبدالله باقشير مرورك شرف كبير لنا جميعا وكما أشرت في المقدمة أنا أساسا مقتبس منكم الفكرة جزاك الله كل خير أخي الحبيب / حاجب جزاك الله خيرا ، شاكرا مرورك الكريم رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر مارس 9, 2012 الكاتب مشاركة قام بنشر مارس 9, 2012 أخي الحبيب / محمد مصطفى تحفة بس ممكن نعرف ايه دالةmod دى لو سمحت الدالة mod تأتي لك بباقي الفسمة بين رقمين مثلا mod(12,2) تقسم 12÷2 والباقي صفر كما أن mod(15,2) تقسم 15÷2 والباقي 1 واستخدامنا لها مع رقم السطر سيرجع لنا إما بصفر في الصفوف الزوجية ، 1 في الصفوف الفردية أخي الحبيب / نورسعيد يا أساتذة معذرة أنا مش شايف أى اكواد مكتوبة ؟؟؟؟؟؟؟؟؟ راجع التنسيق الشرطي Conditional Format ستجد به المعادلة المذكورة أو أخبرني بأي إكسل تستخدم 2003 ، 2007/2010 وسوف أدلك علي مكان التنسيق الشرطي Conditional Format لو لم تكن تعرفه رابط هذا التعليق شارك More sharing options...
saad abed قام بنشر مارس 9, 2012 مشاركة قام بنشر مارس 9, 2012 اخى المهندس / طارق محمود جزاك الله خيرا ان افضل المواضيع هى التى تجلب التفاعل والبحث عن حلول او الاطلاع على حلول الاخرين بارك الله فيك تحياتى سعد عابد رابط هذا التعليق شارك More sharing options...
معتصم محمد قام بنشر مارس 9, 2012 مشاركة قام بنشر مارس 9, 2012 بارك الله فيك استاذ طارق على هذا الموضوع الجميل ميزة المعادلة المستخدمة هي انها تعمل على النسخ القديمة 2003 و ما يليها طريقة اخرى لكنها تعمل من 2007 و ما يليها هي =ISEVEN(ROW()) وبالطبع يمكن تبديل ISEVEN ب ISODD و تبديل ROW ب COLUMN رابط هذا التعليق شارك More sharing options...
الخالدي قام بنشر مارس 9, 2012 مشاركة قام بنشر مارس 9, 2012 بارك الله فيك استاذ طارق على هذا الموضوع الجميل ميزة المعادلة المستخدمة هي انها تعمل على النسخ القديمة 2003 و ما يليها طريقة اخرى لكنها تعمل من 2007 و ما يليها هي =ISEVEN(ROW()) وبالطبع يمكن تبديل ISEVEN ب ISODD و تبديل ROW ب COLUMN شكرا للمعلومة أخي الفاضل / معتصم محمد لقد استخدمت في مشاركتي السابقة معادلات كوسيطة للدالة ISEVEN وبما ان الهدف مستخدمي اكسل 2003 , فمن يحب استخدامها فعلية استخدام المعادلة كوسيطة لإحدى للدالات البديلة التي أشار لها الفاضل /معتصم أيضا يمكن استخدامها كوسيطة للدالة MOD كما في الملف المرفق تظليل سطر وترك سطر مع وجود صفوف مخفية.rar رابط هذا التعليق شارك More sharing options...
طارق محمود قام بنشر مارس 10, 2012 الكاتب مشاركة قام بنشر مارس 10, 2012 السلام عليكم حياكم الله جميعا ماشاء الله ، كما توقعت والحمد لله وفقنا الله لإظهار معلومات قيمة لدي بعض الأعضاء والآن لتنشيط الموضوع مرة أخري سأذهب بكم للمسألة الثانية ماذ تفعل لو - المسألة الثانية ماذ تفعل لو أردت أن ترسم شكل بياني لآخر أسبوع فقط من جدول متجدد البيانات كثير من الأحيان يكون لديك جدول وتزيد فيه البيانات بشكل يومي أو أسبوعي مثلا ويكون المطلوب التعبير عن ذلك بيانيا ولكن إذا زادت البيانات فيكون لاداعي لإظهار البيانات كلها علي الشكل البياني ومايهم الإدارة مثلا هو آخر أسبوع / آخر شهر .. وهكذا والحل التقليدي أن تحرك بالماوس كل فترة (قد يكون كل يوم) ، تحرك نطاق الرسم وقد تنسي ذلك في مرة ، وتقدم بيانات قديمة أو أكثر من اللازم في المرفق ورقتين بهما نفس البيانات والرسم، الأولي بالطريقة التقليدية والثانية تم حل هذه المشكلة بها إحذف أو أضف أسطر من أو إلي البيانات ، ستجد الرسم يعبر دائما عن آخر 7 بيانات أترككم أيضا تكتشفون العملية التي تمت علي الورقة الثانية نطلب مساعدة من صديق (المدي"النطاق" الديناميكي) وأنتظر تعليقاتكم ومشاركاتكم رسم آخر 7.rar 1 رابط هذا التعليق شارك More sharing options...
الشهابي قام بنشر مارس 10, 2012 مشاركة قام بنشر مارس 10, 2012 أستاذنا طارق الفكرة وصلت وحل جميل وفائدة كبيرة مر رجل كبير وعلى فكرة معرفتي بالرسوم البيانية ضئيلة جداً بس لماذ لا يظهر المدى الدناميكي في مربع الأسماء ثم لماذا يجب كتابة اسم الملف في قيمة السلسلسة ='رسم آخر 7.xls'!Y_Rg لماذا لا يكتفي باسم المدى جزاكم الله خير مزيداً من الفوائد أستاذنا رابط هذا التعليق شارك More sharing options...
الزير قام بنشر مارس 10, 2012 مشاركة قام بنشر مارس 10, 2012 سلسلة فيها الفوائد سلمت لنا استاذ طارق فقد تتلمذنا بين يديك رابط هذا التعليق شارك More sharing options...
ابو تميم قام بنشر مارس 10, 2012 مشاركة قام بنشر مارس 10, 2012 جزاكم الله خيرا جميعا جزاك الله خيرا أستاذ طارق موضوع شيق وممتع ومفيد جدا وأنا طيلة فترة معرفتي بالكمبيوتر والاكسل وأنا أعتقد بأن الاكسل عبارة عن برنامج صغير من برامج الاوفيس يعمل عمليات جمع وطرح وضرب وقسمة وبعض العمليات البسيطة ولم أعرف أن للاكسل توسعات أكبر بكثير مما تخيلت ولم أتقن برمجة الاكسل والتفنن فيه إلا منذ تسجيلي ومتابعتي لمنتدى أوفيسنا منذ 23/12/2011 وحتى الآن ..... وفي هذه الفترة البسيطة تمكنت من تصميم برنامج عملاق يفيدني في عملي ويسهل علي متاعب كثيرة وكل الشكر للأساتذة العمالقة في هذا المنتدى الرائع والمتميز دائما الذي لم أجد منتدى على الانترنت أروع منه وأسرع في الرد والتعاون بين الاعضاء واسمحوا لي أن أخص بالشكر والتقدير الأستاذ عبد الله المجرب و الاستاذ محمد صالح والاستاذ طارق محمود للفائدة التي أفادوني بها والمعلومات القيمة التي استفدتها منهم جزاكم الله خيرا جميعا و وفقكم الله لما فيه الخير والفائدة ونشر العلم أخوكم أبو تميم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.