How to add extra letters .ss to each cell

[excelrater]

i would like to certain cells and add a .ss after every word in a cell how would i go about doing this?

For example cell A1 has sa i want it to have sa.ss
and cell A2 has dd i want it to have dd.ss
and cell B1 has ff i want it to have ff.ss
etc..

how would i do this?

 

[Michael M]

what do you mean by certain cells ??
but by formula you could use

=A1&".ss"

or it can be done by VBA, but we would need more inforamtion pertaining to "certain cells"

 

[Rick Rothstein]

i would like to certain cells and add a .ss after every word in a cell how would i go about doing this?

Will the cells have only one word each in them as your examples seem to indicate or could there be more than one word per cell as the above highlighted text seems to indicate?

Also, what are the "certain cells" you want this functionality applied to?

 

[JoeMo]

i would like to certain cells and add a .ss after every word in a cell how would i go about doing this?

For example cell A1 has sa i want it to have sa.ss
and cell A2 has dd i want it to have dd.ss
and cell B1 has ff i want it to have ff.ss
etc..

how would i do this?

Do your cells have only a single "word" as in your three examples or could some of them have multiple words? In the latter case, would you want .ss after each word in the cell?

 

[excelrater]

Do your cells have only a single "word" as in your three examples or could some of them have multiple words? In the latter case, would you want .ss after each word in the cell?

my cells only have one word in them

 

[JoeMo]

my cells only have one word in them

Then you can add the .ss like this:

Excel Workbook
	A	B
1	sa	sa.ss
2	dd	dd.ss
3	ff	ff.ss
Sheet1

After you have entered the formula in B1, copy it down to cover all your data cells. Then copy the formula range in col B and paste special values to the same col B range. You can then delete col A if you want to remove the original data.

 

[Rick Rothstein]

If this is a display issue only (that is, if no other cells will reference the values with the ".ss"), then you can Custom Format the cells using this pattern...

@".ss"

If the ".ss" has to physically be in the cells, and since you did not tell us the "certain cells" that need this functionality, I have assumed the cells are contiguous and that you will have selected them prior to running this macro...

Sub AddDotss()
  Selection = Evaluate("IF({1}," & Selection.Address & "&"".ss"")")
End Sub

 

[excelrater]

If this is a display issue only (that is, if no other cells will reference the values with the ".ss"), then you can Custom Format the cells using this pattern...

@".ss"

If the ".ss" has to physically be in the cells, and since you did not tell us the "certain cells" that need this functionality, I have assumed the cells are contiguous and that you will have selected them prior to running this macro...

Sub AddDotss()
  Selection = Evaluate("IF({1}," & Selection.Address & "&"".ss"")")
End Sub

Thank you it worked much much appreciated.