2saad قام بنشر سبتمبر 17, 2021 مشاركة قام بنشر سبتمبر 17, 2021 السلام عليكم - من فضلكم محتاج كود ترحيل للبيانات الملونة في هذا الشيت (1 ) الي شيت ( سعد ) مع الأحتفاظ بتنسيق الجدول والصفوف في شيت ( سعد ) وفيه قائمة منسدلة في خلية ( (f5 بالصفوف ( 1/1 2/1 3/1 4/1 ) عايز لما اضغط علي اسم الصف مثلا ( 1 / 1) يعملي فلترة علي كل بينات الصف ايمن.xlsb رابط هذا التعليق شارك More sharing options...
أفضل إجابة أ / محمد صالح قام بنشر سبتمبر 17, 2021 أفضل إجابة مشاركة قام بنشر سبتمبر 17, 2021 يمكنك استعمال هذا الكود في حدث عند التغيير في شيت سعد ولمن لا يعرف كيفية إضافة الكود في أحداث الصفحة كلك يمين على اسم الشيت ونختار view code بالعربي عرض التعليمات البرمجية ثم نلصق الكود Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$F$5" Then Sheet24.Range("b10:i1000").ClearContents For r = 3 To Sheet14.Cells(Rows.Count, 2).End(3).Row If Sheet14.Range("n" & r) = Target Then lr = Sheet24.Cells(Rows.Count, 2).End(3).Row + 1 cols = Array(3, 2, 9, 10, 11, 5, 14, 15) For n = 2 To 9 Sheet24.Cells(lr, n) = Sheet14.Cells(r, cols(n - 2)) Next n: End If: Next r MsgBox "Done by mr-mas.com" End If End Sub بالتوفيق 2 رابط هذا التعليق شارك More sharing options...
2saad قام بنشر سبتمبر 19, 2021 الكاتب مشاركة قام بنشر سبتمبر 19, 2021 السلام عليكم ورحمة الله وبركاته بعد اذن حضراتكم محتاح لكود يرحلي الاعمدة المحددة من شيت ( 1 ) الي شيت ( 2 ) بناء علي القائمة المنسدلة الموجود في شيت ( 2 ) الخلية ( ae1 ) ولكم جزيل الشكر ووافر الاحترام https://www.mediafire.com/file/isu1t8zobgt1bqt/سيلا.xlsm/file رابط هذا التعليق شارك More sharing options...
أ / محمد صالح قام بنشر سبتمبر 20, 2021 مشاركة قام بنشر سبتمبر 20, 2021 هذا نفس المطلوب في هذا الموضوع وتمت الاجابة عليه ويفترض أن صاحب الاستفسار ليس هدفه نسخ الكود واستعماله فقط وإنما مدارسته وفهمه وتطبيقه في الحالات المشابههة بالتوفيق 1 رابط هذا التعليق شارك More sharing options...
2saad قام بنشر سبتمبر 20, 2021 الكاتب مشاركة قام بنشر سبتمبر 20, 2021 الف شكر وجعله الله في ميزان حسناتك 1 رابط هذا التعليق شارك More sharing options...
أ / محمد صالح قام بنشر سبتمبر 20, 2021 مشاركة قام بنشر سبتمبر 20, 2021 جميعا بإذن الله رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان