Removing Telephone Numbers From A Cell?

Jun 1, 2013

I have a limited amount of VBA knowledge. My limited knowledge is based on solving my problems by looking at the answers already on this site and trying to adapt it to my needs. Here goes:

I import a list of address and telephone numbers (100+) into excel. example - Cell A1 contains "10 downing street, whitehall, london, SW1A 2AA 01234 567890", sometimes there is another space after the number, sometimes there is no telephone number. I want to remove the telephone number at the end if it is there. Have searched the forums have have come up with the follow solution:

1. import list to column A
2. copy and paste Trim to column B
3. copy values in column B and paste to column A
4. delete column B
5. remove the end numbers
6. copy and paste Trim to column B
7. copy values in column B and paste to column A
8. delete column B
9. remove the end numbers

It looks like this in code:

Sub testa()

'select (=TRIM(A1)) formula and paste to sheet
Sheets("Formulas").Select
Columns("B:B").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet4").Select
Columns("B:B").Select
ActiveSheet.Paste

[Code]...

'copy values of column B to Column A and delete column B

Columns("B:B").Select
Selection.Copy
Columns("A:A").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Columns("B:B").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("A1").Select

[Code]...

'copy values of column B to Column A and delete column B

Columns("B:B").Select
Selection.Copy
Columns("A:A").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Columns("B:B").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("A1").Select
End Sub

I know this is a long winded way around (still chuffed I worked it out by myself though!). If I merge all the macros into one marco it continually loops and deletes everything in the cells and I have to press escape to stop it.

My questions are:

1. Why, when I merge all the macros doesnt it work the same as individual macros? (I would like to know for future reference).
2. Its there a better way to remove the telephone numbers?

View 3 Replies


ADVERTISEMENT

Formating Telephone Numbers

Feb 9, 2005

Is it possible to format cells so that inputed tel. numbers are all have the same format and not just appear the same, regardless of how they were typed in?
i need it so the column can be sorded by phone #.

View 9 Replies View Related

Insert Spaces In Telephone Numbers

Aug 24, 2007

I have a column that contains all telephone numbers without any spaces - 01234567890

I need to have at least one space inserted anywhere in the number i.e. 0 1234567890 or 01234 567890.

View 8 Replies View Related

Cleanup Telephone Numbers Have Some Text Data?

Aug 16, 2014

I have some cells which contain telephone number and some text data. They look like this.

