اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

مساعده من اقوى ناس عرفتهم بالاكسل


ism

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

لدي ملف استخدمه للتسديد من قبل اشخاص .. وخاصيه البحث العاديه اتعبتني ..

1.

عدم تكرار الاسم

2.

والذي اريده ان اضيف زر ينقل الى سطر الذي ابحث عنه : اي ان اضع في خليه معينه (في المرفق فوق الاسم) اسم العميل وبعد ان اضغط الزر ينتقل بي الى سطر العميل في الملف ////

او ..او ..او

ان يحضر لي الزر سطر العميل فقط(بحيث يخفي باقي السطور) تحت عنوان اسم العميل في المرفق ..

وكلي املا في ان احصل على الاجابه ..

ادامكم الله .. وزادكم علما ونفعا

اخوكم : اسماعيل

عملاء متفرقه.rar

رابط هذا التعليق
شارك

لدي ملف استخدمه للتسديد من قبل اشخاص .. وخاصيه البحث العاديه اتعبتني ..

1.عدم تكرار الاسم

2.والذي اريده ان اضيف زر ينقل الى سطر الذي ابحث عنه : اي ان اضع في خليه معينه (في المرفق فوق الاسم) اسم العميل وبعد ان اضغط الزر ينتقل بي الى سطر العميل في الملف ////

او ..او ..او ان يحضر لي الزر سطر العميل فقط(بحيث يخفي باقي السطور) تحت عنوان اسم العميل في المرفق ..

اخوكم : اسماعيل

أخي إسماعيل

السلام عليكم

مرحبا بك بين إخوانك

في المرفق

1. إذا تكرر الإسم يتم تلوين الصف بأكمله للإسمين المكررين باللون الأحمر (تنسيق شرطي)

2. يتم إختيار الإسم في الخلية A1 من الأسماء بقائمة منسدلة (سهم صغير يسار الخلية A1) عن طريق تحديد البيانات من A3:A1002

. وطبعا يمكنك تغيير هذا

3. بالضغط علي الزر المطلوب يذهب المؤشر إلي الصف الذي به الإسم

تفضل

_____ ______2.rar

تم تعديل بواسطه TareQ M
رابط هذا التعليق
شارك

30283_190454744156c5e5e2.gif

