پرسش: تعیین مقدار نامشخص برای متغیر byte
سلام و عرض ادب خدمت اساتید و دوستان بزرگوار و تبریك عید سعید فطر
یك متغیر از نوع BYTE دارم كه میخوام در یك فرمول مورد استفاده قرار بدم. برای مقدار دهی به این متغیر، در حالت عادی مشكلی ندارم، اما گاهی هست كه میخوام متغیر در فرمول مهم نباشه مثلا یك بار میخوام ركوردهایی رو مورد شمارش قرار بدم كه یك ستون خاص اونها حتما عدد 2 یا 3 درج شده باشه و یك بار هم میخوام به گونه بشمارم كه اصلا مهم نباشه در اون ستون چه عددی بیاد
با تكرار فرمول میتونم این كار رو انجام بدم، اما دنبال راحتتری برای فرمولنویسی هستم، میخوام ببینم اصلا شدنی هست یا راه بهتری وجود داره؟
ممنون میشم راهنمایی بفرمایید
Dim Range_T12 As Range
Dim Range_N12 As Range
Dim Range_B12 As Range '
Dim BRAND As Byte
If COMBO_AGHLAM_MARK.Value = "" Then BRAND = ؟؟؟؟؟؟؟؟ Else BRAND = COMBO_AGHLAM_MARK.Value
Set Range_T12 = Workbooks("0_AA").Sheets("AGH").Range("V10:V100000 ")
Set Range_N12 = Workbooks("0_AA").Sheets("AGH").Range("Y10:Y100000 ")
Set Range_B12 = Workbooks("0_AA").Sheets("AGH").Range("Z10:Z100000 ")
LBL_M1_12.Caption = WorksheetFunction.CountIfs(Range_N12, "ÓÑÞáã", Range_T12, ">=" & LBL_T1_1.Caption, Range_T12, "<=" & LBL_T1_2.Caption, Range_B12, BRAND)
یك متغیر از نوع BYTE دارم كه میخوام در یك فرمول مورد استفاده قرار بدم. برای مقدار دهی به این متغیر، در حالت عادی مشكلی ندارم، اما گاهی هست كه میخوام متغیر در فرمول مهم نباشه مثلا یك بار میخوام ركوردهایی رو مورد شمارش قرار بدم كه یك ستون خاص اونها حتما عدد 2 یا 3 درج شده باشه و یك بار هم میخوام به گونه بشمارم كه اصلا مهم نباشه در اون ستون چه عددی بیاد
با تكرار فرمول میتونم این كار رو انجام بدم، اما دنبال راحتتری برای فرمولنویسی هستم، میخوام ببینم اصلا شدنی هست یا راه بهتری وجود داره؟
ممنون میشم راهنمایی بفرمایید
Dim Range_T12 As Range
Dim Range_N12 As Range
Dim Range_B12 As Range '
Dim BRAND As Byte
If COMBO_AGHLAM_MARK.Value = "" Then BRAND = ؟؟؟؟؟؟؟؟ Else BRAND = COMBO_AGHLAM_MARK.Value
Set Range_T12 = Workbooks("0_AA").Sheets("AGH").Range("V10:V100000 ")
Set Range_N12 = Workbooks("0_AA").Sheets("AGH").Range("Y10:Y100000 ")
Set Range_B12 = Workbooks("0_AA").Sheets("AGH").Range("Z10:Z100000 ")
LBL_M1_12.Caption = WorksheetFunction.CountIfs(Range_N12, "ÓÑÞáã", Range_T12, ">=" & LBL_T1_1.Caption, Range_T12, "<=" & LBL_T1_2.Caption, Range_B12, BRAND)