#Holding values in different format#

  • Thread starter Thread starter Dean Knox
  • Start date Start date
D

Dean Knox

Hi,

A 16 digit number is to be entered into a vbform textbox,
on leaving or pressing enter, I would like this number:

e.g abcdefghijklmnop

to be displyed in this format:

abcd efgh ijkl mnop

Can anyone help?

Thanks

Dean
 
did you try just formatting the cell?
like "### ### ###" for example

if its a text string that you need rather than leaving
the data as a number, then you could use someting like
txt = textbox1.text
MyText = left(txt,4) & " " & mid(txt,5,4) & " "
MyText =MyText & mid(txt,9,4) & " " & right(txt,4)


Patrick Molloy
Microsoft Excel MVP
 
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1 = Left(TextBox1, 4) & " " & Mid(TextBox1, 5, 4) & " " _
& Mid(TextBox1, 9, 4) & " " & Mid(TextBox1, 13, 4)
End Sub

Any characters over 16 will be dropped.
 
Back
Top