سيد الغنادير

الله يعطيك العافيه يا مدير قسم الاكسل شكرا بس انا حاولت اطبقها على الشيت حقي مارضي 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 عزيزي لو ممكن تعطيني طريقه اتواصل معك فيها لان الشيت خاص جدا ما اقدر احطه في الايميل بالكامل لازم يكون مبهم لكن لو تواصلت معك ممكن ارسل لك الشيت بالكامل ارسل لي ايميلك على الخاص وانا ارسل لك

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

تم تسجيل البيانات مع نوته بداخله توضح الاليه

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

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

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

عندي 3 ملفات اسجل البيانات في الشيت الاول وهو تلقائيا يسجل في الثاني وبعد كذا انسخه واسجله في الثالث وامسح بيانات الاول والثاني واعيد من جديد ابغى اليانات ترحل من الشيت الاول الى الشيت الثالث واستغني عن الشيت الثاني وما عرفت تكفون حلوها لي شكرا exel.rar

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