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

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

قام بنشر

الاخوة الافاضل

احتاج مساعدتكم فى ماكرو لغلق الخلايا الملونة بالون الاصفر و التى تمثل التوقيع - اى بمجرد ادخال اسم الشخص فيها يتم غلق الخلية و لا تسمح لاحد بتعديل الاسم

و استفسار اخر - ما هو اقصى عدد للsheets يمكن ان يحتويها المجلد الواحد من الاكسيل

- هل يمكن اجراء بعض العمليات على الـ sheets المخفية بدون كود لظهورها ثم اجراء العملية ثم اختفائها مرة اخرى

و لكم جزيل الشكر و العرفان

test.rar

قام بنشر

السلام عليكم

أخي العزيز

ضع الكود التالي في حدث الورقة


Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Column > 1 Or Target.Row < 2 Or Target.Row > 10 Then Exit Sub

[ad1] = Target.Value

If [ad1] <> "" Then [b2].Select


End Sub

إذا كانت الخلية (إحدي الخلايا الصفراء) التي تنوي ملئها فارغة فسيقبل ولن يفعل شيئا

وإلا إذا كانت ملأي فسينتقل بمجرد الإشارة إليها إلي الخلية B2

تفضل المرفق أيضا

test2.rar

قام بنشر (معدل)

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

أخي الكريم طارق، شكرا لك على تجاوبك مع طلبات إخواننا بالمنتدى، عمل جميل بارك الله فيك وفي أمثالك وجزاك الله كل خير...

أخوك بن علية

تم تعديل بواسطه hben
قام بنشر (معدل)

السلام عليكم

اخي أحمد (HaNcOcK)

جزاك الله خيرا

أخي بن علية

جزاك الله خيرا

وأشكركما كثيرا علي مروركما والتعليق والكلمات الطيبة

أخي mmtronic

حمدا لله علي سلامة الوصول

والحمد لله أن الحل أرضاك

تم تعديل بواسطه TareQ M

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information