Hi,

Am Wed, 2 Apr 2014 12:22:11 +0100 schrieb sumesh56:

i want to add a phrase before a word in a cell. is it possible? kindly
see the attached file.thanks

try:

Sub Test()
Dim LRow As Long
Dim myStr As String
Dim rngC As Range

With ActiveSheet
LRow = .Cells(Rows.Count, 3).End(xlUp).Row
myStr = .Range("E8")
For Each rngC In .Range("C4:C" & LRow)
rngC = myStr & rngC
Next
End With
End Sub


Regards
Claus B.
--
Vista Ultimate SP2 / Windows7 SP1
Office 2007 Ultimate SP3 / 2010 Professional