龙空技术网

Excel VBA实例教程(3)——批量转换电话号码为vcf文档

听听听着睡觉 182

前言:

眼前我们对“c语言通讯录系统流程图”大致比较注意,兄弟们都想要剖析一些“c语言通讯录系统流程图”的相关资讯。那么小编同时在网络上汇集了一些对于“c语言通讯录系统流程图””的相关资讯,希望咱们能喜欢,大家一起来学习一下吧!

我们在手机中备份联系人时,可以将电话号码打包成一个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,里面就是这些内容。

以上就是全部内容,有疑问欢迎到评论区讨论。需要源文件可以私信。

标签: #c语言通讯录系统流程图