hi friends
i want to concatenate the value in cell A1 AND A2 AND PUT IN A1.
SUPPOSE " string1" is a string variable
EG. SUPPOSE A1 contains "office" and A2 contains "KB" , THEN variable
string1=OfficeKB
and assign to A1.

THIS MUST BE DONE FOR A SET OV VALUES

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200912/1

What are the other set of values? A3-A4, A5-A7,... or B1-B2, C1-C2,... or
what? You'll need a VBA sub.
Stefi


€ževelin via OfficeKB.com€� ezt Ã*rta:

hi friends
i want to concatenate the value in cell A1 AND A2 AND PUT IN A1.
SUPPOSE " string1" is a string variable
EG. SUPPOSE A1 contains "office" and A2 contains "KB" , THEN variable
string1=OfficeKB
and assign to A1.

THIS MUST BE DONE FOR A SET OV VALUES

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200912/1

.

Range("A1") = Range("A1") & Range("A2")


--
joel
------------------------------------------------------------------------
joel's Profile: http://www.thecodecage.com/forumz/member.php?userid=229
View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=158376

Microsoft Office Help

THANKS, JOEL, THANKS VERY MUCH

--
Message posted via http://www.officekb.com

Sub ConcatenatingAdjacentCells()

Dim ToBeInserted As String, Length As Integer, Rows As Integer

For Rows = 1 To 1
Length = Len(Cells(Rows, 1))
ToBeInserted = Cells(Rows, 2)
Cells(Rows, 1).Characters(Length, 1).Insert (ToBeInserted)
Next

End Sub

"evelin via OfficeKB.com" wrote:

hi friends
i want to concatenate the value in cell A1 AND A2 AND PUT IN A1.
SUPPOSE " string1" is a string variable
EG. SUPPOSE A1 contains "office" and A2 contains "KB" , THEN variable
string1=OfficeKB
and assign to A1.

THIS MUST BE DONE FOR A SET OV VALUES

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200912/1

.