اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

السلام عليكم ورحمة الله وبركاته

علي نسق الموضوع الرائع والمتميز "هل تعلم---------- معلومات تخص ListBox"
لأخونا وأستاذنا الجليل / عبد الله باقشير (خبور خير)
كما هي مواضيعه دائما ، أعزه الله وبارك له في جهده ووقته

أردت أن نبدأ معا موضوع مشابه بعنوان "ماذ تفعل لو"

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

وللعلم سأستعين بأمثلة موجودة في كتاب إسمه : EXCEL-2007-Formulas_John Walkenbach

أرجو أن يعجبكم الموضوع وان يشارك الجميع بما يفتح به الله عليه

ملاحظة : بناءا علي طلب أخونا الفاضل حسين في المشاركة #27 من الموضوع
سأضع فيما يلي فهرس للموضوعات
1- المسألة الأولي : تظليل سطر وتترك سطر -------------------------------------------- بدءا من المشاركة # 2
2- المسألة الثانية : تشكيل بياني أوتوماتيكي لآخر عدد محدد من البيانات -------------------------------------------- بدءا من المشاركة # 22

3- المسألة الثالثة : الحصول علي آخر (أحدث) سعر / بيان              -------------------------------------------- بدءا من المشاركة # 34

قام بنشر

ماذ تفعل لو - المسألة الأولي

بسم الله نبدأ

سأبدأ بمسألة سهلة نسبيا

ماذ تفعل لو تريد تظليل سطر وتترك سطر (في حالة البيانات الكثيرة وخشية زيغ البصر أثناء القراءة)

والسؤال : ماهي أسهل وأسرع وسيلة لعمل ذلك

في المرفق ورقتين بهما نفس البيانات ، الأولي ليس بها أي عمليات

الثانية تم معالجة هذا الأمر بها ، أولا ننظر الفارق في سهولة القراءة بينهما

ثم بسهولة تكتشفون العملية التي تمت علي الورقة الثانية

وأنتظر تعليقاتكم ومشاركاتكم بأي مسائل تدخل تحت نفس العنوان

تظليل سطر وترك سطر.rar

قام بنشر

أستاذنا القدير/ طارق محمود

أولا : بكل حب وتقدير واحترام أشكرك على هذا الموضوع الذي أضنه سوف يكون مفيد إن شاء الله لكل الأعضاء

وإن شاء الله تطرق فيه مسائل عدة مفيدة جزاكم الله كل خير

وبالنسبة لنضليل سطر وترك سطر حسب الملف المرفق

وحسب فهمي البسيط وطرقتي في التضليل

تضليل السطر الثاني

ثم يتم تحديد السطر الأول مع الثاني وعمل نسخ

وبعد ذلك يتم تضليل بقية الأسطر في جدول البيانات

ومن ثم عمل لصق خاص - لصق التنسيقات

وربما في طرق أخرى منكم نستفيد

جزاكم الله خير

قام بنشر

السلام عليكم

أخي الحبيب / الشهابي

أولا شاكر جدا لمرورك الكريم وكلماتك الطيبة

وحسب فهمي البسيط وطرقتي في التضليل

تضليل السطر الثاني

ثم يتم تحديد السطر الأول مع الثاني وعمل نسخ

وبعد ذلك يتم تضليل بقية الأسطر في جدول البيانات

ومن ثم عمل لصق خاص - لصق التنسيقات

طبعا ممكن ذلك يأأخي ، ولكن يعيبها أنك إذا حذفت سطر لن يتم المحافظة علي شكل التنسيق

ثم أننا إتفقنا ان نصل للمطلوب بسرع الطرق

وفي حالتنا هذه

الأسرع هو التنسيق الشرطي

قف علي المجال وتحقق من التنسيق الشرطي عليه

قام بنشر

ما شاء الله أستاذنا الكريم طارق

تصدق حاولت أن أبحث عن حلك في كافة علامات التبويب إلا التنسيق الشرطي لم يخطر ببالي

هذا ما توقعته منكم إستاذنا الكريم درر ثمينة تنثرونها لنا

زادكم الله علما ورفعة

منتظرين المزيد

قام بنشر

أخى العزيز / طارق

عمل أكثر من رائع وأحييك عليه

وفقك الله إلى ما فيه خير الجميع

خالص شكرى وتقديرى

أخوك

