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

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


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

عندي 3 ملفات

اسجل البيانات في الشيت الاول وهو تلقائيا يسجل في الثاني وبعد كذا انسخه واسجله في الثالث وامسح بيانات الاول والثاني واعيد من جديد

ابغى اليانات ترحل من الشيت الاول الى الشيت الثالث واستغني عن الشيت الثاني وما عرفت تكفون حلوها لي شكرا

المرفق

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

السلام عليكم

اهلاً بك اخي الكريم بين اخوانك

نرجو منك الالتزام بقواعد المشاركة وخصوصاً

1. عنوان الموضوع وتوافقه مع الطلب

2. عدم فتح اكثر من موضوع

=======

نرجو منك وضع مرفق

لرفع مرفق قم بضغطه بالوينرار ثم ارفعه

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

عندي 3 ملفات

اسجل البيانات في الشيت الاول وهو تلقائيا يسجل في الثاني وبعد كذا انسخه واسجله في الثالث وامسح بيانات الاول والثاني واعيد من جديد

ابغى اليانات ترحل من الشيت الاول الى الشيت الثالث واستغني عن الشيت الثاني وما عرفت تكفون حلوها لي شكرا

exel.rar

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

بصراحة لم افهم المطلوب (((فصل اكثر)))

ما الفرق لو تم وضع الشيتين الذين تريدهما في ملف اكسل واحد

===

سيتم دمج الموضوعين

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

طريقة العمل القديمه هي يتم تقييم اداء الموظف وبالدوال ترحل الى الشيت الثاني ويتم نسخ من الشيت الثاني وترحيله يدويا بالنسخ ctrl+c واللصق في الشيت الثالث ctrl+v الى الشيت الثالث

المطلوب هو الاستغناء عن الشيت الثاني والعمل يكون يقيم الموظف ويرحل تلقائيا الى الشيت الثالث ويمسح الشيت الاول تلقائيا لاعادة التقييم

لماذا كل شيت في ملف اكسل لان الشيت الاول والثاني تابت لجميع المقيميين اما الشيت الثالث فهو خاص بكل مقيم

ايضا اريد فلتره برقم الموظف ومعدل التقييم له

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

لاباس ياسيد الغنادير لاباس

بصراحة لم افهم المطلوب (((فصل اكثر)))

ما الفرق لو تم وضع الشيتين الذين تريدهما في ملف اكسل واحد

انا نزلت الملفات

و المطلوب ممكن ان شاء الله

بس افهم ايه المطلوب بشوية تفصيل

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

المطلوب ياعزيزي

الية العمل القديمه

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

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

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

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

ايه الي مطلوب نقله من الملف 2

نقل الصف رقم 2 كاملا

او الصفوف 1و2و3 كاملة

او اجزاء محددة

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

السلام عليكم

حسب مافهمت والله اعلم

اضفنا في ملف 2 ورقة لنقل البيانات

اولا افتح الملف الذي تريد نقل البيانات الية

2 اضغط على زر اسماء الملفات

تظهر لك قائمة باسماء الملفات المفتوحة اختار منها الملف الذي تريد نقل البيانات الية

اضغط زر ابدا نقل البيانات يتم نقلها الى هذا الملف

exel.rar

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

الله يعطيك العافيه يا مدير قسم الاكسل

شكرا

بس انا حاولت اطبقها على الشيت حقي مارضي

Sub senddate()

Dim WB1 As Workbook, WB2 As Workbook, TS As Worksheet, FS As Worksheet

Set WB1 = Workbooks(Range("Result").Text)

Set WB2 = Workbooks(Range("Monitoring Sheet Template Updated").Text)

Set FS = WB1.Sheets("Result")

Set TS = WB2.Sheets(Range("C5").Text)

TR = TS.Range("A99").End(xlUp).Row + 1

FR = 2

For C = 1 To 66

TS.Cells(TR, C) = FS.Cells(2, C)

Next

' Sheets("Result").Range("A2:BM2").Copy

End Sub

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

ارسل لي ايميلك على الخاص وانا ارسل لك

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

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

الخطأ في هذا الجزء


Set WB1 = Workbooks(Range("Result").Text)

المفروض يشير الى الخلية التي فيها اسم الملف الأول وهي في الصف الثالث

Set WB1 = Workbooks(Range("C3").Text)

تقريبا او اتأكد انته من الخلية

والله اعلم

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

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

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



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

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

Important Information