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!
|