(713) 555-4600 (Work)
(713) 555-4620 (Home)
(832) 555-4610 (John's Phone)

I need to strip out the text data and just display the phone number as follows

(713) 555-4600
(713) 555-4620
(832) 555-4610

View 4 Replies View Related

Inserting State Names Based On Telephone Numbers

Oct 22, 2007

I have a large data set (excel file), of "Names", "Phone Numbers", and i need to sort this based on the States that correspond with the Phone numbers. The states currently do not exist in the spreadsheet, so my current problem is trying to insert those states into the spreadsheet.

There are over 100 area codes in the data set, so i'll likely have to write a large "If" statement in VB to run through them all, but that shouldnt be a problem.

NAME, PHONE, STATE
Bleh, 555-555-5555, =ChkState(B2)

I've been playing around with the VB Stuff in Excel and this is what i've come up with for trying to insert the State field

Function ChkState(pVal As String) As Long

Dim AreaCode As String
Dim StateAbrv As String

AreaCode = Left(pVal, 3)

If AreaCode = "201" Then
StateAbrv = "Test201"
ElseIf AreaCode = "203" Then
StateAbrv = "Test203"
ElseIf AreaCode = "555" Then
StateAbrv = "Test555"
Else
StateAbrv = "0"
End If
MsgBox StateAbrv
End Function

I'm fairly new to this VB stuff, my main problem stems from trying to insert the "StateAbrv" back into the Cell for the spreadsheet.

View 9 Replies View Related

Removing Numbers At The End Of A Name In A Cell

Apr 21, 2014

I currently am pasting data that in some cases there are numbers at the end of a list of names e.g Andy Cole10 or James Banks3.

I have used a formula before that seperates the numbers into another cell but now i need only the text and not the number.using A & B column as example and i can adjust the range.

View 2 Replies View Related

Excel 2011 :: Removing Brackets And Spaces From Phone Numbers From Within Cell (formatting)

Feb 21, 2012

I have a spreadsheet with Mobile phone numbers in the following format:

+44(0)77 7296 5210

The spreadsheet has 2500 of these phone numbers.

Is there a way to remove the brackets and the +44 to leave:

07772965210

I am using Microsoft Office for Mac 2011

View 5 Replies View Related

Telephone Dialing Code

Jan 2, 2008

This has definitely been done before, but I am not sure if it has been done through Excel/VBA.

I have a 9 or 10 digit telephone number, preceded by a zero and what I want to do is get Excel to figure out the combinations of text characters that will allow me to have a text phone number.

For Example:
0-800-43573375 is the same as 0-800-HELPDESK

View 9 Replies View Related

Removing Numbers From Sentence?

Jan 11, 2014

I have tried to set one formula which will given the the Numbers of the Vehicle. However as there are other numbers also which makes it difficult to do so.

View 5 Replies View Related

Removing Text From Numbers

Dec 29, 2008

I have a column of data which has numbers and units (small example below).
I need to remove the text (units) and at the same time multiply the number by a value which is based on what the text is:

-999.9uA needs to become -999.9*10^-6

-98.40mA needs to become -98.40*10^-3

View 3 Replies View Related

Removing Numbers From Cells

May 22, 2014

I've put together a macro to format an extract from a fuel report but at the end of it I need to remove numbers in front of drivers names.

E.g.

1. John smith
10. Joe bloggs
123. Peter piper

Should end up as

John smith
Joe blogs
Peter piper

All without the number, full stop and the space before the name.

View 5 Replies View Related

Removing Numbers From A List?

Dec 27, 2013

I have been sent a list of 600 names in the format of 1. john smith 2. jane doe 3. tim smith ect.... how do I remove the numbers without going to each individual cell and manually deleting it?

View 1 Replies View Related

Removing Text And Numbers From 3 Cells?

May 25, 2013

I have a spreadsheet which reads:

A1 E012345678
A2 126789433
A3 ABCDEFGH
A4 CDEEGFFH
A5 E0456783
A6 98765432

etc.

I need only the the data in Cells A1 A5 etc. which means the 3 cells below (A2, A3, A4 ) should be deleted. A5 I need the data, and then A6, A7, A8 I do not need ... A9 need and so on.

the data should be in in one below the next with no spaces in between.

Data is only in column A.

View 6 Replies View Related

Removing Text And Leaving Just Numbers

Feb 16, 2009

i have a sheet dealing with part numbers and a paramiter exported from a programme.

L=1000MM | L/R is an example.

now
i use replace to get rid of everything before the number but anything after the mm is totaly different most of the time.

is there a way that i can get rind of anything after, and including, the mm?

or by some chance a command that will just leave me with the number allone?

View 10 Replies View Related

Removing Numbers From Cells With Text

Jun 4, 2009

I have a bunch of cells that have City and Zip Code combinations.

Ex: Chicago 606
Fayettville 72701
SACRAMENTO 95691

Some of them are 3 digit zips and others are 5 digits. I just want to weed out anything with a number leaving the city names.

View 9 Replies View Related

Removing Prefix From Part Numbers

Sep 21, 2009

I have a huge column of data. This data has few prefixes that I need to remove. I have a list of possible prefixes. Some prefixes are 1,2,3 or 4 characters long. Could you please suggest best way of removing these prefixes (VBA if possible)?

Following are some of the examples of prefixes:
AB
GD
KR
BCD
FP-
TJ-
W

View 9 Replies View Related

Keeping Area Code But Removing All Other Numbers

Jun 26, 2013

I'm trying to remove all the numbers of a phone number an keep the are code for 2000+ phone numbers.

ex. 111-222-9999

I want to remove the 2's and 9's but keep the 1's.

View 3 Replies View Related

Removing All But Highest Occurrence Of Version Numbers In Long List?

Feb 7, 2014

I have a list full of different IDs with different version numbers (This format: AKH123.1).

I'm trying to clean the list - removing all duplicate IDs but leaving only the largest version number.

I managed to remove the last digit using LEN/VLOOKUP and removing duplicates, but leaving only the largest version number is too tricky for me. I've thought about trying something with LARGE but can't wrap my mind around it.

My thought process went like this: I want to find all occurrences of "AKH123" and return the largest one.

The list contains about 8000 entries and this would save en enormous amount of work.

Here is a tiny portion of the list:

AKH450.1
AKH451.1
AKH451.3
AKH451.4
AKH451.5
AKH451.6
AKH451.7
AKH451.8
AKH452.1
AKH453.3
AKH454.1
AKH455.1
AKH455.2

View 3 Replies View Related

Removing Two Letters From A String Of Letters And Numbers

Jul 29, 2014

i have a list of 2000 fields which have the same format IE "AB10014"

I need to remove the "AB" from every field and leave the #.

Besides putting a space and running text to columns I'm not sure how.

View 13 Replies View Related

Removing Or Changing Data In A Cell By Inputting Date In Another Cell

Aug 4, 2014

cell a1 has yes cell b1 has yes and i want to type yes in c1 that will change a1 and b1 automatically to a blank cell

View 3 Replies View Related

Removing #DIV/0! Where Cell Value Is Zero

Oct 8, 2008

I have the following forumla....

=SUM(B11+E11)/F11

in those three cells there is a value of 0

the following message appears in the formula cell - #DIV/0!

is there a way to change my formula so it doesn't display this message and just return 0

View 3 Replies View Related

Removing # From A Cell

May 13, 2009

My data base downloads with signs $,#, etc

How can I remove these from a cell and leave the numbers

example
A1 102,462#
A2 83#
A3 4,265#

View 9 Replies View Related

Removing Spaces (?) From A Cell

Mar 16, 2009

I need to do a lookup on these cells but for some reason they all appear to have some kind of space characters in each cell which you can see if you double click on them. I have tried trims, text to columns, find replaces and none of these seem to work

I have a huge list of these numbers / codes and they all have the weird space kind of characters at the end

Can anyone give me a solution on how to remove them so my lookup will work?

View 12 Replies View Related

Removing All Formatting From A Cell?

Jan 11, 2014

I have spreadsheet that was sent to me but for some reason column A-D do not have the grey grid lines. They have the row lines but not the column lines. The data fits into column A but when I click on Center it all disappears and and I have to open the cell up nearly half the page to view the data again.

I have attached a screen shot of the problem. What I need to know is how to undo that so that it has normal formatting like a new spreadsheet. excell.jpg

View 6 Replies View Related

Removing Number From A Cell?

May 26, 2014

remove numbers from a cell.For example cell value is Drienne Kiop C0411377 or Tsler, Hopkin & Hart LLC B0002503

I am looking for a formula or function to get result ]Drienne Kiop or Tsler, Hopkin & Hart LLC

