Replace pieces of text

[Swn-Y-Mor]

I have a spreadsheet where I have an Item Ref number and 3 associated
images.

eg.

Item Ref Image1 Image2 Image3
2800 2800-a.jpg 2800-b.jpg
2800-c.jpg

I now need to add 500 more images, and was wondering if someone knew of
a way for me to add the Ref No. and Image1 Image2 Image3 are filled in
by taking the Ref No and adding -a.jpg , -b.jpg , -c.jpg to it. Hope I
explained what I am trying to achieve.


Item Ref Image1 Image2 Image3
2800 2800-a.jpg 2800-b.jpg
2800-c.jpg
2801 2801-a.jpg 2801-b.jpg
2801-c.jpg
2802 2802-a.jpg 2802-b.jpg 2802-c.jpg

 

[Bob Phillips]

use

=A2&"-a.jpg"
=A2&"-b.jpg"
=A2&"-c.jpg"

and copy down

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

 

[Swn-Y-Mor]

Thank You ever so much Bob.
That works a treat and will save me alot of inputting.

 

[Tom Ogilvy]

Sub AddNames()
Dim rng as Range, cell as Range
set rng = Range(Range("A2"),Range("A2").end(xldown))
for each cell in rng
cell.offset(0,1).Value = cell.Value & "-a.jpg"
cell.offset(0,2).Vaue = cell.Value & "-b.jpg"
cell.offset(0,3).Value = cell.Value & "-c.jpg"
Next
End Sub