Limit the maximum value of variable related to Goal Seek Excel VBA

I have a question that might be interesting for others as well

I have this:
HTML Code:
Range("Solve").GoalSeek Goal:=0, ChangingCell:=Range("PayRate")

I'm wondering how I can set a max limit of 1.00 for PayRate?

I found references online that gave me two options but I was unable to implement them:

1- Set a static variable for your max value and then do an if check,

2- Create a function called checkMaxVal(int) that returns a bool.

Any help is appreciated!

Thanks a lot shg. This worked perfectly!