عيد مصطفى

قام بنشر

السلام عليكم

هذا الكود يطبق عمل التنسيق الشرطي الكوجود في ملف الاستاذ طارق

يوضع في حدث ورقة العمل المطلوبة


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

قام بنشر

و عليكم السلام و رحمة الله وبركاته

فكرة أكثر من ممتازة

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

قام بنشر

السلام عليكم ورحمة الله

موضوع ممتاز أخي طارق

واسمح لي بالمشاركة

ماذا تفعل لو تريد تظليل سطر وتترك سطر (في حالة البيانات الكثيرة وخشية زيغ البصر أثناء القراءة)

وماذا تفعل لو كانت هناك صفوف مخفية

في المرفق حل بالتنسيق الشرطي

--------------------

وللعلم أنماط الجداول الرسمية في اكسل 2007و2010(تسمى القوائم في اكسل2003) تقوم بتلوين الأسطر دون ان تتأثر بإخفاء أو حذف أو دراج صفوف

في امأن الله

تظليل سطر وترك سطر مع وجود صفوف مخفية.rar

قام بنشر

السلام عليكم ورحمة الله وبركاته

أستاذي الفاضل طارق محمود حفظك الله واثابك من الخير ما ترضى

أبوأنس

قام بنشر

السلام عليكم

أخي الحبيب / الخالدي

وللعلم أنماط الجداول الرسمية في اكسل 2007و2010(تسمى القوائم في اكسل2003) تقوم بتلوين الأسطر دون ان تتأثر بإخفاء أو حذف أو دراج صفوف

هذا هو المطلوب من التفاعل في الموضوع

بالفعل هذا الحل أحسن لو المسألة جداول والاكسل 2007 / 2010

جزاك الله خيرا

قام بنشر

السلام عليكم

أخي الحبيب / عبدالله المجرب (أبو أحمد)

جزاك الله خيرا ، وأشكر تفاعلك المتميز

أخي الحبيب / محمد مصطفى

جزاك الله خيرا ، شاكرا مرورك الكريم

أخي الحبيب / عيد مصطفى

جزاك الله خيرا ، شاكرا مرورك الكريم

أخي الحبيب / أبو ردينة

جزاك الله خيرا ، شاكرا مرورك الكريم

أخي الحبيب / الصديق

جزاك الله خيرا ، شاكرا مرورك الكريم

أخي الحبيب / نورسعيد

جزاك الله خيرا ، شاكرا مرورك الكريم

أخي الحبيب / عبدالله باقشير

مرورك شرف كبير لنا جميعا

وكما أشرت في المقدمة أنا أساسا مقتبس منكم الفكرة

جزاك الله كل خير

أخي الحبيب / حاجب جزاك الله خيرا ، شاكرا مرورك الكريم

قام بنشر

أخي الحبيب / محمد مصطفى

تحفة بس ممكن نعرف ايه دالةmod دى لو سمحت

الدالة mod تأتي لك بباقي الفسمة بين رقمين

مثلا

 mod(12,2)
تقسم 12÷2 والباقي صفر كما أن
 mod(15,2)

تقسم 15÷2 والباقي 1

واستخدامنا لها مع رقم السطر سيرجع لنا إما بصفر في الصفوف الزوجية ، 1 في الصفوف الفردية

أخي الحبيب / نورسعيد

يا أساتذة معذرة أنا مش شايف أى اكواد مكتوبة ؟؟؟؟؟؟؟؟؟

راجع التنسيق الشرطي Conditional Format

ستجد به المعادلة المذكورة

أو أخبرني بأي إكسل تستخدم 2003 ، 2007/2010

وسوف أدلك علي مكان التنسيق الشرطي Conditional Format لو لم تكن تعرفه

قام بنشر

اخى المهندس / طارق محمود

جزاك الله خيرا

ان افضل المواضيع هى التى تجلب التفاعل والبحث عن حلول او الاطلاع على حلول الاخرين

بارك الله فيك

تحياتى سعد عابد

قام بنشر

بارك الله فيك استاذ طارق على هذا الموضوع الجميل

ميزة المعادلة المستخدمة هي انها تعمل على النسخ القديمة 2003 و ما يليها

طريقة اخرى لكنها تعمل من 2007 و ما يليها هي

=ISEVEN(ROW())

