شكيب عمار قام بنشر يناير 10, 2015 قام بنشر يناير 10, 2015 ترحيل بيانات بهذه الطريقة، يوجد نموذج مرفق غفر الله لكل من ساهم مسبقاً مشكل 8.rar
سليم حاصبيا قام بنشر يناير 10, 2015 قام بنشر يناير 10, 2015 السلام عليكم في الصفحة 1 كبسة يمين على اسم الصفحة في الاسفل اختر view code الصق الكود التالي بعد ان تكون قد نسخته (يمكنك استعمال Ctrl+Shift+h) لتنفيذ الكود Sub tarhil() LR1 = Sheets("1").Cells(Rows.Count, 3).End(xlUp).Row lr2 = Sheets("2").Cells(Rows.Count, 2).End(xlUp).Row + 1 Sheets("2").Range("b3:d" & lr2).Clear Set myrg1 = Sheets("1").Range("C5:E" & LR1): Set myrg2 = Sheets("2").Range("b3") myrg1.Copy myrg2.PasteSpecial xlPasteAll Application.CutCopyMode = False End Sub
ibn_egypt قام بنشر يناير 10, 2015 قام بنشر يناير 10, 2015 اخى الفاضل تفضل الملف المرفق .. لربما به طلبك تحياتي مشكل 8.rar
شكيب عمار قام بنشر يناير 10, 2015 الكاتب قام بنشر يناير 10, 2015 غفر الله لكما أنتما الإثنين، وبارك الله فيكما، لكن الإشكال إذا تغيرت الأعمدة والصفوف في الصفحة الثانية يعني المعطيات من الصفحة الأولى تنقل إلى الصفحة الثانية، بالبحث عن اسمه وتطابق رتبته معاً يوجد ملف مرفق آخر مشكل 8-1.rar
سليم حاصبيا قام بنشر يناير 14, 2015 قام بنشر يناير 14, 2015 بواسطة هذا الكود تستطيع ان تحدد الى اي نطاق سوف يتم النقل مشكل 8.rar 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.