Multiple Phone Numbers in Same Cell

Power Query Solution

let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Split Column by Delimiter" = Table.SplitColumn(Source, "Column1", Splitter.SplitTextByDelimiter(",", QuoteStyle.Csv), {"Column1.1", "Column1.2", "Column1.3"}),
    TAD=Table.AddColumn(#"Split Column by Delimiter", "Proper Format1", each Text.Format("(#{0}) #{1}-#{2}", Splitter.SplitTextByLengths({3,3,4}) ([Column1.1]) )),
    TAD2 = Table.AddColumn(TAD, "Proper Format2", each Text.Format("(#{0}) #{1}-#{2}", Splitter.SplitTextByLengths({3,3,4}) ([Column1.2]) )),
    TAD3 = Table.AddColumn(TAD2, "Proper Format3", each Text.Format("(#{0}) #{1}-#{2}", Splitter.SplitTextByLengths({3,3,4}) ([Column1.3]) )),
    #"Removed Columns" = Table.RemoveColumns(TAD3,{"Column1.1", "Column1.2", "Column1.3"})
in
    #"Removed Columns"

Power Query is a free AddIn for Excel 2010 and 2013, and is built-in functionality from Excel 2016 onwards (where it is referred to as "Get & Transform Data").

It is a powerful yet simple way of getting, changing and using data from a broad variety of sources, creating steps which may be easily repeated and refreshed. I strongly recommend learning how to use Power Query - it's among the most powerful functionalities of Excel.

- Follow this link to learn how to install Power Query in Excel 2010 / 2013.

- Follow this link for an introduction to Power Query functionality.

- Follow this link for a video which demonstrates how to use Power Query code provided.

Excel 2016 (Windows) 64 bit

	A	B	C	D	E
1	Column1		Proper Format1	Proper Format2	Proper Format3
2	881234567,8885678910,8883456789		(881) 234-567	(888) 567-8910	(888) 345-6789

Sheet: Sheet1

Another way. With the understanding that source string is in A1 this formula

Formula:

=TEXT(TEXTSPLIT(A1,","),"(###) ###-####")

Or just use TEXTSPLIT and format outputs as Special >> telephone number

Options:

Formula:

=TEXT(TEXTSPLIT($A$1,","),"(###) ###-####")

Formula:

=TEXTSPLIT($A$1,",")+0

with Custom Format "(###) ###-####" (no quotes)

Formula:

=TEXTJOIN(", ",,TEXT(TEXTSPLIT($A$1,","),"(###) ###-####"))