function in userform returning 9.9999999999

[ScottE2HotE]

Hello,

Okay, I removed the protection from the vba code in the excel file except the worksheets that have the passwords right in the vba code. Let me know if you have any problems.

I need someone to take a look at my messy code and tell me what I am doing wrong. The main userform is the hydraulics User Form. It was supposed to just put data into a spreadsheet but then the project kept growing and including a lot of difficult equations. Now the whole thing is just a mess and my boss is going to fire me if I don't get this thing figured out soon.

Hopefully it isn't too bad and you will be able to see what I am trying to do.

Here is some of the problem code.

Please Login or Register  to view this content.

and here is the function that is also on the userform backside. I couldn't get it to work in the general module place.

Please Login or Register  to view this content.

If I input 15.1 and 15.0, this returns 9.999999999 or -9.99999999

-Scott-

[protonLeah]

title updated

[ScottE2HotE]

Thank you Ben Van Johnson. I zipped the file and it worked great! I also changed my title. Let me know if this is acceptable.

Best regards,

-Scott-

[scottiex]

Since you are comparing "doubles" you should probably round the numbers to avoid the issue.
You could round to something like 12 decimal places here it seems.

[bulina2k]

Try this way:

Please Login or Register  to view this content.