كود لاظهار تلميح عند الخلية النشطة

[سعيد 1428]

ايها الاخوة الافاضل

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

ارجو المساعدة في عمل كود تكون وظيفته اظهار تلميح عند الخلية النشطة في الاكسيل محتوى هذا التلميح هو  قيمة خلية أخرى كما هو في الملف المرفق 

مثلا عندما تكون الخلية النشطة d7 فإن التلميح يعطي قيمة الخلية f7 وهي عبارة عن قسمة d7 على e7 وهكذا في بقية الخلايا علما بان قيمة خلايا العمود d والعمود e يمكن ان تتغير 

تبعا لمعطيات اخرى

وشكرا 

نسبة التحقق.xlsx

تم تعديل سبتمبر 7, 2018 بواسطه سعيد 1428

[سعيد 1428]

السلام عليكم 

هل الموضوع الوارد في الطلب غير ممكن في الاكسيل ؟

[مهند محسن]

وعليكم السلام

فعلا هذا الموضوع ليس بالسهل ونحتاج توضبح أكثر لما تريد

بارك الله فيك

[سعيد 1428]

السلام عليكم 

اخي الكريم 

المطلوب هو انه عند التركيز على اي خلية من العمود d تظهر رسالة (كتعليق أو تلميح ) بقيمة قسمة قيمة هذه الخلية على قيمة الخلية المقابلة لها في العمود d كنسبة مئوية 

وبطريقة أخرى تظهر القيمة الموجودة في العمود f

نسبة التحقق.xlsx

[عاشق الاكسيل]

اتفضل ان شاء الله يعطيك المطلوب

ضيف الكود فى موديل

Sub grabcomment()
Dim ws As Worksheet
    Dim rg As Range
    Dim comment As String
    Dim i As Integer
i = 6
Set rg = Range("D6:D15") 'النطاق اللى هيظهر فيه التعليقات
Set ws = Sheets("ورقة1")
For Each C In rg
comment = ws.Cells(i, 6).Value 'النطاق مصدر الكومنتات
C.AddComment.Text Text:=comment
i = i + 1
Next C
End Sub

 

تم تعديل سبتمبر 7, 2018 بواسطه عاشق الاكسيل

[سعيد 1428]

أخي العزيز 

شكرا على الاهتمام

تم إضافة الكود إلا انه لم يأتي بالنتيجة المطلوية 

 

نسبة التحقق (1).xlsm

[عاشق الاكسيل]

اتفضل ان شاء الله يعطيك المطلوب

ضيف الكود فى موديل

Sub grabcomment()
Dim ws As Worksheet
    Dim rg As Range
    Dim comment As String
    Dim i As Integer
i = 6
Set rg = Range("D6:D15") 'set range of where the comments will be seen
Set ws = Sheets("ورقة1")
For Each C In rg
comment = ws.Cells(i, 6).Value 'set location of comments you are grabbing from
C.AddComment.Text Text:=comment
i = i + 1
Next C
End Sub

جرب كده الملف ده

 

Copy of نسبة التحقق (1).xlsm

[سعيد 1428]

أخي العزيز 

شكرا على الاهتمام

الظاهر أني لم استطع توضيح المطلوب 

وهو إظهار تلميح أو رسالة عند الخلية النشطة ولتكن d10 تبين هذه الرسالة أو التلميح النسبة المئوية المتحققة من الموازمة وهذه النسبة موجودة في f10 على سبيل المثال

مع ملاحظة ان هذه النسبة قد تتغير في اي وقت تبعا لتعير الخلايا المصدر D10 و E10

لقد قمت بادراج تعليق في الخلية لغرض إيضاح المطلوب فقط 

وشكرا مجددا على الاهتمام

 

تم تعديل سبتمبر 7, 2018 بواسطه سعيد 1428

[عاشق الاكسيل]

16 ساعات مضت, سعيد 1428 said:

أخي العزيز 

شكرا على الاهتمام

الظاهر أني لم استطع توضيح المطلوب 

وهو إظهار تلميح أو رسالة عند الخلية النشطة ولتكن d10 تبين هذه الرسالة أو التلميح النسبة المئوية المتحققة من الموازمة وهذه النسبة موجودة في f10 على سبيل المثال

مع ملاحظة ان هذه النسبة قد تتغير في اي وقت تبعا لتعير الخلايا المصدر D10 و E10

لقد قمت بادراج تعليق في الخلية لغرض إيضاح المطلوب فقط 

وشكرا مجددا على الاهتمام

 

هى حاليا بتظهر كملحوظة Comment انت حابب انها تظهر بشكل او بطريقة تانية ؟؟

[سعيد 1428]

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

طبعا هي الآن تظهر كملحوظة ولكن ما ذا لو تغيرت قيمة الخلايا في العمود d او الخلايا في العمود e

فإنه من الملاحظ النسبة في الملحوظة لا تتغير ... ,وهذا لا يعطي نتيجة صحيحة 

وحيث ان القيمة المطلوب إظهارها  هي عبارة عن قسمة خلايا العمود d على خلايا العمود e فإنه لا بد أن تكون النسبة الواردة في الملاحظة قابلة للتغيير تبعا لتغير هذه الخلايا 

وشكرا