تنسيق العملة وتشيك بوكي

[توكل]

الإخوة الأكارم

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

مع الشكر والتقدير.

تنسيق العملة.rar

[ابو القبطان]

اخي الغريب

اليك تحايل على الحل قد يؤدي الغرض ( بالنسبة للطلب الاول ) لانشغالي

تحايل على الحل.rar

[ابو اسامة العينبوسي]

السلام عليكم

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

لكن هنا كود تنسيق العمله

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 3 Then

 Select Case Target

 Case Is = "US DOLLAR"

 Cells(Target.Row, "E").NumberFormat = "[$USD] #,##0.00"

 Case Is = "EUR"

 Cells(Target.Row, "E").NumberFormat = "[$EUR] #,##0.00"

 Case Is = "AED"

 Cells(Target.Row, "E").NumberFormat = "[$AED] #,##0.00"

 Case Is = "QAR"

 Cells(Target.Row, "E").NumberFormat = "[$QAR] #,##0.00"

 End Select

 End If

End Sub

[توكل]

أخي NEW a4 جزاك الله خيراً على الإقتراح ولا عدمنا مساعدتكم

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