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

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

قام بنشر

أخي ليس هناك أرتباط بين مربع التعليق والتعليق نفسة ولكن ( comment ) يضاف للخلية لأرسال رسالة معينة للمستخدم من المبرمج ولوقمت في المثال المرفق من حذف التعليق لن يؤثر ذلك علي النتيجة وقم بتجربة ذلك

واليك المثال بعد حذف ال (comment ) وغير في الخلايا كما تريد

comment.rar

قام بنشر

بعد اذن أخى الحبيب محمود

جرب أخى هذا الكود فى حدث الصفحةوهو يغير ال Comment تلقائيا عن أى تغيير فى الخلايا من K11 الى L17 وهى خلايا الصادر والوارد


Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("K11:L17")) Is Nothing Then

With Range("F6").Comment

.Text Text:="مجموع الوارد:" & " " & [k18] & Chr(10) & "مجموع الصادر:" & " " & [L18]

End With

End If

End Sub

comment1.rar

قام بنشر

أخى الفاضل / جروان

شكرا جزيلا أخى الفاضل على هذه الكلمات الطيبة

وكل عام وأنتم بخير

وبالنسبة للكود السابق أجريت عليه بعض التعديلات فى المشاركة السابقة

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

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

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

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

سجل حساب جديد

تسجيل دخول

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

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

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

Important Information