PS : Le but est d'importer ceci dans le gestionnaire de contacts professionnels de outlook 2007. Car j'ai l'impression qu'il faut tout importer en une fois. Il n'est pas possible d'importer sélectivement des éléments pour des contacts.
cs_JMO
Messages postés1854Date d'inscriptionjeudi 23 mai 2002StatutMembreDernière intervention24 juin 201827 12 févr. 2008 à 20:35
Bonsoir à tous,
Ci-dessous un exemple, en vbs, sans utiliser l'objet Excel.Application, facilement adaptable pour vb6
utilisant l'objet Dictionary et ADODB.
Reste à écrire le fichier résultat.
Option Explicit
Dim oDico
Dim aDicoKeys, aDicoItems
Dim sFile1, sFile2, sFile3
Dim sCol1, sCol2, sCol3, i
Do Until oRs.EOF
If oDico.Exists(Trim(oRs.Fields(0))) Then
oldDicoList = oDico.Item(Trim(oRs.Fields(0)))
oDico.Item(Trim(oRs.Fields(0))) = oldDicoList & "," & oRs.Fields(1)
Else
oDico.Add Trim(oRs.Fields(0)), Trim(oRs.Fields(1))
End If
oRs.MoveNext
Loop
bert2311
Messages postés5Date d'inscriptionmardi 12 février 2008StatutMembreDernière intervention13 février 2008 12 févr. 2008 à 20:40
Merci JMO,
Cela a l'air très bien (!)
Concretement, j'imaginais un code que je pourrais utiliser avec une macro Excel.
Je peux mettre ce code dans une macro ??
Pardon pour mon ignorance, mais je suis vraiment embêté et je voudrais résoudre ce pb.
cordialement,
Vous n’avez pas trouvé la réponse que vous recherchez ?
bigfish_le vrai
Messages postés1835Date d'inscriptionvendredi 13 mai 2005StatutMembreDernière intervention20 novembre 201315 12 févr. 2008 à 23:31
Salut,
Tu risques pas d'avoir les reponses que tu attends car tu n'es pas dans le bon theme.
Et un conseil : n'imagine pas trop ton code, surtout si tu penses que quelqu'un vas le faire a ta place.
Le mieux c'est de commencer et de nous dire sur quoi tu bloques. Meme si c'est : - je ne sais ou ecrire ma macro
Ne t'offusques pas de ce que je viens de dire car c'est globalement ce qui est specifé dans le reglement CS et tu l'as accepter lors de l'enregistrement.
cs_MPi
Messages postés3877Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention17 août 201823 13 févr. 2008 à 11:46
Regarde ma signature ...
Tu le sauras pour la prochaine fois.
Mais ne repose pas ta question sur l'autre forum. Termine celui-ci auparavant. Ça évitera de créer un doublon de la même question.
MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI