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

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


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





ظهور القيم في مربع النص عند تحديد خلية vba

عند تحديد خلية يتم الاتصال تلقائي في التكست بوكس vba السلام عليكم ورحمة الله وبركاتة محتاج مساعدة والله يجازيكم كل خير ..


موضوع مغلق


28-01-2021 03:09 مساء
fathy
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-03-2020
رقم العضوية : 18571
المشاركات : 89
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 142
 offline 

عند تحديد خلية يتم الاتصال تلقائي في التكست بوكس vba

السلام عليكم ورحمة الله وبركاتة

محتاج مساعدة والله يجازيكم كل خير 

اريد ظهور النص في التكست بوكس تلقائياً عند تحديد اي خلية في عمود B
مثلا اذا قمت بتحديد خلية معينة في عمود B و بها اي قيمة  ثم يظهر هذة القيمة تلقائي في التكست بوكس .
سواء اذا تم تحديد الخلية عن طريق الماوس او التنقل عن طريق الكيبورد بالاسهم 
وانا اخترت نوع التكست بوكس عبارة عن shape لسهولة تنسقها
ملاحظة اذا تم تحديد خلية اخرى يحتفظ التكست بوكس بتنسيقها كما هى
و ارفقت الملف يوضح المطلوب 

واشكركم جميعا و تفضلو بقبول وافر الاحترام و التقدير

 
 
  ظهور القيم في مربع النص عند تحديد خلية.xlsm   تحميل xlsm مرات التحميل :(1)
الحجم :(11.768) KB



أفضل إجابة مقدمة من حسين مامون وهي:
انسخ هذا الكود مكان السابق
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
    ActiveSheet.Shapes.Range(Array("Rectangle 1")).Select
    Selection.Text = Target
    Target.Select
End Sub
عرض الإجابة




28-01-2021 04:19 مساء
مشاهدة مشاركة منفردة [1]
fathy
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-03-2020
رقم العضوية : 18571
المشاركات : 89
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 142
 offline 
look/images/icons/i1.gif ظهور القيم في مربع النص عند تحديد خلية vba
قمت بعمل كود ينفذ المطلوب ولكن على تكست بوكس عادي ولكن اريد عمل هذا الكود تلقائي بدون الزر و اليكم الملف المرفق 






 
 
  ظهور القيم في مربع النص عند تحديد خلية2.xlsm   تحميل xlsm مرات التحميل :(2)
الحجم :(24.557) KB


28-01-2021 06:20 مساء
مشاهدة مشاركة منفردة [2]
حسين مامون
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 23-08-2017
رقم العضوية : 69
المشاركات : 172
الجنس : ذكر
الدعوات : 1
يتابعهم : 5
يتابعونه : 12
قوة السمعة : 957
عدد الإجابات: 22
 offline 
look/images/icons/i1.gif ظهور القيم في مربع النص عند تحديد خلية vba
ربما تقصد هذا الشيء
 
 
 
  ظهور القيم في مربع النص عند تحديد خلية2.xlsm   تحميل xlsm مرات التحميل :(3)
الحجم :(25.584) KB


28-01-2021 06:41 مساء
مشاهدة مشاركة منفردة [3]
fathy
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-03-2020
رقم العضوية : 18571
المشاركات : 89
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 142
 offline 
look/images/icons/i1.gif ظهور القيم في مربع النص عند تحديد خلية vba
هو المطلوب ولكن عند التنقل عن طريق الكيبورد بالاسهم لا يعمل بشكل جيد 







28-01-2021 07:19 مساء
مشاهدة مشاركة منفردة [4]
حسين مامون
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 23-08-2017
رقم العضوية : 69
المشاركات : 172
الجنس : ذكر
الدعوات : 1
يتابعهم : 5
يتابعونه : 12
قوة السمعة : 957
عدد الإجابات: 22
 offline 
look/images/icons/i1.gif ظهور القيم في مربع النص عند تحديد خلية vba
انسخ هذا الكود مكان السابق
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
    ActiveSheet.Shapes.Range(Array("Rectangle 1")).Select
    Selection.Text = Target
    Target.Select
End Sub

28-01-2021 07:34 مساء
مشاهدة مشاركة منفردة [5]
fathy
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-03-2020
رقم العضوية : 18571
المشاركات : 89
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
يتابعهم : 3
يتابعونه : 1
قوة السمعة : 142
 offline 
look/images/icons/i1.gif ظهور القيم في مربع النص عند تحديد خلية vba
اشكرك جدا الكود يعمل بكفائة
جزاك الله خير  

29-01-2021 01:36 مساء
مشاهدة مشاركة منفردة [6]
حسين مامون
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 23-08-2017
رقم العضوية : 69
المشاركات : 172
الجنس : ذكر
الدعوات : 1
يتابعهم : 5
يتابعونه : 12
قوة السمعة : 957
عدد الإجابات: 22
 offline 
look/images/icons/i1.gif ظهور القيم في مربع النص عند تحديد خلية vba
وجزيت خيرا اخي الكريم



الكلمات الدلالية
ظهور ، القيم ، مربع ، النص ، تحديد ، خلية ،


 










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

الساعة الآن 06:55 صباحا