معرفی و کاربرد دستور HasFormula در ماکرونویسی اکسل

امتیاز 3.67 ( 3 رای )

معرفی و کاربرد دستور HasFormula در ماکرونویسی اکسل

معرفی و کاربرد دستور HasFormula در ماکرونویسی اکسل

سلام عرض میکنم خدمت دوستان و دنبال کنندگان محترم سایت آموزشی اکسل لرن . امروز برای شما سروران گرامی آموزش و کاربرد دستور HasFormula در محیط وی بی ای اکسل را آماده نمودیم که امیدواریم مورد رضایت شما عزیزان و علاقه مندان به یادگیری زبان ماکرونویسی در محیط اکسل ، قرار گیرد .

دستور HasFormula مشابه با تابع ISFORMULA در صفحه گسترده اکسل عمل میکند و همانند آن خروجی True و False در صورت وجود یا عدم وجود تابع برمیگرداند .

به ماژول زیر دقت نمایید :

Sub excellearn()

If Sheets(1).Range(“A1”).HasFormula = True Then

MsgBox “its Ok !”

Else

MsgBox “its No Ok !”

End If

End Sub

در ماژول فوق درصورت وجود فرمول / تابع در سلول A1 عبارت “its Ok” و در غیراینصورت عبارت “its No Ok” را برمیگرداند .

به ماژول زیر دقت نمایید :

Sub excellearn()

Dim iCell As Range

For Each iCell In Range(“A1:A5”)

If iCell.HasFormula = True Then

iCell.Offset(, 1) = “its Ok”

End If

Next iCell

End Sub

در ماژول فوق یکایک سلول های A1 تا A5 توسط حلقه For Each مورد بررسی قرار میگیرند که در صورت دارا بودن فرمول/تابع ، سلول نظیر آن در ستون B مقدار “its Ok” را شامل میشود .

البته خیلی از دوستان دستور HasFormula را با دستور SpecialCells(xlCellTypeFormulas) اشتباه میگیرند ، بطوریکه دستور SpecialCells قدرت انتخاب را به کاربران میدهد درحالیکه دستور HasFormula وجود یا عدم وجود فرمول / تابع را تایید میکند .

به ماژول زیر دقت نمایید :

Sub excellearn()

Sheets(1).Cells.SpecialCells(xlCellTypeFormulas).Select

End Sub

توسط ماژول فوق ، شما با استفاده از دستور SpecialCells(xlCellTypeFormulas) اشاره به سلول های حاوی دارای فرمول دارید.

به منظور درک بهتر شما عزیزان ، در خصوص استفاده از دستور HasFormula کلیپ آموزشی تهیه نمودیم :

امیدوارم مطلب آموزشی ” معرفی و کاربرد دستور HasFormula در ماکرونویسی اکسل ” مورد رضایت شما عزیزان قرار گرفته باشد ، البته پیشنهاد میکنم برای درک بهتر از عملکرد ماژول های فوق ، مطالب آموزشی زیر را یک بار مطالعه فرمایید :

منبع آموزشی : سایت آموزشی اکسل لرن

مطالعه بیشتر