Jump to next line in box...

I have a database of people, that when you search for one, it finds the
person and displays the info. I wish to be able to add a "return" (next line)
for each note in the note text box. How do I do this?


Ex.

CustInfo.Notes = Worksheets("CustomerDatabase").Cells(RefCountx, 30) &
NEXTLINE??? & Worksheets("CustomerDatabase").Cells(RefCountx, 31)

thanks Ahead of time,
Thomas

Hi Thomas

Try
VbNewLine

HTH. Best wishes Harald

"thomas" <thomas@discussions.microsoft.com> skrev i melding
news:14A1F04D-CC28-4380-9D6C-389453F048D3@microsoft.com...
> I have a database of people, that when you search for one, it finds the
> person and displays the info. I wish to be able to add a "return" (next
line)
> for each note in the note text box. How do I do this?
>
>
> Ex.
>
> CustInfo.Notes = Worksheets("CustomerDatabase").Cells(RefCountx, 30) &
> NEXTLINE??? & Worksheets("CustomerDatabase").Cells(RefCountx, 31)
>
> thanks Ahead of time,
> Thomas

chr(10)


CustInfo.Notes = Worksheets("CustomerDatabase").Cells(RefCountx, 30) & _
chr(10) & Worksheets("CustomerDatabase").Cells(RefCountx, 31)

--
Regards,
Tom Ogilvy


"thomas" <thomas@discussions.microsoft.com> wrote in message
news:14A1F04D-CC28-4380-9D6C-389453F048D3@microsoft.com...
> I have a database of people, that when you search for one, it finds the
> person and displays the info. I wish to be able to add a "return" (next
line)
> for each note in the note text box. How do I do this?
>
>
> Ex.
>
> CustInfo.Notes = Worksheets("CustomerDatabase").Cells(RefCountx, 30) &
> NEXTLINE??? & Worksheets("CustomerDatabase").Cells(RefCountx, 31)
>
> thanks Ahead of time,
> Thomas

Your cool! Still learning the in's and out's of VB

-thomas

"Harald Staff" wrote:

> Hi Thomas
>
> Try
> VbNewLine
>
> HTH. Best wishes Harald
>
> "thomas" <thomas@discussions.microsoft.com> skrev i melding
> news:14A1F04D-CC28-4380-9D6C-389453F048D3@microsoft.com...
> > I have a database of people, that when you search for one, it finds the
> > person and displays the info. I wish to be able to add a "return" (next
> line)
> > for each note in the note text box. How do I do this?
> >
> >
> > Ex.
> >
> > CustInfo.Notes = Worksheets("CustomerDatabase").Cells(RefCountx, 30) &
> > NEXTLINE??? & Worksheets("CustomerDatabase").Cells(RefCountx, 31)
> >
> > thanks Ahead of time,
> > Thomas
>
>
>