متد Add برای اضافه کردن شروط قالب به مجموعه FormatConditions

CONDITIONAL FORMATTING ( VBA )

FormatConditions.Add Method : 

با استفاده از متد Add می توان یک فرمت شرطی  بعنوان شئ FormatCondition به مجموعه FormatConditions یک کنترل  کمبو یا تکست باکس اضافه نمود.

expression.Add (Type, Operator, Formula1, Formula2)

آرگومان Type در متد بالا : 

AcFormatConditionType : 

acDataBar :The conditional format is displayed as a 

data bar

قالب شرطی که بصورت میله داده نمایش داده می شود

acExpression : The conditional format is based on an expression.

قالب شرطی بر اساس یک عبارت است مثل "Me.Id Mod 2"

acFieldHasFocus : The conditional format is based on the value of the control that has focus on a form.

قالب شرطی بر اساس مقدار کنترلی است که در فرم فوکس گرفته

acFieldValue : The conditional format is based on values in the selected control.

قالب شرطی بر اساس مقادیر در کنترل انتخاب شده است مثل فیلد ME.ID

آرگومان Operator که عملگرها است مثل acequal و ....

و آرگومان های بعد فرمول هایی هستند که می نویسید.یکی از فرمول ها در بالا اشاره شد 

اضافه کردن شروط برای کنترل ، محدودیت دارد و زمانی که بیشتر از تعداد مجاز شود ارور یا خطا می دهد ، پس سعی کنید از همان باتنی که در تب فرمت در نمای دیزاین و کنترل تکست یا کمبو باکس بعنوان Conditional Formatting است استفاده کنید.

فرض کنید میخواهید اعداد زوج یا فرد در فیلد ID رنگ متفاوتی داشته باشند.

تعریف OFC بعنوان FormatCondition.

Set کردن OFC برای استفاده از متد ADD در ویژگی FormatCondition  تکست باکس ( txt1.FormatConditios.Add ) اگر تنظیم نشود ( یعنی از Set استفاده نشود ) ارور می دهد ، در متد Add آرگومانها بدلخواه پر شوند.

مرحله آخر مقدار دادن به ویژگی ForeColor کنترلی است که به متغیر OFC تنظیم شده. ( OFC.ForeColor=vbGreen )

می توانید کدها را در رویداد لود فرم قرار دهید.

FormatConditions خودش یکسری ویژگیها دارد مثل Count که تعداد شروط مربوط به تکست باکس یا کمبو باکس مشخص شده را می دهد.

Remarks

You can use the Delete method of the FormatConditions collection to delete an existing FormatConditions collection from a combo box or text box control.

با استفاده از متد Delete مجموعه FormatConditions می توان این مجموعه را از یک کنترل تکست یا کمبو باکس حذف نمود

مرجع : داکیومنت اکسس سایت آفیس

دوستان لطفا در نظر سنجی شرکت کنید و نظرات خود را در زیر هر پست بگذارید ، مطالب بنده جدیدا طبق عبارات  جستجو شده در وب است