View Single Post
  #7   Report Post  
Gord Dibben
 
Posts: n/a
Default

Manual method by formula in an adjacent column.

="3-" & A1 entered in B1

Double-click on fill handle of B1 to auto-fill down.

When happy with results, copy column B and in place EditPaste
SpecialValuesOKEsc.

Delete column A.

Macro method in place on selected range............

Sub Add_Text_Left()
Dim Cell As Range
Dim moretext As String
Dim thisrng As Range
On Error GoTo endit
Set thisrng = Range(ActiveCell.Address & "," & Selection.Address) _
.SpecialCells(xlCellTypeConstants)
moretext = InputBox("Enter your Text")
For Each Cell In thisrng
Cell.Value = moretext & Cell.Value
Next
Exit Sub
endit:
MsgBox "only formulas in range"
End Sub


Gord Dibben Excel MVP



On Tue, 17 May 2005 10:17:23 -0700, "amspalinger"
wrote:

I'm trying to enter the same information into multiple cells that are already
filled - how can I do this in Excel??

Example -

12345
654321
78946
456798

I need to insert "3-" before each of the digits in these cells - There are
over 1000, that's why I don't want to do it manually. Any help would be
greatly appreciated!