> Tous les forums > Forum Internet et Réseaux
 importer carnet d'adresses
Ajouter un message à la discussion
Pages : [1] 2 ... Fin
Page 1 sur 2 [Fin]
dauphin
  Posté le 01/07/2018 @ 19:51 
Aller en bas de la page 
Petit astucien



Bonjour à tous,

En cherchant sur Internet, j'ai trouvé deux macro pour importer un carnet d'adresses d'un coup dans Outlook. J'ai déjà créé le fichier vcf, mais je ne sais pas me servir des macros. Quelqu'un pourrait-il m'aider?

Merci d'avanxce

[Configuration automatique à compléter]
Système inconnu
Firefox 60.0



Modifié par dauphin le 18/07/2018 18:58
Publicité
fgondard
 Posté le 01/07/2018 à 20:14 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Bonjour,

Tu veux l''importer d'où ton carnet d'adresses ? Je ne suis pas bien sûr qu'il y ai besopin d'une macro pour ça. Les logiciels de messagerie incorporent généralement une fonction pour ça. C'est le cas d'Outlook. Voir ici.

dauphin
 Posté le 02/07/2018 à 10:23 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Merci fgondard,

Je veux importer le carnet d'adresses Thunderbird sous Ubuntu. L'ennui c'est que le système dont tu parles ne fonctionne pas chez moi . Pourquoi? Aucune idée. Par contre l'importation au format vcard va bien, mais seulement pour UN SEUL fichier; j'en ai plus de 500! Alors ...

Je vois que j'ai oublié de joindre les fichiers dont je parlais. Les voici. En fait la nouvelle version de Firefox ne montre plus le bouton"Joindre". Saurais-tu où il est caché ?

Merci d'avance

dauphin
 Posté le 02/07/2018 à 10:27 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Merci fgondard,

Je veux importer le carnet d'adresses Thunderbird sous Ubuntu. L'ennui c'est que le système dont tu parles ne fonctionne pas chez moi . Pourquoi? Aucune idée. Par contre l'importation au format vcard va bien, mais seulement pour UN SEUL fichier; j'en ai plus de 500! Alors ...

Je vois que j'ai oublié de joindre les fichiers dont je parlais. Les voici. En fait la nouvelle version de Firefox ne montre plus le bouton"Joindre". Saurais-tu où il est caché ?

Merci d'avance

fgondard
 Posté le 02/07/2018 à 10:39 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Si tu exportes ton carnet d'adresses au format CSV, normalement tu devrais pouvoir le reprendre dans Outlook.



Modifié par fgondard le 02/07/2018 20:00
dauphin
 Posté le 02/07/2018 à 10:46 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

fgondard a écrit :

Si tu exportes ton carnet d'adresses au format CSV, normalement tu devrais pouvoir le reprendre dans Outlook.

Hélas non ! ça ne marche pas message du genre : Ne parvient pas à convertir ou alors pas de message, mais il tourne dans le vide.

dauphin
 Posté le 02/07/2018 à 11:42 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

J'essaie de joindre une image des programmes mais ça ne marche pas

nainconnu.bis
 Posté le 02/07/2018 à 15:07 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

dauphin a écrit :

J'essaie de joindre une image des programmes mais ça ne marche pas

pour insérer ou joindre un image à tes messages il faut cliquer sur l'icon entourée de rouge voir image ci-dessous et suivre ce qui est indiqué !

.

.

.

.

.

.

dauphin
 Posté le 02/07/2018 à 17:12 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

voici les 2 macro que j'ai trouvées

première


