شكيب عمار قام بنشر يناير 10, 2015 مشاركة قام بنشر يناير 10, 2015 ترحيل بيانات بهذه الطريقة، يوجد نموذج مرفق غفر الله لكل من ساهم مسبقاً مشكل 8.rar رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر يناير 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 رابط هذا التعليق شارك More sharing options...
ibn_egypt قام بنشر يناير 10, 2015 مشاركة قام بنشر يناير 10, 2015 اخى الفاضل تفضل الملف المرفق .. لربما به طلبك تحياتي مشكل 8.rar رابط هذا التعليق شارك More sharing options...
شكيب عمار قام بنشر يناير 10, 2015 الكاتب مشاركة قام بنشر يناير 10, 2015 غفر الله لكما أنتما الإثنين، وبارك الله فيكما، لكن الإشكال إذا تغيرت الأعمدة والصفوف في الصفحة الثانية يعني المعطيات من الصفحة الأولى تنقل إلى الصفحة الثانية، بالبحث عن اسمه وتطابق رتبته معاً يوجد ملف مرفق آخر مشكل 8-1.rar رابط هذا التعليق شارك More sharing options...
شكيب عمار قام بنشر يناير 13, 2015 الكاتب مشاركة قام بنشر يناير 13, 2015 للرفــــــــــــع رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر يناير 14, 2015 مشاركة قام بنشر يناير 14, 2015 بواسطة هذا الكود تستطيع ان تحدد الى اي نطاق سوف يتم النقل مشكل 8.rar 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.