أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
ashraf_hertlion hassona229-- لا تميز خلال هذه الفترة YasserKhalil مطلوب تعديل الكود للطباعة اكسيل اسئله واجابات


أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





الكود لا يعمل كاملا

السلام عليكم إلى الأستاذ ياسر بخصوص موضوع مغلق ( ترحيل بشرط) أرجو من الجميع و خاصة الأستاذ ياسر طلب المعذرة لعدم تركيزي ..


موضوع مغلق

الصفحة 1 من 3 < 1 2 3 > الأخيرة »


01-02-2022 03:56 مساء
ayoub2007
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-11-2017
رقم العضوية : 1867
المشاركات : 160
الجنس : ذكر
تاريخ الميلاد : 23-12-1970
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 106
 offline 

السلام عليكم 
إلى الأستاذ ياسر بخصوص موضوع مغلق ( ترحيل بشرط) أرجو من الجميع و خاصة الأستاذ ياسر طلب المعذرة لعدم تركيزي بالموضوع لاني مررت في هذه الأيام بمصيبة وفاة أختي الكبيرة .
لقد جربت الكود و النتيجة : 
يعمل في حالة  وافد جديد و لكن عند إضافة سطر ثاني أوثالث....... يرحله إلى شيت DATA ELV و يكتبه في نفس السطر السابق (يمحو الوافدين السايقين)
أما بالنسبة ل مغادر فالكود لا يعمل  
أطلب منكم السماح مرة أخرى
 
 
  تجربة.xlsm   تحميل xlsm مرات التحميل :(6)
الحجم :(55.821) KB



أفضل إجابة مقدمة من soufisamchi وهي:

للوافد :


في الورقة WAFID في الحدث Change تكتب الكود التالي : 

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Cells.CountLarge > 1 Then Exit Sub
    If Target.Row > 1 And Target.Column = 24 Then
        If Target.Value = "وافد" Then
            Sheets("DATA ELV").Range("A" & Sheets("DATA ELV").Cells(Rows.Count, 1).End(xlUp).Row + 1).Resize(, 24).Value = Cells(Target.Row, 1).Resize(, 24).Value
        
        End If
    End If
End Sub
عرض الإجابة




01-02-2022 04:25 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10455
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 536
قوة السمعة : 36632
عدد الإجابات: 256
 offline 
look/images/icons/i1.gif الكود لا يعمل كاملا
وعليكم السلام أخي الكريم
البقاء لله والدوام لله وحده ، اللهم اغفر لها وارحمها رحمةً واسعة وارزقها الفردوس الأعلى من الجنة

الكود يعمل بشكل صحيح ولكن لضبط المخرجات يجب أن يكون هناك بيانات في عمود الرقم (العمود الأول) في ورقة العمل WAFID

01-02-2022 05:07 مساء
مشاهدة مشاركة منفردة [2]
ayoub2007
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-11-2017
رقم العضوية : 1867
المشاركات : 160
الجنس : ذكر
تاريخ الميلاد : 23-12-1970
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 106
 offline 
look/images/icons/i1.gif الكود لا يعمل كاملا
ألف شكر لك أستاذ ياسر , الف تحية 
بالفعل تم تصحيح ذلك بقي المشكل في المغادرون فالكود لا ينفذ قمت بتجربة كتابة الكود في حدث الورقة DATA ELV فتم تنفيذ الكود مغادر و لكن الكود وافد لا يعمل بهذه الطريقة 
فما العمل 

01-02-2022 05:43 مساء
مشاهدة مشاركة منفردة [3]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10455
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 536
قوة السمعة : 36632
عدد الإجابات: 256
 offline 
look/images/icons/i1.gif الكود لا يعمل كاملا
بالنسبة للوافد يتم نسخه أما المغادر يتم النسخ ثم مسح المحتويات أي ما يشبه عملية القص.

01-02-2022 06:36 مساء
مشاهدة مشاركة منفردة [4]
ayoub2007
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-11-2017
رقم العضوية : 1867
المشاركات : 160
الجنس : ذكر
تاريخ الميلاد : 23-12-1970
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 106
 offline 
look/images/icons/i1.gif الكود لا يعمل كاملا
و هو كذلك أستاذ ياسر

01-02-2022 06:40 مساء
مشاهدة مشاركة منفردة [5]
YasserKhalil
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 10455
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 24
يتابعهم : 1
يتابعونه : 536
قوة السمعة : 36632
عدد الإجابات: 256
 offline 
look/images/icons/i1.gif الكود لا يعمل كاملا
إذا كانت المشكلة ما زالت قائمة ارفق الملف الذي به المشكلة مع توضيح الخطوات بالضبط التي تقوم بها لنعرف المشكلة التي تواجهك بالفعل أثناء التعامل مع الملف.

01-02-2022 07:36 مساء
مشاهدة مشاركة منفردة [6]
ayoub2007
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-11-2017
رقم العضوية : 1867
المشاركات : 160
الجنس : ذكر
تاريخ الميلاد : 23-12-1970
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 106
 offline 
look/images/icons/i1.gif الكود لا يعمل كاملا
بالنسبة للوافد تم تصحيح الخلل
عند كتابة مغادر في عمود الملاحظات يتم أولا نسخ السطر كاملا و لصقه في شيت MOGHADIR ثم يقص  أو يمحى كامل السطر في شيت DATA ELV
 
 
  تجربة.xlsm   تحميل xlsm مرات التحميل :(9)
الحجم :(59.261) KB



الصفحة 1 من 3 < 1 2 3 > الأخيرة »


الكلمات الدلالية
الكود ، يعمل ، كاملا ،


 










اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 01:33 صباحا