excel批量導(dǎo)出聯(lián)系人

《excel批量導(dǎo)出聯(lián)系人》由會(huì)員上傳分享，免費(fèi)在線(xiàn)閱讀，更多相關(guān)內(nèi)容在應(yīng)用文檔-天天文庫(kù)。

1、給你一個(gè)excel文檔，存了聯(lián)系人姓名和手機(jī)號(hào)碼，但是一個(gè)個(gè)存入手機(jī)是一件很煩的事，現(xiàn)在告訴你一個(gè)方法，批量導(dǎo)入和生成。大家有什么方法也可以一起交流下！打開(kāi)你要轉(zhuǎn)化的excel文件另存為的時(shí)候注意選擇保存類(lèi)型打開(kāi)outlook點(diǎn)擊文件→導(dǎo)入導(dǎo)入時(shí)一定要選擇映射左邊的是值右邊的是存入什么字段批量導(dǎo)出點(diǎn)擊工具→宏→VB編輯器寫(xiě)入下列代碼點(diǎn)擊工具→宏→運(yùn)行導(dǎo)出成功直接復(fù)制到手機(jī)里導(dǎo)入就行了，是不是很簡(jiǎn)單，但是大家有沒(méi)有發(fā)現(xiàn)第一條記錄沒(méi)了，怎樣才能保留第一條記錄呢？其實(shí)很簡(jiǎn)單，在excel時(shí)多加上列名就ok了。附代碼：SubExportVcards()DimMyContactsAsOutlook.MA

2、PIFolderDimContItemAsOutlook.ContactItemDimFileNameAsStringSetMyContacts=Application.GetNamespace("MAPI").GetDefaultFolder(olFolderContacts)ForEachContItemInMyContacts.ItemsFileName="F:Phone"&ContItem.FileAs&".vcf"ContItem.SaveAsFileName,olVCardNextEndSub