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

عبدالله باقشير كود ترحيل الى ما شثت من اوراق العمل


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

أخي الكريم خبـــــور

جزاك الله كل خير ,وادخلك الجنة ورحم والديك

الكود رائع جداً في الإستخدام لكن عندي سؤال

برفض انني أردت أن أعمل ملف خاص بعمل معين فما هو المطلوب مني ؟؟؟؟

هل ارسل لك الملف لتعمل له زر لإستدعاء البيانات من الصفحات ( الشيتات ) ، أم تعلمني كيفية عمل الكود حتى أنفذه بنفسي وأطلعكم عليه ؟؟؟؟؟

أشكرك مرة أخرى والسلام عليكم ورحمة الله وبركاته

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

  • الردود 86
  • Created
  • اخر رد

Top Posters In This Topic

  • 3 weeks later...

:clapping: عمل ممتاز جداً ومميز:clapping:




'لعدم إظهار رسائل التنبيه التابعة للإكسيل
    Application.DisplayAlerts = False
.....
.....
'لإعادة الوضع على ما كان عليه
    Application.DisplayAlerts = True
.....
[/code]

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

  • 2 weeks later...

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

الأستاذ خبور :

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

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

لو عملت فرز من القائمةالموجودة في رأس عمود اسم المشرع على مشروع النقرة مثلاً تظهر لنا جميع الدفعات المسددة لهذا المشروع

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

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

ثم كيف نضع شرط عدم تكرار رقم شيك في قائمة البنوك لصفحة المقاول

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

أخوك أبو عادل

الملف بالمرفقات ..............

___________.rar

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

بسم الله الرحمن الرحيم

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

تفضل اخي الملف واكثر من الدعاء

ودمتم في حفظ الله وسلامته

تحياتي وسلامي

اخوكم/ خبور

___________.rar

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

جزاك الله كل خير أخي خبور عمل أكثر من رائع

هناك مشكلة وهي أنه في صفحة البنوك والمشاريع فإن قائمة المشاريع هي 5 فقط ولايمكن الزيادة

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

كيف يمكن زيادة المشاريع ولعدد غير محدد

وهل يمكن وضع زر لطباعة لأي صفحة ؟؟؟؟

أسأل الله تعالى في يوم الجمعة أن يغفر لك ولوالديك وأن يزيدك من علمه وررزقة إنه سميع عليم مجيب للدعوات

أخوك أبو عادل

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

  • 5 weeks later...

كود رائع جدا

ممكن يتم شرحه حتي تعم الفائدة

Sub Khboor_Tarheel()

On Error Resume Next

Application.ScreenUpdating = False

For A = 5 To [C200].End(xlUp).Row

If Cells(A, 3) <> "" Then

MySheets = Cells(A, 3)

With Sheets(MySheets).[b200].End(xlUp)

.Offset(1, 0) = Cells(A, 4)

.Offset(1, 1) = Cells(A, 5)

.Offset(1, 2) = Cells(A, 6)

.Offset(1, 3) = Cells(A, 7)

End With

End If

Next A

Application.ScreenUpdating = True

MsgBox "!تم الترحيل بنجاح", vbInformation + vbMsgBoxRight, "تم الترحيل"

[C5:G200].ClearContents

Range("C5").Select

On Error GoTo 0

End Sub

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

الاخ الحبيب خبور

زادك الله من علمه وحفظك ورعاك

فى الحقيقة لى طلب بسيط لدى فرع فى الشركة كل تعاملة بشيكات كل عميل 12 شيك قيمة ايجار سنوى لشقة او غرفة

المشكلة تكمن عندى فى 1- تسجيل الكم الهائل من الشيكات

2 - تواريخ الاستحقاق هل يمكن ربطها بتاريخ الجهاز ام لا

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

اخيك محمد طنطاوى

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

  • 3 weeks later...
  • 2 weeks later...

اخى العزيز خبور فى ثغرة فى الكود حق الترحيل بتعمل مشاكل ياريت حضرتك تتلافاها وهى

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

يعنى لازم تضع رقم صفر عشان يترحل مظبوط ممكن تعديل المشكلة بوركت

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

أولاً أشكرك على هذا العمل الرائع

ثانياً : كيف نضيف ونتحكم في الأعمده والصفوف والخلايا التي ستظهر عند أضاة حساب جديد .؟؟؟ لإني أريد أستخدام الفكره في عمل برنامج لإدارة عدة محافظ أسهم وأريد أضافة خلايا أخرى

