i have posted several times
wow?
anyway
85.00 returns 10 0 ->instead of 10.00
100.00 returns 25 00 ->instead of 25.00
no decimal and digits are out of place
and i also asked you to try a larger number that way you could see exactly what it is doing if you cant follow the posts.
i feel like you are getting paid for each post lol
here is my code as i stated eairler i changed it to match yours.
take a look and let me know if i am missing something
Set MyScreen = Sess0.Screen
Set MyArea = MyScreen.Area(6, 17, 6, 22,, 3)
mysum1 =...
i have posted several times
wow?
anyway
85.00 returns 10 0
100.00 returns 25 00
no decimal and digits are out of place
and i also asked you to try a larger number that way you could see exactly what it is doing if you cant follow the posts.
yes i already changed that????????????? lol
but i did just notice you was using
If IsNumeric(MyArea.value)
instead of
If IsNumeric(Mysum1) Then
and your not using mysum
[code]
Set MyScreen = Sess0.Screen
Set MyArea = MyScreen.Area(6, 17, 6, 22,, 3)
mysum1 = CDbl(MyArea)
If IsNumeric(Mysum1) Then
If MySum1 < CDbl(85.00) Then
Msgbox "amount must be at least $85.00"
Else
DiffMyArea =...
exacltly?
if you look at my post a few back i explain very clear with an example of what it is doing.
if i have 100.00 and then the code runs the answer is 25.00 (right)
well the result is 250.00
so it is taken the two digits(the answer and puting it where the code says to 6, 17 but not in the...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.