A family of Microsoft spreadsheet software with tools for analyzing, charting, and communicating data.
Hi,
Maybe this
Private Sub UserForm_Initialize()
Dim MyString as string
Set rs = Worksheets("Sheet1")
For Each c In rs.Range("K25:Q25")
MyString = MyString & c.Value
Next
Label1.Caption = MyString
End Sub