Tập dữ liệu bên dưới chứa Tên, số điện thoại di động và địa chỉ Email của mọi người. Chúng tôi sẽ sử dụng dữ liệu này để tạo tệp vCard.
Phương pháp 1 – Sử dụng tính năng Danh bạ của Windows
Windows có tính năng riêng để tạo vCard các tập tin từ Excel. Nhưng trước tiên chúng ta cần sửa đổi phần mở rộng của tệp. Chúng ta hãy xem mô tả dưới đây. Hãy nhớ rằng bất kỳ tiêu đề không cần thiết nào cũng có thể gây ra sự cố cho bạn. Vì vậy, tôi sẽ xóa hàng thứ hai của trang tính.
Các bước:
- Đi tới Tệp tab.
- Lưu tệp bằng CSV (được phân cách bằng dấu phẩy) phần mở rộng.
- Nhấp vào biểu tượng Windows trên Menu Bắt đầu và tìm kiếm Danh bạ trong thanh tìm kiếm.
- Nhấp vào Danh bạ .
- Danh bạ thư mục sẽ mở.
- Chọn Tab nhập .
- Chọn CSV (Giá trị được phân tách bằng dấu phẩy) từ Nhập vào Danh bạ Windows .
- Nhấp vào Nhập .
- Lệnh này sẽ dẫn bạn đến các tùy chọn trình duyệt để nhập tệp bạn muốn.
- Chọn Duyệt qua .
- Duyệt tìm CSV tệp có thông tin liên hệ mà bạn đã tạo trước đó.
- Nhấp vào Mở .
- Nhấp vào Tiếp theo trong nút Nhập CSV cửa sổ.
- Bạn cần Bản đồ các tiêu đề cột. Kiểm tra Di động, và bạn sẽ thấy Tùy chọn ánh xạ .
- Chọn Điện thoại di động và nhấp vào OK .
- Ánh xạ Email tiêu đề tới Địa chỉ email và nhấp vào OK .
- Nhấp vào Hoàn tất .
Lệnh này sẽ chuyển đổi tệp CSV tới Danh bạ Windows định dạng.
- Hãy mở một tệp từ thư mục này. Tên, Địa chỉ Email, và Ô số điện thoại ở đúng vị trí.
- Chúng tôi sẽ chuyển đổi những tệp này thành vCard hoặc vLịch.
- Chọn Thẻ xuất .
- Chọn vCards (thư mục chứa tệp .vcf) .
- Nhấp vào Xuất .
- Duyệt đối với thư mục lưu các liên hệ này và nhấp vào OK .
Thao tác này sẽ chuyển đổi những Liên hệ này tập tin vào VCF tập tin.
- Mở bất kỳ thư mục nào trong số này. Chúng mở bằng Outlook theo mặc định. Bạn cũng có thể mở chúng trong Danh bạ định dạng.
- Bạn có thể xem bản tóm tắt thông tin liên hệ ở phía trên bên phải cửa sổ.
Bạn có thể tạo tệp VCF từ Excel bằng cách sử dụng Danh bạ Windows tính năng.
Phương pháp 2 – Sử dụng VBA để tạo tệp VCF từ Excel
Các bước:
- Chuyển tới Tab nhà phát triển và chọn Visual Basic .
- VBA trình soạn thảo sẽ xuất hiện. Chọn Chèn >> Mô-đun để mở Mô-đun VBA .
- Nhập mã sau vào Mô-đun VBA:
Sub CreateVCFFromExcel()
Dim mn_File_Num As Integer
Dim mn_start_row As Double
mn_start_row = 2
mn_File_Num = FreeFile
mn_Output_Path = ThisWorkbook.Path & "\PhoneAndEmail.VCF"
Open mn_Output_Path For Output As mn_File_Num
While VBA.Trim(Sheets("Sheet1").Cells(mn_start_row, 1)) <> ""
mn_Name = VBA.Trim(Sheets("Sheet1").Cells(mn_start_row, 1))
mn_Email_Address = VBA.Trim(Sheets("Sheet1").Cells(mn_start_row, 2))
mn_Mobile_Number = VBA.Trim(Sheets("Sheet1").Cells(mn_start_row, 3))
Print #mn_File_Num, "BEGIN:VCARD"
Print #mn_File_Num, "VERSION:3.0"
Print #mn_File_Num, "FN:" & mn_Name
Print #mn_File_Num, "EMAIL:" & mn_Email_Address
Print #mn_File_Num, "TEL;TYPE=CELL;TYPE=PREF:" & mn_Mobile_Number
Print #mn_File_Num, "END:VCARD"
mn_start_row = mn_start_row + 1
Wend
Close #mn_File_Num
MsgBox "The Contacts are Saved To: " & mn_Output_Path
End Sub
Mã sử dụng chức năng VBA Trim để tách Tên , Email và Di động cột. Sau đó áp dụng Tuyên bố in sắp xếp các dữ liệu này một cách hợp lý trong vCard tập tin. FN: đề cập đến Tên , EMAIL: đề cập đến vị trí mà Địa chỉ Email sẽ được lưu và TEL;TYPE=CELL nghĩa là số điện thoại ở đây là Điện thoại di động số.
- Quay lại trang tính của bạn và chạy Macro .
- Một VCF tệp sẽ được tạo có tên PhoneAndEmail trong đường dẫn tệp của sổ làm việc Excel của bạn.
- Mở nó bằng Windows Danh bạ .
- Thao tác này sẽ hiển thị cho bạn thông tin liên hệ của người đầu tiên trong tập dữ liệu của bạn.
- Tất cả thông tin liên hệ của tập dữ liệu được lưu trữ trong PhoneAndEmail. Nếu bạn ra lệnh Hủy , nó sẽ hiển thị cho bạn địa chỉ liên hệ tiếp theo.
- Nhấp vào Hủy sẽ dẫn bạn đến địa chỉ liên hệ tiếp theo, v.v.
Bạn có thể tạo tệp VCF sử dụng VBA .
Phần thực hành
Tôi sẽ cung cấp cho bạn tập dữ liệu cho bài viết này để bạn có thể thực hành các phương pháp này và tích lũy kiến thức chuyên môn.
Tải xuống Sách bài tập thực hành
Xuất Excel sang vCard:Trung tâm kiến thức
- Mở tệp VCF trong Excel
- Chỉnh sửa tệp VCF trong Excel
- Chuyển Excel sang VCF không cần phần mềm
- Chuyển đổi tệp CSV sang VCF bằng Excel
<