اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

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

الظاهر أننا تقدمنا في السن لأني لا أتذكر البتة مشاركتي في الموضوع... وقد أدرجت الكود التالي في حدث الورقة (وهو يعمل مع كل خلايا العمود b):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 2 Then
      [J1].Value = ActiveCell.Value
    End If
End Sub

بن علية

 

قائمة منسدلة مفلترة.rar

قام بنشر

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

قام بنشر

سؤال آخر أستاذي: لو حبيت أنقل الكود لصفحة أخرى كيف ينتقل معي وكيف أتحكم فيه ؟ ما الخلية المؤثرة التي علي تعديلها في الكود ليعمل؟

 

قام بنشر

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

في مشاركتك الأخيرة، ما هو الشيت الذي تريد نقل الكود إليه؟ إذا كان هو الشيت "55" فقد قمت بوضع الكود فيه ويعمل جيدا... ثم إن الملف الذي أرسلته لا يوجد فيه أي كود باعتبار أنه بصيغة .xlsx الذي لا يقبل الأكواد... فعند إضافة كود في ملف بهذه الصيغة يجب حفظه بإحدى الصيغ التي تقبل الأكود مثل .xlsm أو .xlsb (الأفضل)...

في انتظار ردك تقبل ودي واحترامي

بن علية

قام بنشر

أضفت ورقة جديدة باسم فول 3 أريد خطوات نقل الكود من فول 1 إلى 3 ويتغير بالخلية التي أريدها وأيش التعديل الذي يؤثر في معادلة التغيير حتى تستجيب للحروف الأولى أو الاسم الأول؟ وكيف يتم حفظ الملف وتغييره بالصيغة التي تقبل الكود؟ 

قائمة منسدلة مفلترة.rar

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information