Excel VB form to break apart a phone number?
Hey,
I am trying to figure out how to do the following...
Spreadsheet value is 555-111-2222
I've got 3 text boxes and I need that number broken down into each
text box...
Textbox1.value = 555
Textbox2.value = 111
Textbox3.value = 2222
I got textbox1 to work correctly using this code...
ThisTextbox = TextBox1.Value
charnum = InStr(1, ThisTextbox, "-")
If charnum < 0 Then
TextBox1.Value = Left(ThisTextbox, charnum - 1)
End If
But I can't figure out how to get it work with the rest of the
numbers... any ideas? I'm thinking LEN & LEFT can do it but I can't
figure out the context. Any help is greatly appreciated!
|