Recent content by kimpida

Thanks to all the folks who replied. My problem is resolved.:D

Sorry Brian for mix up. :o thanks for your help

Yes, you are correct - thanks for correction:D I mean <= -100,000 OR >= 100,000

I am trying to figure out Onbudget and Overbudget variance. If budget variance is $99,999 thru -$-99,999 project is 'onbudget' [CODE] 'Onbudget project need variance Class - this one working If (Me.Variance_From_Budget <= 100000 And Me.Variance_From_Budget >= -100000) And...

Here My code: [code] 'Overbudget projects needs explanation this one is not working If (Me.Variance_From_Budget < -100000) And (Me.Comments_Explanation_Delta_____100K = "" Or IsNull(Me.Comments_Explanation_Delta_____100K)) Then MsgBox "This project is Overbudget, provide explanation...

I mean: -101000

Nope, not working when variance is greater then -100,000.

Code: --------- If (Me.Variance_From_Budget < 99999 And Me.Variance_From_Budget >= -99999) --------- This code is working when variance is less then -100,000, but does not work when variance is greater then -100,000. Please help.:banghead:

Sorry about it. My new at it. Please be paitent with me. thanks

[CODE] '''Non Budgeted Projects need and Variance class If Me.ID.Value >= 90000 And (IsNull(Me.Variance_Class) Or Me.Variance_Class = "") Then MsgBox "This project is Unbudgeted. Please Add 'Variance Class' and provide Explanation why this project is Unbudgeted project has been added."...

'''Non Budgeted Projects need and Variance class If Me.ID.Value >= 90000 And (IsNull(Me.Variance_Class) Or Me.Variance_Class = "") Then MsgBox "This project is Unbudgeted. Please Add 'Variance Class' and provide Explanation why this project is Unbudgeted project has been added.", vbExclamation...

Thanks for all your help One more problem How to find, the null value in the code? I am getting following error in my code: "Invalid use of Null"

it is working - thanks

thanks it is working, but now I have an other question. If (Me.Variance_From_Budget < 99999 And Me.Variance_From_Budget <= -99999) And (Me.Variance_Class = "" Or IsNull(Me.Variance_Class)) Then MsgBox "This project is onbudget project, please add Variance Class 'Onbudget' ."...

:banghead:I am trying to write following code, I want Msg to pop, when all three condition are true, but it not working, any help will be appriciated '''Non Budgeted Projects need Explanation and Variance class" If Me.ID.Value >= 90000 And and Me.Variance_Class = "" and...