Custom formatting for Vehicle no. and Phone no.

Hello guys I want vehicle no. and phone no. in a particular format...
but I don't want to disturb the source data...
so I thought I should use custom formatting
but I am unable to come up with a solution especially for vehicle no.
as the no of characters varies from 9-10...
please look at the sample worksheet for a better layout...
I would really appreciate any help i can get...

For the Telephone set your custom formatting as follows:

+91 (###)###-####

I don't have a current solution for the Cars

Since you are using 2016, you have power query functionality available. Here is the Mcode for your issue.

let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Split Column by Position" = Table.SplitColumn(Source, "Column1", Splitter.SplitTextByPositions({0, 4}, false), {"Column1.1", "Column1.2"}),
    #"Split Column by Position1" = Table.SplitColumn(#"Split Column by Position", "Column1.2", Splitter.SplitTextByPositions({0, 4}, true), {"Column1.2.1", "Column1.2.2"}),
    #"Merged Columns" = Table.CombineColumns(#"Split Column by Position1",{"Column1.1", "Column1.2.1", "Column1.2.2"},Combiner.CombineTextByDelimiter("-", QuoteStyle.None),"Merged")
in
    #"Merged 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.

File attached for your review.

Excel does not apply custom formatting to text. You will have to use a formula for your vehicle numbers.

=LEFT(A5,4)&"-"&MID(A5,5,LEN(A5)-8)&"-"&RIGHT(A5,4)

For the phone numbers use

+91 (000)000-0000

Alan's PQ solution may do that, I am not up on PQ. However, there is no possible solution using just custom formats.

Macro to change in entry cell range A1:A100) - change as required

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:A100")) Is Nothing Then
    Application.EnableEvents = False   
    x = Target.Value
    Target.Value = Left(x, 4) & "-" & Mid(x, 5, Len(x) - 8) & "-" & Right(x, 4)
    End If
    Application.EnableEvents = True
End Sub

Right click on tab name, view code and copy / paste code