Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Junior Member
 
Posts: 9
Default 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
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Formatting Text on Option buttons colin Excel Discussion (Misc queries) 2 July 14th 08 02:44 AM
Add a text to rows option Lisa Excel Worksheet Functions 3 August 24th 06 11:18 PM
In Excel, option to enter text in cells the same as text boxes RobGMU Excel Worksheet Functions 0 October 26th 05 04:20 PM
Option Commands (Option Explicit / Option Base etc) - Scope Alan Excel Programming 8 November 1st 04 02:22 AM
Option Compare Text Graham[_5_] Excel Programming 2 April 2nd 04 02:18 PM


All times are GMT +1. The time now is 07:36 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"