ما شاء الله عليك يا

]ç[™¤¼.¸¸.¨✔¨™★المهندس طارق★™¨✔¨.¸¸.¼¤™]ç[

بجد استاذ

ممكن طلب لو فيها غلبه ..

ان يحضر لي الزر سطر العميل فقط(بحيث يخفي باقي السطور) تحت عنوان اسم العميل في المرفق .. واذا كان الاسم مكرر ان تظهر لي كافه الاسطر لنفس الاسم .....

اريد ان اعمل للعملاء صفحه ثانيه للتسديد : بحيث اضع ( الاسم) ويظهر (المبلغ و تاريخ الدفع والهاتف وملاحظات )

واغير القيم وتتعدل تلقائيا في الصفحه الاولى الرئيسيه ...

398880.gif

اخوك :

اسماعيل

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

السلام عليكم

************

اخى طارق بارك الله فيك

هذه محاولة يائسة منى ارجو قبولها ( الكود خبورى )

واتمنى ان يلبى طلبك اخى العزيز

تقبلوا تحياتى

HH.rar

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

ممكن طلب لو فيها غلبه ..

ان يحضر لي الزر سطر العميل فقط(بحيث يخفي باقي السطور) تحت عنوان اسم العميل في المرفق .. واذا كان الاسم مكرر ان تظهر لي كافه الاسطر لنفس الاسم

اريد ان اعمل للعملاء صفحه ثانيه للتسديد : بحيث اضع ( الاسم) ويظهر (المبلغ و تاريخ الدفع والهاتف وملاحظات )

واغير القيم و تتعدل تلقائيافي الصفحه الاولى الرئيسيه ...

اخوك : اسماعيل

تم عمل تصفية (فلتر) لإخفاء باقي البيانات

وإضافة زر آخر لإنهاء التصفية

وتم إضافة ورقة جديدة 2 لتكون صفحـة التسديد

عند النقر علي الزر الأصفر في صفحـة التسديد

يتم تحديد الحالة

أولا: إذا الإسم موجود قبل ذلك في الورقة 1

سيتم إلغاء البيانات القديمة وتوضع مكانها هذه البيانات الجديدة

ثانيا: إذا الإسم غير موجود قبل ذلك في الورقة 1 أي إسم جديد

فسيتم إضافته مع بياناته لقائمة الأسماء في الورقة 1 قبل آخر إسم موجود بها

وفي جميع الحالات سيتم محو البيانات من صفحـة التسديد بعد ترحيلها

_____ ______3.rar

رابط هذا التعليق
شارك

السلام عليكم

************

اخى طارق بارك الله فيك

هذه محاولة يائسة منى ارجو قبولها ( الكود خبورى )

واتمنى ان يلبى طلبك اخى العزيز

تقبلوا تحياتى

398880.gif

شكرا جزيلا اخي على مرورك والملف المرفق ..

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

ما قصرت اخي العزيز ..

اخوك :

اسماعيل

رابط هذا التعليق
شارك

السلام عليكم

************

اخى طارق بارك الله فيك

هذه محاولة يائسة منى ارجو قبولها ( الكود خبورى )

واتمنى ان يلبى طلبك اخى العزيز

تقبلوا تحياتى

398880.gif

شكرا جزيلا اخي على مرورك والملف المرفق ..

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

ما قصرت اخي العزيز ..

اخوك :

اسماعيل

السلام عليكم

************

اشكرك اخى طارق

اخى العزيز ( الميه ما تطلعش فى العالى ) لا استطيع التعدبل ابدا على ملف ارفقه استاذنا طارق

عموما خير

طاب بومكم

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

شكرا جزيلا لك اخي المهندس طارق ...

ابدعت بكل المعاني ...

لي ملاحظات على الملف الاخير الذي ارفقته من بعد اذنكم لي , حيث:

1. عند ترحيل البيانات محتوى الملاحظات لا يترحل مع الباقي .*

2. وضع اسم العميل في الصفحه الثانيه لا يظهر بياناته , ولكن الطريقه التي ارفقتها جميله جدا .

* تم حل المشكله من الكود .

3. يظهر لي عند الترحيل خظأ كود يعطيني لون اصفر على الكلام :

rw = WorksheetFunction.Match(a, Range("A3:a2000"), 0)

Range("A" & rw + 2).Select

فهل لي ان اطلب من حضرتكم اضافه اخرى :

ان يحذف الحساب عندما يكون المبلغ يساوي صفر دينار .

ولك جزيل الشكر اخي الكريم على جهودكم ..

اخوك :

اسماعيل

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

السلام عليكم

************

اشكرك اخى طارق

اخى العزيز ( الميه ما تطلعش فى العالى ) لا استطيع التعدبل ابدا على ملف ارفقه استاذنا طارق

عموما خير

طاب بومكم

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

جعلني الله عند حسن ظنكم

أعرف أن ماقلت هذا إلا تواضعا من تواضع العلماء

زادك الله من فضله العظيم

رابط هذا التعليق
شارك

أخي اسماعيل

السلام عليكم

الرد في التالي بالأحمر

لي ملاحظات على الملف الاخير الذي ارفقته من بعد اذنكم لي , حيث:

1. عند ترحيل البيانات محتوى الملاحظات لا يترحل مع الباقي .* تم التعديل

2. وضع اسم العميل في الصفحه الثانيه لا يظهر بياناته , ولكن الطريقه التي ارفقتها جميله جدا . حسبما فهمت لايهم ان تظهر بياناته في الصفحة 2 المهم صفحة 1

* تم حل المشكله من الكود .

3. يظهر لي عند الترحيل خظأ كود يعطيني لون اصفر على الكلام : لايعطيني أي خطأ راجع مرة أخري أو إقفل محرر الفيجوال أو إقفل الإكسل ثم إفتحه

rw = WorksheetFunction.Match(a, Range("A3:a2000"), 0)

Range("A" & rw + 2).Select

فهل لي ان اطلب من حضرتكم اضافه اخرى :

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

اخوك : اسماعيل

تفضل المرفق

_____ ______4.rar

تم تعديل بواسطه TareQ M
رابط هذا التعليق
شارك

أخي اسماعيل

السلام عليكم

الرد في التالي بالأحمر

لي ملاحظات على الملف الاخير الذي ارفقته من بعد اذنكم لي , حيث:

1. عند ترحيل البيانات محتوى الملاحظات لا يترحل مع الباقي .* تم التعديل

2. وضع اسم العميل في الصفحه الثانيه لا يظهر بياناته , ولكن الطريقه التي ارفقتها جميله جدا . حسبما فهمت لايهم ان تظهر بياناته في الصفحة 2 المهم صفحة 1

* تم حل المشكله من الكود .

3. يظهر لي عند الترحيل خظأ كود يعطيني لون اصفر على الكلام : لايعطيني أي خطأ راجع مرة أخري أو إقفل محرر الفيجوال أو إقفل الإكسل ثم إفتحه

rw = WorksheetFunction.Match(a, Range("A3:a2000"), 0)

Range("A" & rw + 2).Select

فهل لي ان اطلب من حضرتكم اضافه اخرى :

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

اخوك : اسماعيل

تفضل المرفق

رزق الله العلم النافع وزادك في يدنك ودنياك

ما قصرت اخي المهندس طارق .. اشكرك من كل قلبي على كل ما استفدته من حضرتكم ..

اخوك :

اسماعيل

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



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

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

Important Information