conditional not finding correct results
I'm making a withholdings calculator which basically has to find which
step the gross wages for the pay period are, for this i have sub FindStep() Dim R as Range Dim myTot as String Dim myAmt as String Dim myPerc as String Dim myBeg as String For Each R in Range("A2:A8") If myTot = R.Value Then If myTot < R.Offset(0,1).Value Then myAmt = R.Offset(0,2).Value myPerc = R.Offset(0,3).Value myBeg = R.Value End If End If Next R End Sub now myTot is being set my an earlier equation that calculates some entries in a form, when i step through the code, i get things like myTot = "793.08", R.Value = 385 and R.Offset(0,1).Value = 1240 which as far as i can tell should meet the criteria I've set (I want it to meet the criteria, but the other variables never get set, so it crashes when they are used in the final calculation. Any idea what i'm doing wrong? |
conditional not finding correct results
Craig,
If the sample values are exactly correct, it looks like you are comparing the string "793.08" against the number 385 . If that is not what you intend, either use a numeric data type for MyTot or use CSng(MyTot) instead. NickHK "Craig" wrote in message oups.com... I'm making a withholdings calculator which basically has to find which step the gross wages for the pay period are, for this i have sub FindStep() Dim R as Range Dim myTot as String Dim myAmt as String Dim myPerc as String Dim myBeg as String For Each R in Range("A2:A8") If myTot = R.Value Then If myTot < R.Offset(0,1).Value Then myAmt = R.Offset(0,2).Value myPerc = R.Offset(0,3).Value myBeg = R.Value End If End If Next R End Sub now myTot is being set my an earlier equation that calculates some entries in a form, when i step through the code, i get things like myTot = "793.08", R.Value = 385 and R.Offset(0,1).Value = 1240 which as far as i can tell should meet the criteria I've set (I want it to meet the criteria, but the other variables never get set, so it crashes when they are used in the final calculation. Any idea what i'm doing wrong? |
conditional not finding correct results
that worked perfectly, thanks
|
All times are GMT +1. The time now is 09:46 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com