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

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


اعلان هنا
ألعاب فلاش أون لاين
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا



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





عند تحديث قيمة خليه يتم وضعها بأخر خليه بالعمود

السلام عليكم بالخلية B2 يوجد رقم يتم تحديثه يدويا بعد كل تحديث يدوي(بعد الضغط علي انتر) اريد ان يتم نسخ قيمة الخليهB2 ال ..



04-11-2019 04:49 مساء
yousef_kaf
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 25-11-2017
رقم العضوية : 1908
المشاركات : 118
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 2-9-1989
يتابعهم : 9
يتابعونه : 2
قوة السمعة : 168
الاعجاب : 23
 offline 

السلام عليكم
بالخلية B2 يوجد رقم يتم تحديثه يدويا
بعد كل تحديث يدوي(بعد الضغط علي انتر) اريد ان يتم نسخ قيمة الخليهB2 الي العمودD
 
 
 
  LAST CELL.xlsm   تحميل xlsm مرات التحميل :(4)
الحجم :(8.682) KB







04-11-2019 04:58 مساء
مشاهدة مشاركة منفردة [1]
مالك ماريه
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-12-2017
رقم العضوية : 2523
المشاركات : 573
الجنس : ذكر
تاريخ الميلاد : 13-3-1990
يتابعهم : 3
يتابعونه : 9
قوة السمعة : 936
الاعجاب : 140
 offline 
look/images/icons/i1.gif عند تحديث قيمة خليه يتم وضعها بأخر خليه بالعمود
 
 
  LAST%20CELL.rar   تحميل rar مرات التحميل :(6)
الحجم :(7.46) KB
  نسخة من LAST%20CELL.rar   تحميل rar مرات التحميل :(13)
الحجم :(13.692) KB


أثارت هذه المشاركة إعجاب: YasserKhalil، yousef_kaf،




04-11-2019 07:22 مساء
مشاهدة مشاركة منفردة [2]
yousef_kaf
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 25-11-2017
رقم العضوية : 1908
المشاركات : 118
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 2-9-1989
يتابعهم : 9
يتابعونه : 2
قوة السمعة : 168
الاعجاب : 23
 offline 
look/images/icons/i1.gif عند تحديث قيمة خليه يتم وضعها بأخر خليه بالعمود
جزاك الله خيرا استاذ مالك
هذا الكود هو المطلوب
ولكن هل يمكن ان يعمل مباشرة بدون زر اي بعد الادخال مباشرة والضغط انتر
Sub trhil()

Dim X As Long
lr = Range("d" & Rows.Count).End(xlUp).Row
Range("d" & lr + 1).Value = Sheets(1).Range("b2").Value
Sheets(1).Range("b2").Value = ""

End Sub


أثارت هذه المشاركة إعجاب: مالك ماريه،




04-11-2019 07:30 مساء
مشاهدة مشاركة منفردة [3]
yousef_kaf
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 25-11-2017
رقم العضوية : 1908
المشاركات : 118
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 2-9-1989
يتابعهم : 9
يتابعونه : 2
قوة السمعة : 168
الاعجاب : 23
 offline 
look/images/icons/i1.gif عند تحديث قيمة خليه يتم وضعها بأخر خليه بالعمود
بعد التجربة وصلت لهذا الحل
اكرر شكري استاذ مالك
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("b2")) Is Nothing Then
Dim X As Long
lr = Range("d" & Rows.Count).End(xlUp).Row
Range("d" & lr + 1).Value = Sheets(1).Range("b2").Value
Sheets(1).Range("b2").Value = ""
End If
End Sub


أثارت هذه المشاركة إعجاب: YasserKhalil، مالك ماريه،




04-11-2019 08:49 مساء
مشاهدة مشاركة منفردة [4]
salim
menu_open
خبير معتمد
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 430
الجنس : ذكر
تاريخ الميلاد : 1-5-1989
الدعوات : 1
يتابعهم : 13
يتابعونه : 17
قوة السمعة : 3401
الاعجاب : 294
 offline 
look/images/icons/i1.gif عند تحديث قيمة خليه يتم وضعها بأخر خليه بالعمود
جرب هذا الماكرو(بعد اذن الاخ مالك طبعاً)

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
 If Target.Address = "$B$2" Then
  Cells(2, 2).Cut Cells(Rows.Count, 4).End(3).Rows(2)
 End If
Application.EnableEvents = True
End Sub


 

أثارت هذه المشاركة إعجاب: مالك ماريه، YasserKhalil، yousef_kaf،




05-11-2019 06:27 صباحا
مشاهدة مشاركة منفردة [5]
yousef_kaf
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 25-11-2017
رقم العضوية : 1908
المشاركات : 118
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 2-9-1989
يتابعهم : 9
يتابعونه : 2
قوة السمعة : 168
الاعجاب : 23
 offline 
look/images/icons/i1.gif عند تحديث قيمة خليه يتم وضعها بأخر خليه بالعمود
كود جميل استاذ سليم
جزاك الله خيرا
كلا الكودين يؤدون العمل بكفاءة
شكرا لكم جميعا

أثارت هذه المشاركة إعجاب: مالك ماريه،




05-11-2019 11:14 صباحا
مشاهدة مشاركة منفردة [6]
مالك ماريه
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-12-2017
رقم العضوية : 2523
المشاركات : 573
الجنس : ذكر
تاريخ الميلاد : 13-3-1990
يتابعهم : 3
يتابعونه : 9
قوة السمعة : 936
الاعجاب : 140
 offline 
look/images/icons/i1.gif عند تحديث قيمة خليه يتم وضعها بأخر خليه بالعمود
الحمد لله ان تم المطلوب على خير وهذه فرصة اتوجه بالشكر لاخى واستاذى الحبيب الاستاذ ياسر خليل والاستاذ سليم حفظهما الله

أثارت هذه المشاركة إعجاب: YasserKhalil،






الكلمات الدلالية
تحديث ، قيمة ، خليه ، وضعها ، بأخر ، خليه ، بالعمود ،


 







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



الساعة الآن 10:26 صباحا

أعلن هنا
أعلن هنا
أعلن هنا