‘Ouvrir carnet adresses Outlook
\n‘selectionner qq adresses<\/p>\n
‘Exporte les contacts Outlook selectionn\u00e9s sous forme de Vcard individuelles<\/p>\n
\nConst mypath As String = \u00ab\u00a0C:\\Data\\Vcards\\\u00a0\u00bb
\nSub save_contacts()
\nDim mycontact As Outlook.ContactItem
\nFor Each mycontact In Outlook.ActiveExplorer.Selection
\nmycontact.SaveAs mypath & mycontact & \u00ab\u00a0.vcf\u00a0\u00bb, Type:=olVCard
\nNext mycontact
\nEnd Sub<\/p>\n
‘Fusionne toutes les Vcards pr\u00e9sentes dans le r\u00e9pertoire en un fichier texte importable sous RoundCube
\nSub save_contacts_all()
\nDim strOutputDirectory, strOutputFilePrefix, strOutputFileSuffix As String
\nstrTypeCommand = \u00ab\u00a0c:\\windows\\system32\\cmd.exe \/c\u00a0\u00bb
\nstrOutputDirectory = mypath<\/p>\n
strOutputFileSuffix = \u00ab\u00a0.vcf\u00a0\u00bb
\nstrOutputFileName = \u00ab\u00a0allContacts.txt\u00a0\u00bb<\/p>\n
Dim strCommand As String<\/p>\n
strCommand = strTypeCommand & \u00a0\u00bb \u00ab\u00a0\u00a0\u00bbcopy \u00a0\u00bb & strOutputDirectory & \u00ab\u00a0*\u00a0\u00bb & strOutputFileSuffix & \u00a0\u00bb \u00a0\u00bb & strOutputDirectory & strOutputFileName & \u00ab\u00a0\u00a0\u00bb\u00a0\u00bb\u00a0\u00bb
\n‘Debug.Print strCommand
\nCall Shell(strCommand, 3)<\/p>\n
End Sub<\/p>\n","protected":false},"excerpt":{"rendered":"
‘Ouvrir carnet adresses Outlook ‘selectionner qq adresses ‘Exporte les contacts Outlook selectionn\u00e9s sous forme de Vcard individuelles<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[17],"tags":[],"class_list":["post-848","post","type-post","status-publish","format-standard","hentry","category-informatique"],"_links":{"self":[{"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=\/wp\/v2\/posts\/848","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=848"}],"version-history":[{"count":2,"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=\/wp\/v2\/posts\/848\/revisions"}],"predecessor-version":[{"id":986,"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=\/wp\/v2\/posts\/848\/revisions\/986"}],"wp:attachment":[{"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=848"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=848"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.blue-bears.com\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=848"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}