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

الترحيل من صفحات عدة إلى صفحة واحدة


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

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

الأخوة الأفاضل

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

أرجو المساعدة بعمل الكود

مرفق لكم الملف المطلوب العمل عليه

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

أشكرك اخي

لكن في الحقيقة ليس هذا المطلوب لان الكود سوف أستخدمة في باقي الصفحات الـ 100 للترحيل لنفس الصفحة ولي دالة فاكب

لك كل الشكر وبارك الله فيك

ما زلت بإنتظار المساعدة بكود للترحيل من الشيت رقم 2 وإلى شيت رقم 100 بعض الخلايا

ولكم كل الشكر

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

السلام عليكم

اخي وائل مراد اني متابع اعمالك منذ مذكرة التسوية البنكية وهي من افضل الاعمال

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

هل من الممكن ان تضع مثال توضيحي بالارقام علي سبيل المثال ماذا يحدث في ورقة 2 و 3 و4 وكيف يكون الناتج في كشف العمولات

حتي تقترب الي الذهن و يسطتيع الاخوة المساعدة

بالكود او بالمعادلات

وشكرا :fff: :fff: :fff:

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

أخذت أحد أكواد الاستاذ ابو أحمد مدير القسم العام وعدلت عليه حسب حاجتي وهذا هو الكود

ليستفيد منه الجميع

Sub Abu_Ahmed_Trheel()

Dim LR As Integer

LR = [R1000].End(xlUp).Row

Range("R7:V" & LR).Copy Sheets("إسم الصفحة المراد الترحيل لها ").Range("B" & Sheets("إسم الصفحة المراد الترحيل لها").[b1000].End(xlUp).Row + 1)

'Range("R7:V" & LR).ClearContents

MsgBox "Êã ÇáÊÑÍíá ÈäÌÇÍ ", vbOKOnly, "ÊäÈíå"

End Sub

ومرفق لكم نسخة من الملف بعد عمل الكود

1.rar

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

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