cell values
Briliant......thank you!!!
-----Original Message-----
Hi Tim,
Sub Tester01()
Dim RCell As Range
Dim sStr As String
For Each RCell In Range("A1:O1")
sStr = sStr & RCell.Value
Next
MsgBox sStr
End Sub
---
Regards,
Norman
"Tim" wrote in
message
...
Hello,
I need to create a single string based on 15 individual
cells. Each cell has a unique value that will come
together to form an account number. Is there a simple
or
efficient way to do this. The range "A1:O1" should
look
like 123456789012345.
Thanks
.
|