Label in a userform1

[Excelboo2]

I have the following script :

for i = 1 to 10

userform1.label1.caption=cells(i,1).value

next i

If I want to put the different cells(i,1).value into a now row on label1, how should I modify the script? Thanks a lot.

 

[Domenic]

Is this what you mean?

[font=Verdana][color=darkblue]Dim[/color] i [color=darkblue]As[/color] [color=darkblue]Long[/color]
[color=darkblue]Dim[/color] txt [color=darkblue]As[/color] [color=darkblue]String[/color]

[color=darkblue]For[/color] i = 1 [color=darkblue]To[/color] 10

txt = txt & Cells(i, 1).Value & vbNewLine

[color=darkblue]Next[/color] i

UserForm1.Label1.Caption = txt
[/font]