تنسيق شرطي مع نصوص وليس مع ارقام

[omran]

السلام عليكم

لدي ملف اكسل فيه عمودين احدهما للمبلغ والاخر للعملة

دينار ودولار

اريد من البرنامج عن طريق التنسيق الشرطي ان يقوم بالتالي :

في حالة كون عمود العملة = دولار يكون التنسيق رقم مع فارزتين اثنين (للسنتات)

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

حاولت كثيراً لكنني للأسف لم أفلح فأما ان يطبق قاعدة الدينار او يستخدم قاعدة الدولار

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

الرجاء المساعدة

شكراً لكم وبارك الله فيكم اخوتي الكرام

تم تعديل ديسمبر 4, 2010 بواسطه omran

[يحيى حسين]

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

حسب معلوماتي انه لا يمكنك التحكم بتنسيق الخلايا بواسطة هذه الشروط

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

و لكن كحل اخر بإستخدام الأكواد

لو فرضنا ان كلمة الدينار Dinar او كلمة الدولار Dollar موجودة في العامود A و القيم التي نرغب في تطبيق التنسيق عليها موجودة في العامود B جرب هذا الكود

Sub Excel4Us()

Dim c As Range, LR As Integer

LR = Range("a" & Rows.Count).End(xlUp).Row

For Each c In Range("a2:a" & LR)

    Select Case c.Value

        Case Is = "Dollar"

            c.Offset(, 1).NumberFormat = "[$USD] #,##0.00"

        Case Is = "Dinar"

            c.Offset(, 1).NumberFormat = "[$JOD] #,##0.000"

        Case Else

            c.Offset(, 1).NumberFormat = "General"


    End Select

Next c

End Sub

[omran]

الاخ الكريم يحيى حسين

يمكن ان نقوم بذلك عن طريق التنسيق الشرطي لكن الذي فشل معي هو ان هناك شرطان

الملف المرفق يبين الحالة

تنسيق شرطي.zip

[omran]

اخي الكريم يحيى

اشكرك جدا

اعتقد ان كلامك صحيح لكنني احاول ان احل المشكلة بعيداً عن الاكواد

لننتظر ردود الاخوة الافاضل فلعلنا نجد حلاً ان شاء الله

[omran]

السلام عليكم

للرفع

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

العملية تنجح مع الدينار ولا تنجح مع الدولار

بالمناسبة لا استطيع ارفاق الملف من حاسبة العمل أما حاسبة البيت فأستطعت ان ارفقه ولا اعلم السبب

لقد ضغطت الملف ببرنامج winzip لكن دون جدوى

[الخالدي]

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

التنسيق المطلوب يمكن تطبيقه في اكسل 2007 و2010

تنسيق شرطي2007.rar

[يحيى حسين]

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

صدقت اخي الخالدي لم يخطر ببالي هذا الامر

اصبحت مشكلة لدي ان التفكير في الامور و الحلول بطريقة معقدة

نسأل الله السلامة و الخير ان شاء الله

[omran]

السلام عليكم

شكراً جزيلاً اخي الخالدي والشكر موصول للأخ يحيى حسين