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

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

قام بنشر

طالما انك لم تقم برفع ملف وتوضيح طلبك

تفضل هذا الكود فى حدث الورقة

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Me.Range("C2").Interior.Color = Me.Range("A2").Interior.Color
End Sub

 

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

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

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

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

سجل حساب جديد

تسجيل دخول

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

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

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

Important Information