أشكرك ووفقك الله

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

بسم الله الرحمن الرحيم

الاخ / متداول جدا المحترم

طبعا لازم تغير في الكود حسب معطياتك اذا اضفت عمود ضيف عمود في الكود

عدد صفوف قائمة الترحيل / تحاسب ايضا لرقم آخر صف محتمل في حسابات الترحيل

انظرالى المرفق فيه شرح للكود

اخوك / خبور

_______________.rar

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

بسم الله الرحمن الرحيم

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

الاخ/ محمد طنطاوي المحترم

ليالي وايام مباركة ان شاء الله على الجميع

كلماتك تعز علي وهذا الملف خاصتك ملف ترحيل واستدعاء

حاولت من خلالة اجمع بين الترحيل الى ما شئت والاستدعاء من ماشئت

بس عايزين دعاء عريض وطويل هذه ايام مباركات

الاخ / mhareek المحترم

انظر الى هذا الملف وجرب عملية الترحيل فيه علشان نعرف الخطأ من فين

الاخ / ابو انس حاجب المحترم

1- رايكم بهذا الملف قد يكون مناسب كثيرا لما تريده

2- ما عرفت من اين تريد نقل البيانات

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

اعمل شرح وافي للمطلوب ونحن تحت الخدمة

ودمتم في حفظ الله وسلامته

تحياتي وسلامي

اخوكم/ خبورخير

__________________________.rar

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

سيدي خبور لقد تشرفت بأن خصيتني بردك.

ولقد حاولت أن أشرح ما اريد جوف الملف المرفق وانا مستعد للتوضيح.

أخوأبوأنس حاجب

Copy_of_Purchase_Order.rar

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

السلام عليكم

ملف على السريع كمل انت الباقي

الاستدعاء عملته بورقة اخرى وبطريقة الفلترة

و يتم بمعيار واحد فقط المعيار الاخر

ارقامه مختلفه لا استطيع ذلك

اخوك خبور خير

Copy_of_2Purchase_Order.rar

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

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

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

أرجو أن يتسع صدرك لي بعد أن أجرب اذا هنالك أي ملاحظة

أبوأنس حاجب

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

الأخ الحبيب خبور يعجز لساني عن الشكر ولكن لن يعجز عن الدعاء لك ولأمثالك الذين عرفوا رسالة العلم بمعناه الحقيقي جزاك الله خيرا بعدد الملفات التى صممتها وعد حقولها وصفوفها وفقك الله والله إنى أراك من الجنة قريب مع حفظة كتاب الله وكما قلت يعجز لسانى عن الشكر لان ما قدمته كثيرا وأفضلهم المصحف الشريف على الاكسيل ما أروع

الموضوع باختصار :

طبيعة العمل إيجارات وكل مستأجر باستلم منه 12شيك وشيك تامين فبدلا من تصوير الشيكات والتوقيع عليها تم عمل سند استلام شيكات يتم طباعته والتوقيع عليه

1 يتم عمل ترحيل الى حافظة الشيكات

2-يتم تجميع الشيكات فى ملف واحد حافظة الشيكات

3-الاستدعاء يتم باستدعاء الشيكات لفترة واحد من 1/1/2007الى 31/1/2007 بحيث يتم إيداعها في البنك2- اذا امكن استدعاء السند برقمة مرة اخرى دا الموضوع باختصار

وجزاك الله خيرا ووفقك وزادك من علمه أنت ومن معك ,وهذا الملف مرة اخرى مختصرا

أخيك محمد طنطاوى

Book1.rar

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

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

اخي طنطاوي حفظه الله

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

تفضل الملف ان شاء الله يكون المراد

خبور خير

__________________.rar

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

استاذ خبور الخير : بعد التحية

ارجوا التكرم لو سمح الوقت لديك ان تضيف زر للمسح في المشاركة رقم 20 . لانني ارى ان ان(( برنامج الترحيل الى ماشئت من اوراق العمل )) كامل ولاينقصه الا زر المسح للورقة التي نختارها ( بنفس طريقة زر حذف ورقة). فهو ضروري جدا لان من يعمل مع البرنامج لو اراد مسح بيانات ورقة الان لايستطيع .

غفر الله لك ولوالديك

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

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

اخيك محمد طنطاوى

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

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