اكيف اقيد ماكرو بالعمل في صفحة معينه دونا سواها ؟؟؟

samaoy · أكتوبر 25, 2006

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

عندي ملف اكسل يتكون من عدة اوراق

وعندي ماكرو يعمل في الملف ولكن اثناء الانتقل من ورقة الى أخرى

يعمل الماكرو في الورقة الاخرى

فما هو الكود الذي اضيفه الى الماكرو حتى يعمل في الورقة الثانيه فقط دون غيرها

يعني اريده ان يعمل في الورقة الثانيه فقط وباقي الاوراق لا يعمل بها الماكرو

هذا مالدي من سؤال فأرجو منكم الاجابة

وجزاكم الله خير الجزاء

تم تعديل أكتوبر 25, 2006 بواسطه samaoy

**علي السحيب** · أكتوبر 28, 2006

الكود التالي يعمل فقط عندما يكون إسم ورقة العمل Sheet1 .. ويمكن تغيير هذا الإسم داخل الكود ليعمل مع ورقة عمل آخرى بإسم مختلف.

Sub Color()

If ActiveSheet.Name = "Sheet1" Then

If [A2] = 56 Then [A2] = 0
[A2] = [A2] + 1
[B2].Interior.ColorIndex = [A2]

End If

End Sub

شاهد المرفق،

samaoy · أكتوبر 28, 2006

مشكور اخي علي على هذه المعلومات

وحاولت ان اعمل هذا الماكرو ولكن دون جدوى

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

واليك المرفق لكي تتضح الصورة

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

ودعائي لك بالتوفيق

**علي السحيب** · أكتوبر 29, 2006

تم التعديل .. شاهد المرفق،

samaoy · أكتوبر 29, 2006

اخ علي السحيب يعجز اللسان عن شكرك

وتعجز الكلمات على ان تترتب لتخرج بجملة شكر تعطيك حقك ومستحقك

ولا املك لك الا الدعاء

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

اخوك

سماوي

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