我們在手機中備份聯系人時，可以将電話号碼打包成一個vcf文檔，也可以将vcf文檔導入到手機中，恢複聯系人。
那麼在excel中，如何将成百上千的電話号碼打包成vcf呢？如果你了解VBA，那麼就能實現。
先看看效果視頻：
可以生成多個vcf文件，在彈出框中設置每個vcf文件包含的電話号碼的個數就可以。
一、數據表：
下面是無數個電話号碼，我們要把這些号碼打包成vcf文件，然後導入手機中。
二、全部代碼：
三、代碼說明：
1、第一個要點就是 k = InputBox("輸入每組的聯系人個數") ，這句代碼的作用是通過文本框輸入每個vcf包含電話号碼的個數。當然如果你隻需要打包成一個vcf，那麼這句代碼就不需要。
2、第二個要點：For t = 0 To Int(j / k) 通過for循環，寫入多個vcf，int(j/k)意思是生成vcf文件的個數。這裡筆者完全是秀技能，如果你隻需生成一個文件，那麼就簡單多了。請接着往下看。
3、這句可能有人不理解：
OutFilePath = VBA.Environ$("UserProfile") & "\Desktop\第" & t 1 & "組聯系人.vcf"
意思是将生成的vcf文件設置文件名和存放路徑，這裡是動态文件名，并且放在桌面上。
4、開始寫入内容：
BEGIN,TEL是vcf文件裡面的元素，你用文本編輯器打開vcf,裡面就是這些内容。
以上就是全部内容，有疑問歡迎到評論區讨論。需要源文件可以私信。
,更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
