Чтобы перенести контакты с одной платформы на другую очень удобно использовать файлы стандарта vCard. Файлы vCard (с расширением .VCF) понимают большинство почтовых программ, телефоны Apple и Android. С помощью этого формата можно легко перенести контакты с ios на android, импортировать адресную книгу Outlook и многое другое.

К сожалению программы для работы с файлами vCard в основном платные и не отличаются богатым функционалом. А меж тем, файл VCF представляет собой обычный текстовой файл в кодировке UTF-8. Для разовой правки подойдёт любой текстовой редактор. Но когда контактов несколько сотен, или они уже имеются в Excel, то можно воспользоваться нижеприведённым макросом.

Это простая программа поможет создать vCard VCF файл из Excel файла.

Для начала нужно подготовить сам документ.

Разместите данные, как указано на этом образце. Важно – имя листа должно быть Sheet1, ибо оно используется в программе.

В случае использования MS Office 2012 нужно будет сохранить файл как XLSM (файл Excel c макросами).
После этого открываем файл и жмём ALT+F11

В открывшемся окне выберите ваш лист с данными и вставьте в окно для текста макроса такой текст

  'External Properties & Functions Declaration  Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal Operation As String, ByVal Filename As String, Optional ByVal Parameters As String, Optional ByVal Directory As String, Optional ByVal WindowStyle As Long = vbMinimizedFocus) As Long  Private Sub Create_VCF()      'Open a File in Specific Path in Output or Append mode      Dim FileNum As Integer      Dim iRow As Double      iRow = 2      FileNum = FreeFile      OutFilePath = ThisWorkbook.Path & "OutputVCF.VCF"      Open OutFilePath For Output As FileNum         'Loop through Excel Sheet each row and write it to VCF File      While VBA.Trim(Sheets("Sheet1").Cells(iRow, 1))  ""          FName = VBA.Trim(Sheets("Sheet1").Cells(iRow, 1))          LName = VBA.Trim(Sheets("Sheet1").Cells(iRow, 2))          PhNum = VBA.Trim(Sheets("Sheet1").Cells(iRow, 3))             Print #FileNum, "BEGIN:VCARD"          Print #FileNum, "VERSION:3.0"          Print #FileNum, "N:" & FName & ";" & LName & ";;;"          Print #FileNum, "FN:" & FName & " " & LName          Print #FileNum, "TEL;TYPE=CELL;TYPE=VOICE:" & PhNum          Print #FileNum, "END:VCARD"          iRow = iRow + 1      Wend         'Close The File      Close #FileNum      MsgBox "Contacts Converted to Saved To: " & OutFilePath & " - OK"        End Sub  

Жмём F5 или кнопку “выполнить” на панели задач. Результирующий файл VCF будет создан рядом с исходным файлом Excel.

Как можно увидеть в этой программе, файл VCF весьма прост по своему устройству. Вы можете самостоятельно добавить в него нужные поля. Например я добавил поле “компания” по образцу VCF файла из моего iPhone.

(DOC, DOCX, XLS, XLSX, PPT, PPTX, HTML, TXT, CSV, RTF, ODT, ODS, ODP, WPS etc.)

Чтобы выполнить конвертацию документа, выполните несколько шагов:

• С помощью кнопок «Локальный файл» или «Онлайн файл» укажите каким образом загрузить документ на сервер. Используете «локальный файл» если вам нужно сконвертировать файл с вашего компьютера, для того чтобы указать файл, находящийся в интернете выберите «Онлайн файл» и в появившемся поле вставьте ссылку на файл. Мы не устанавливаем никаких ограничений на размер документов, но чем больше файл, тем больше времени будет занимать конвертация. Просто наберитесь терпения и все получится. Вы можете конвертировать документы из более 30 форматов, таких как DOCX, HTML, ODB, PPT, PPTX, RTF и другие.
• Для начала конвертации нажмите кнопку «Конвертировать» чтобы начать преобразование. В случае успешной конвертации файл будет доступен в разделе «Результаты конвертации». Если вам нужно просто скачать файл, то кликните на имя файла. Если вы хотите получить другие способы сохранения, то нажмите на значок чтобы сформировать QR-код для загрузки результата на ваш мобильный телефон или планшет, а также если вы хотите сохранить файл в одном из онлайн-сервисов хранения данных, таких как Google Drive или Dropbox.

Пожалуйста, будьте терпеливы в процессе преобразования.

Сравнение форматов VCF и XLS

Format introduction	vCard is a file format standard for electronic business cards. vCards are often attached to e-mail messages, but can be exchanged in other ways, such as on the World Wide Web or instant messaging. They can contain name and address information, telephone numbers, e-mail addresses, URLs, logos, photographs, and audio clips.	Microsoft Excel up until 2007 version used a proprietary binary file format called Excel Binary File Format (.XLS) as its primary format. Excel 2007 uses Office Open XML as its primary file format, an XML-based format that followed after a previous XML-based format called «XML Spreadsheet».
Technical details	All vCards begin with BEGIN:VCARD and end with END:VCARD. All vCards must contain the VERSION property, which specifies the vCard version. VERSION must come immediately after BEGIN, except in the vCard 2.1 standard, which allows it to be anywhere in the vCard. Otherwise, properties can be defined in any order.	OpenOffice.org has created documentation of the Excel format. Since then Microsoft made the Excel binary format specification available to freely download.
File extension	.vcf, .vcard	.xls
MIME	text/vcard	application/vnd.ms-excel
Developed by	Internet Mail Consortium	Microsoft
Type of format	electronic business card	Spreadsheet
Associated programs	Microsoft Office Outlook	Microsoft Office, LibreOffice, Kingsoft Office, Google Docs.
Wiki