View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Graeme at Raptup Graeme at Raptup is offline
external usenet poster
 
Posts: 16
Default Repeat keystrokes to delete character in column

Hi,
I have a column with mobile telephone numbers. e.g. 0846578902. (The cell is
format to text not number)
Now I need to add a 27 in front of each to become 27846578902

I'm sure this can be done with a macro but am not too familiar with vb.
I had seen this in an earlier thread;

Sub Remove4()
Dim myCell As Range
For Each myCell In Selection
myCell.Value = Left(myCell.Value, Len(myCell.Value) - 4)
Next myCell
End Sub

But that deletes the last 4 characters. 'm not sure how it is identifying
the last 4!