View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Mike H Mike H is offline
external usenet poster
 
Posts: 11,501
Default How do I add additional text in many cells

Hi,

One way. Right cleck the sheet tab, view code and paste this in. Select the
range where your data are and then run this code:-

Sub addtext()
newtext = "_9.11"
Set myrange = Selection
For Each c In myrange
If c.Value = "H1/1" Or c.Value = "H7/2" Or c.Value = "H8/3" _
Then c.Value = c.Value & newtext
Next
End Sub

Mike

"The Austrian" wrote:

Hello,

I'd like to know how I can insert the same additional text to cells when
there is already text in these cells without having to type it in every cell
separately:
H1/1
H7/2
H8/3
should read
H1/1_9.11
H7/2_9.11
H8/3_9.11

Thanks

Markus