SiLVeR1986 قام بنشر مارس 20, 2009 مشاركة قام بنشر مارس 20, 2009 السلام عليكم ورحمة الله وبركاته أريد ربط هاتين الورقتين بحيث يقوم الاكسل بوضع القيم تلقائيا في أعمدة الإسم والرقم والملاحظات إذا وجد ملاحظات بحيث أن ورقة الأسماء يوجد فيها كود الإسم والإسم الثلاثي والرقم والملاحظات إن وجد وفي ورقة الدخول والخروج أقوم بوضعها لاحقا .. أو نسخ ولصق لأكواد الأسماء والذي أريده أن يقوم الاكسل باستيراد بيانات نفس كود الإسم ويقوم بوضعها في ورقة الدخول والخروج "يوجد في المرفق نسختين لأوفيس 2003 وأوفيس 2007" ولكم جزيل الشكر book1.zip رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر مارس 20, 2009 مشاركة قام بنشر مارس 20, 2009 و عليكم السلام و رحمة الله وبركاته شاهد المرفق 2003 آمل ان يفي بالغرض silver.zip رابط هذا التعليق شارك More sharing options...
SiLVeR1986 قام بنشر مارس 21, 2009 الكاتب مشاركة قام بنشر مارس 21, 2009 الله يعطيك ألف عآفية "احمد يعقوب" وجزاك الله كل خير بس ترا ما فهمت الطريقة لو في مجال تشرحها :) رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر مارس 22, 2009 مشاركة قام بنشر مارس 22, 2009 Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False If Target.Column <> 1 Then Exit Sub اذا كان العمود ليس العمود رقم 1 انهي الكود If Not Range("A" & Target.Row) = "" Then For i = 2 To 111 If Range("A" & Target.Row) = Sheets("الأسماء").Cells(i, "A") Then اذا كانت الخلية في الععمود A في السطر الحالي = الخلية في العمود A من صفحة الأسماء اذا Range("F" & Target.Row) = Sheets("الأسماء").Cells(i, "B") الخلية F في السطر الحالي = الخلية B في صفحة الأسماء وهكذا Range("G" & Target.Row) = Sheets("الأسماء").Cells(i, "c") Range("H" & Target.Row) = Sheets("الأسماء").Cells(i, "D") End If Next i End If Application.ScreenUpdating = True End Sub رابط هذا التعليق شارك More sharing options...
SiLVeR1986 قام بنشر مارس 22, 2009 الكاتب مشاركة قام بنشر مارس 22, 2009 (معدل) الله يعطيك ألف عافية يا رب وآسف لأني عذبتك معي بس أنا أكثر الأوقات لازم انسخ البيانات والصقها في ورقة بيانات الدخول والخروج يعني لازم اسوي تحرير للاسم عشان يستبدل المحتويات ؟؟؟ تم تعديل مارس 23, 2009 بواسطه SiLVeR1986 رابط هذا التعليق شارك More sharing options...
احمدزمان قام بنشر مارس 23, 2009 مشاركة قام بنشر مارس 23, 2009 الله يعافيك اخي الكريم حبت مافهمت من كلامك ممكن نعدل الكود ونخليه بدل ماهو شغال على طوول نعمله زر يشتغل عليه بحيث لمن تنسخ البيانات في العمود A تضغط على الزر يدور في العمود F اذا كانت الخلية فارغة او فاضية يجيب بياناتها من الورقة الثانية حسب قيمة الخلية في العمود A هل هذا المطلوب رابط هذا التعليق شارك 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.