ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Help with a text box option (https://www.excelbanter.com/excel-programming/446919-help-text-box-option.html)

ksquirt

Help with a text box option
 
I'm missing a line or something... it ends with the dollars option. Please help!



'Text Box, enter which month you want
Aswr = Application.InputBox(prompt:="Choose one" _
& vbCrLf & "Hours" _
& vbCrLf & "Dollars", _
Title:="Do you want to enter FTE hours or dollars?", Default:="hours")

'Sets the correct value based on Aswr


If Aswr = "Hours" Then Range("D" & CStr(LSearchRow)).Value = "00060"
Range("E" & CStr(LSearchRow)).Value = "y"
Range("D" & CStr(LSearchRow)).Value = "00060_SALARYBEN"


If Aswr = "Dollars" Then Range("D" & CStr(LSearchRow)).Value = "00060"
Range("E" & CStr(LSearchRow)).Value = "n"
Range("D" & CStr(LSearchRow)).Value = "00060_SALARYBEN"

If Aswr = False Then
Exit Sub
End If
If RSort < "Hours" Then
If RSort < "Dollars" Then

End If
End If


All times are GMT +1. The time now is 05:17 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com