Max function Type Mismatch

[Av8tordude]

I have this code below that I can not figure out why its given me a this error. lbSL are userform labels that display percentages. Please help. Thx

Range("Z1") = WorksheetFunction.Max(100, CDbl(lbSL)) - CDbl(lbSL)

 

[Fluff]

What exactly does the label say?

 

[Av8tordude]

the label say (i.e. 89%)

 

[Fluff]

In that case try

Range("Z1") = WorksheetFunction.max(100, (Val(lbSL) / 100)) - (Val(lbSL) / 100)

 

[Av8tordude]

Sorry, but I'm still getting the error. I think it because of the calculation. It doesn't like to divide 3 divided by 2. However, it doesn't produce the error with its 2 divided by 3

 

[Fluff]

Check that the first character is a number & nothing else

 

[Av8tordude]

I just realize, I had to take out the "%" for the calculation then format it back to percentage. That seems do the trick.

Format(WorksheetFunction.Max(100, Replace(lbSL, "%", "")) - Replace(lbSL, "%", ""), "0.0%")

 

[Fluff]

Glad you got it sorted & thanks for the feedback