وبالطبع يمكن تبديل ISEVEN ب ISODD و تبديل ROW ب COLUMN

قام بنشر

بارك الله فيك استاذ طارق على هذا الموضوع الجميل

ميزة المعادلة المستخدمة هي انها تعمل على النسخ القديمة 2003 و ما يليها

طريقة اخرى لكنها تعمل من 2007 و ما يليها هي

=ISEVEN(ROW())

وبالطبع يمكن تبديل ISEVEN ب ISODD و تبديل ROW ب COLUMN

شكرا للمعلومة أخي الفاضل / معتصم محمد

لقد استخدمت في مشاركتي السابقة معادلات كوسيطة للدالة ISEVEN

وبما ان الهدف مستخدمي اكسل 2003 , فمن يحب استخدامها فعلية استخدام المعادلة كوسيطة لإحدى للدالات البديلة التي أشار لها الفاضل /معتصم

أيضا يمكن استخدامها كوسيطة للدالة MOD كما في الملف المرفق

تظليل سطر وترك سطر مع وجود صفوف مخفية.rar

قام بنشر

السلام عليكم

حياكم الله جميعا

ماشاء الله ، كما توقعت والحمد لله وفقنا الله لإظهار معلومات قيمة لدي بعض الأعضاء

والآن لتنشيط الموضوع مرة أخري

سأذهب بكم للمسألة الثانية

ماذ تفعل لو - المسألة الثانية

ماذ تفعل لو أردت أن ترسم شكل بياني لآخر أسبوع فقط من جدول متجدد البيانات

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

ويكون المطلوب التعبير عن ذلك بيانيا

ولكن إذا زادت البيانات فيكون لاداعي لإظهار البيانات كلها علي الشكل البياني

ومايهم الإدارة مثلا هو آخر أسبوع / آخر شهر .. وهكذا

والحل التقليدي أن تحرك بالماوس كل فترة (قد يكون كل يوم) ، تحرك نطاق الرسم وقد تنسي ذلك في مرة ، وتقدم بيانات قديمة أو أكثر من اللازم

في المرفق ورقتين بهما نفس البيانات والرسم،

الأولي بالطريقة التقليدية

والثانية تم حل هذه المشكلة بها

إحذف أو أضف أسطر من أو إلي البيانات ، ستجد الرسم يعبر دائما عن آخر 7 بيانات

أترككم أيضا تكتشفون العملية التي تمت علي الورقة الثانية

نطلب مساعدة من صديق

(المدي"النطاق" الديناميكي)

وأنتظر تعليقاتكم ومشاركاتكم

رسم آخر 7.rar

  • Like 1
قام بنشر

أستاذنا طارق

الفكرة وصلت وحل جميل وفائدة كبيرة مر رجل كبير

وعلى فكرة معرفتي بالرسوم البيانية ضئيلة جداً

بس لماذ لا يظهر المدى الدناميكي في مربع الأسماء

ثم لماذا يجب كتابة اسم الملف في قيمة السلسلسة

='رسم آخر 7.xls'!Y_Rg

لماذا لا يكتفي باسم المدى

جزاكم الله خير

مزيداً من الفوائد أستاذنا

قام بنشر

جزاكم الله خيرا جميعا

جزاك الله خيرا أستاذ طارق

موضوع شيق وممتع ومفيد جدا

وأنا طيلة فترة معرفتي بالكمبيوتر والاكسل وأنا أعتقد بأن الاكسل عبارة عن برنامج صغير من برامج الاوفيس يعمل عمليات جمع وطرح وضرب وقسمة وبعض العمليات البسيطة ولم أعرف أن للاكسل توسعات أكبر بكثير مما تخيلت ولم أتقن برمجة الاكسل والتفنن فيه إلا منذ تسجيلي ومتابعتي لمنتدى أوفيسنا منذ 23/12/2011 وحتى الآن ..... وفي هذه الفترة البسيطة تمكنت من تصميم برنامج عملاق يفيدني في عملي ويسهل علي متاعب كثيرة وكل الشكر للأساتذة العمالقة في هذا المنتدى الرائع والمتميز دائما الذي لم أجد منتدى على الانترنت أروع منه وأسرع في الرد والتعاون بين الاعضاء

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

جزاكم الله خيرا جميعا و وفقكم الله لما فيه الخير والفائدة ونشر العلم

أخوكم أبو تميم

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information