Sub Save_vCard()
'---------------------------------------------------------------------------------------
' Procédure : Save_vCard
' Auteur : Dolphy35 - http://dolphy35.developpez.com/
' Date : 20/04/2008
' Détail : Permet d'importer en masse des vCard vers le dossier Contact
'---------------------------------------------------------------------------------------
'
'Déclarations des variables
Dim fsoObject As Scripting.FileSystemObject
Dim fldDossier As Scripting.Folder
Dim fleFichier As Scripting.File
Dim MavCard As ContactItem
Dim MonDossier As Folder
Dim MonApp As New Outlook.Application
Dim MonNamespace As Outlook.namespace
'charge le répertoire dans la variable
strRepertoire = "C:\temp"
'instancie les FSO
Set fsoObject = CreateObject("Scripting.FileSystemObject")
Set fldDossier = fsoObject.GetFolder(strRepertoire)
'Instancie l'espace "MAPI" - Session
Set MonNamespace = MonApp.GetNamespace("MAPI")
'Test si fichier *.vcf dans le dossier et ajout de celui-ci
If (fldDossier.Files.Count > 0) Then
For Each fleFichier In fldDossier.Files
If (InStr(1, fleFichier.Name, ".vcf", 1) > 0) Then
Set MavCard = MonNamespace.OpenSharedItem(strRepertoire & "\" & fleFichier.Name)
MavCard.Save
End If
Next
End If
'Récupère le dossier Contacts par défaut
Set MonDossier = MonNamespace.GetDefaultFolder(olFolderContact)
'Affichage d'outlook dans le dossier
MonDossier.Display
'Vide les instances
Set fsoObject = Nothing
Set fldDossier = Nothing
Set MonNamespace = Nothing
Set MavCard = Nothing
Set MonDossier = Nothing
End Sub

seconde


Sub ImportMultipleVcf()
Dim toggle As Boolean
Dim card As ContactItem
Dim app As New Outlook.Application
Dim namespace As Outlook.namespace
Dim temporary_filename As String


toggle = False
temporary_filename = "c:\temp\tmp.vcf"
Set namespace = app.GetNamespace("MAPI")

' Changer ici le nom du fichier vcf multiple issu de Palm Desktop
Open "c:\temp\all.vcf" For Input As #1
Do While Not EOF(1)
Line Input #1, inputdata
If inputdata = "BEGIN:VCARD" Then
toggle = True
Open temporary_filename For Output As #2
End If
If toggle Then Print #2, inputdata
If inputdata = "END:VCARD" Then
Close #2
toggle = False
Set card = namespace.OpenSharedItem(temporary_filename)
card.Save
End If
Loop
Close #1

End Sub



Modifié par dauphin le 02/07/2018 17:14
Publicité
fgondard
 Posté le 02/07/2018 à 20:03 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

ça ne marche pas message du genre : Ne parvient pas à convertir ou alors pas de message, mais il tourne dans le vide.

C'est l'export ou l'import qui ne marche pas ?

dauphin
 Posté le 02/07/2018 à 20:28 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

C'est l'import dans Outlook, j'ai vérifié les fichiers de contact exportés, ils sont bons.

fgondard
 Posté le 02/07/2018 à 20:48 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

j'ai vérifié les fichiers de contact exportés, ils sont bons

Tu peux l'ouvrir dans Excel pour vérifier de près.

dauphin
 Posté le 02/07/2018 à 22:58 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

J'ai vérifié 2 fois.

fgondard
 Posté le 03/07/2018 à 13:41 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Même si tu ne vois pas d'anomalie il n'est pas sûr que le nombre de champs et leur disposition convienne à Outlook.

Crée un ou deux contacts bidon dans Oultook, exporte en format CSV et compare avec ton fichier. Sous Excel réarrange ce fichier pour qu'il ait la même touche que celui crée sous Outlook, éventuellement en intercalant des champs vides.

dauphin
 Posté le 03/07/2018 à 15:16 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Merci fgondard,

J'essaie.

P.S. Il n'y a pas moyen d'utiliser une des deux macros que j'ai jointes à mon post d'hier à 17h 12 ?

dauphin
 Posté le 03/07/2018 à 15:28 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Voila le résulat

Nom,"Prénom","Adresse (domicile)","Téléphone (bureau)","Téléphone (domicile)" machin, %Toto %,"Toto","99 avenu du Châeau Lyon, %69 %69999 France","(00) 99 88 77 66","(00) 98 87 76 65" Tapedur, %loulou %,"loulou","21 coours Emile Zola Oulins, %69 %69888 France","(00) 99 77 66 55","(00) 99 66 44 33"

Il n'y a pas de colonnes !



Modifié par dauphin le 03/07/2018 15:31
fgondard
 Posté le 03/07/2018 à 16:50 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Il n'y a pas de colonnes !

Désolé, j'avais oulié la procédure détaillée. Dans Excel il ne faut pas ouvrir le fichier mais passer par "Données externes".



Modifié par fgondard le 03/07/2018 17:02
Publicité
dauphin
 Posté le 03/07/2018 à 17:36 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Je viens d'essayer, mais ans "Données externes" "Fichiers texte" est grisé; les autres aussi d'ailleurs

fgondard
 Posté le 03/07/2018 à 19:09 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Quelle version d'Excel ? Peut-être feuiile protégée. Voir dans les Outils.

dauphin
 Posté le 04/07/2018 à 17:39 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour,

De gros progrès, mais encore des problèmes. Voici un contact :

Nom complet Poste Société Classer sous Pays/Département Service Téléphone (bureau) Télécopie (bureau) Téléphone (domicile) Téléphone mobile Adresse de courrier Catégories
%Villeurbanne % Carrefour Carrefour, %Villeurbanne % (04) 72 65 87 70

Pourquoi y a-t'il % à 2 endroits ? Je supprimerai les catégories no utilisées quand tout sera au point

fgondard
 Posté le 04/07/2018 à 17:47 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Tu as réussi ou non à mettre en colonnes dans une feuille Excel ? D'après ce que j'ai pu lire il peut s'agir d'une histoire de composants optionnels non installés (macros complémentaires ...).

Dans programmes et fonctionalités, en cliquant sur Office tu as la possibilté d'ajouter des composants.

dauphin
 Posté le 04/07/2018 à 17:59 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Oui j'ai réussi, c'est pour cela que j'ai pu importer, mais le résultat est un petit peu bizarre: petite case avant le nom et % par endroit !

fgondard
 Posté le 04/07/2018 à 19:02 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Ubuntu et Windows n'utilisent peut-être pas le même codage des caractères.

dauphin
 Posté le 04/07/2018 à 19:33 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Pourtant j'ai fait bien attention à utiliser le codage UTF 8, comme le conseille Outlook. Curieux.

Dèd07
 Posté le 05/07/2018 à 13:25 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien
dauphin
 Posté le 05/07/2018 à 19:02 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Merci Dedo7,

Mais c'est le contraire que je veux faire : exporter des contacts à partir de Thunderbird et les récupérer dans Outlook

Publicité
Pages : [1] 2 ... Fin
Page 1 sur 2 [Fin]

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Sujets relatifs
Aucun sujet pertinent lié trouvé
 > Tous les forums > Forum Internet et Réseaux