PDA

View Full Version : [SOLVED] names in text box



MUSASHI
10-23-2004, 07:52 AM
as part of my ongoing little "project", part of the data required on a userform is username. It is entered into a textbox.

Is there a way to force the entry to be as follows:whip :

nameTextBox= firstname;lastname

the semicolon makes it easy to manipulate later on as required as we have so many silly external "projects" requiring the name in various configurations..

If they fail to enter it correctly, it wont accept it is a must, maybe a msg box saying "You are a momo", Enter First Name, Semicolon(;),then Last Name

I can figure out some of this, but some I am clueless!:dunno

Thanks a lot!
Musashi!

Jacob Hilderbrand
10-23-2004, 09:25 AM
Try something like this:


Option Explicit

Private Sub TextBox1_AfterUpdate()
If InStr(1, Me.TextBox1.Text, ";") > 0 Then
'ok
Else
MsgBox "You forgot the ;"
End If
End Sub

MUSASHI
10-23-2004, 01:13 PM
thanks, as usual. I will post this thing sometime this weekend....if its appropriate?

first ever attempt at a "project"

appreciate the help.

Mus :006:

Jacob Hilderbrand
10-23-2004, 04:16 PM
Sure. Post it so we can all have a look. :)

Glad to help

Take Care

MUSASHI
10-23-2004, 10:08 PM
here ya go man. Im getting stuck fast...the more I figure out...the more I dont know how to do...heheh

time entry sheet...MD helped me not start the intersect until after 12 rows....how to make stop at 52, or 53?

going have a couple other major problems too..hehe the time entry sheet is for 1 day....going to have potentially 7 days...probably just make a time entry sheet for each day...

how to save the "timesheet", the values at that point in time?

how to summarize all 7 sheets?

One thing about it....this stuff is fun..:yes

any guidance appreciated

Jacob Hilderbrand
10-23-2004, 10:25 PM
how to make stop at 52, or 53?



If Target.Row() > 12 And Target.Row() < 53 Then


So this would run for rows 13-52.