I am creating a form and would like to use Excel. My hangup is that I need
to be able to enter text double spaced without having to go back after it's
entered and physically put in a return (such as in a text box). Is there a
way to format for double spacing? Can't find it!

Maybe this:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)

With TextBox1
.Text = Replace(.Text, vbNewLine, vbNewLine & vbNewLine)
End With

End Sub

NickHK

"mpierson" wrote in message
...
I am creating a form and would like to use Excel. My hangup is that I
need
to be able to enter text double spaced without having to go back after
it's
entered and physically put in a return (such as in a text box). Is there
a
way to format for double spacing? Can't find it!

Hi,

You need double space after "enter" key was pressed, maybe you need this one:

Private Sub TextBox1_KeyDown(ByVal KeyCode As _
MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then TextBox1 = TextBox1 & vbNewLine & vbNewLine
End Sub

--

Regards,

Halim


"mpierson" wrote:

I am creating a form and would like to use Excel. My hangup is that I need
to be able to enter text double spaced without having to go back after it's
entered and physically put in a return (such as in a text box). Is there a
way to format for double spacing? Can't find it!

mpierson,

Ooops... please note that you have to set TextBox1 property Multiline = True


--

Regards,

Halim


"Halim" wrote:

Hi,

You need double space after "enter" key was pressed, maybe you need this one:

Private Sub TextBox1_KeyDown(ByVal KeyCode As _
MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then TextBox1 = TextBox1 & vbNewLine & vbNewLine
End Sub

--

Regards,

Halim


"mpierson" wrote:

I am creating a form and would like to use Excel. My hangup is that I need
to be able to enter text double spaced without having to go back after it's
entered and physically put in a return (such as in a text box). Is there a
way to format for double spacing? Can't find it!