View 3 Replies View Related

Removing The / Between Characters In A Cell

May 14, 2009

See the attached file. I regularly receive input files which I have to reformat and upload to a website as a .csv. The website does not like the / between the characters on the Input Data tab. Is there a way to automatically search and remove them and leave the rest of the characters intact? The columns do not always appear in the same order and there could be more or less columns. On the Import Template tab, columns A-I will always be there, so ideally the code should make the changes from the Input Data tab and copy the present columns (J thru whatever) header and data over to the Import Template tab starting in 'J1'. I think that VBA would be the best way to go due to the variable nature of the columns.

View 4 Replies View Related

Removing Time In Cell

May 16, 2009

I have some code that display date and time in a cell when "done" is input into the adjaecent cell. (Any value would be the trigger, though)

View 2 Replies View Related

Removing Text From A Cell

Sep 13, 2008

I have 2 columns of data which contains mainly numbers that are either 9 or 10 digits long. However some have got so words at he end which is what I want to remove. I thought of using text to colums but there is no space or symbol between the number and text.

An example is

0111111100ddddfffffddd

or

0222222222ddddd ffffff ddddd

View 3 Replies View Related

Removing Characters From Cell

Oct 29, 2013

I have the following in cell A1:
0113 CDW 3 yr Coterm - Ironport devices

I need to remove 0113 from this cell to read only:
CDW 3 yr Coterm - Ironport devices

Any formula to do this?

View 5 Replies View Related

Removing Certain Words In A Cell

Jun 24, 2008

removing certain words/charactors in a cell.

For example, I have these information in 1 excel cell.

"Company allows staff to purchase small value items (items amounting to less than $3000) with approval from the staff's director."

So in this case, I need to remove the HTML/XML tags manually. Therefore, the final result should be,

"Company allows staff to purchase small value items (items amounting to less than $3000) with approval from the staff's director."

It is very tedious with the huge amount of data to process.

View 9 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved