voici mon problème, en feuil1 j'ai en colonne A des index suivi en
colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En
feuil2 en colonne A des numéros de téléphones , en colonne B le pays et en
C l'année.
Le but est de fusionner les numéros communs pour voir dans la même feuille
le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier par
une couleur les autres numéros qui n'ont rien en commun.
J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas , merci
pour votre aide
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
laurent
oups , précision la fusion se ferait à partir des numéros de téléphone
merci
laurent
bonjour
voici mon problème, en feuil1 j'ai en colonne A des index suivi en colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En feuil2 en colonne A des numéros de téléphones , en colonne B le pays et en
C l'année. Le but est de fusionner les numéros communs pour voir dans la même feuille le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier par une couleur les autres numéros qui n'ont rien en commun. J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas , merci
pour votre aide
laurent
oups , précision la fusion se ferait à partir des numéros de téléphone
merci
laurent
bonjour
voici mon problème, en feuil1 j'ai en colonne A des index suivi en
colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En
feuil2 en colonne A des numéros de téléphones , en colonne B le pays et
en
C l'année.
Le but est de fusionner les numéros communs pour voir dans la même feuille
le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier par
une couleur les autres numéros qui n'ont rien en commun.
J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas ,
merci
oups , précision la fusion se ferait à partir des numéros de téléphone
merci
laurent
bonjour
voici mon problème, en feuil1 j'ai en colonne A des index suivi en colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En feuil2 en colonne A des numéros de téléphones , en colonne B le pays et en
C l'année. Le but est de fusionner les numéros communs pour voir dans la même feuille le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier par une couleur les autres numéros qui n'ont rien en commun. J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas , merci
pour votre aide
laurent
Frédéric Sigonneau
Bonjour,
Si tu n'as rien contre les macros, un bout de code à tester (après recopie dans un module standard du classeur concerné) :
Sub ConcatSi() Dim PlageTelFeuille1 As Range Dim PlageTelFeuille2 As Range Dim cell1 As Range, cell2 As Range Dim Idx&
With Sheets("Feuil1") Set PlageTelFeuille1 = .Range("B1:B" & .Range("B1").End(xlDown).Row) End With
With Sheets("Feuil2") Set PlageTelFeuille2 = .Range("A1:A" & .Range("A1").End(xlDown).Row) End With
For Each cell1 In PlageTelFeuille1 If Not IsError( _ Application.Match(cell1.Value, PlageTelFeuille2.Value, 0)) Then Idx = Application.Match(cell1.Value, PlageTelFeuille2.Value, 0) cell1.Offset(, 3).Value = _ PlageTelFeuille2.Range("A" & Idx).Offset(, 1).Value cell1.Offset(, 4).Value = _ PlageTelFeuille2.Range("A" & Idx).Offset(, 2).Value End If Next
End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
bonjour
voici mon problème, en feuil1 j'ai en colonne A des index suivi en colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En feuil2 en colonne A des numéros de téléphones , en colonne B le pays et en C l'année. Le but est de fusionner les numéros communs pour voir dans la même feuille le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier par une couleur les autres numéros qui n'ont rien en commun. J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas , merci pour votre aide
laurent
Bonjour,
Si tu n'as rien contre les macros, un bout de code à tester (après recopie dans
un module standard du classeur concerné) :
Sub ConcatSi()
Dim PlageTelFeuille1 As Range
Dim PlageTelFeuille2 As Range
Dim cell1 As Range, cell2 As Range
Dim Idx&
With Sheets("Feuil1")
Set PlageTelFeuille1 = .Range("B1:B" & .Range("B1").End(xlDown).Row)
End With
With Sheets("Feuil2")
Set PlageTelFeuille2 = .Range("A1:A" & .Range("A1").End(xlDown).Row)
End With
For Each cell1 In PlageTelFeuille1
If Not IsError( _
Application.Match(cell1.Value, PlageTelFeuille2.Value, 0)) Then
Idx = Application.Match(cell1.Value, PlageTelFeuille2.Value, 0)
cell1.Offset(, 3).Value = _
PlageTelFeuille2.Range("A" & Idx).Offset(, 1).Value
cell1.Offset(, 4).Value = _
PlageTelFeuille2.Range("A" & Idx).Offset(, 2).Value
End If
Next
End Sub
FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
bonjour
voici mon problème, en feuil1 j'ai en colonne A des index suivi en
colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En
feuil2 en colonne A des numéros de téléphones , en colonne B le pays et en
C l'année.
Le but est de fusionner les numéros communs pour voir dans la même feuille
le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier par
une couleur les autres numéros qui n'ont rien en commun.
J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas , merci
pour votre aide
Si tu n'as rien contre les macros, un bout de code à tester (après recopie dans un module standard du classeur concerné) :
Sub ConcatSi() Dim PlageTelFeuille1 As Range Dim PlageTelFeuille2 As Range Dim cell1 As Range, cell2 As Range Dim Idx&
With Sheets("Feuil1") Set PlageTelFeuille1 = .Range("B1:B" & .Range("B1").End(xlDown).Row) End With
With Sheets("Feuil2") Set PlageTelFeuille2 = .Range("A1:A" & .Range("A1").End(xlDown).Row) End With
For Each cell1 In PlageTelFeuille1 If Not IsError( _ Application.Match(cell1.Value, PlageTelFeuille2.Value, 0)) Then Idx = Application.Match(cell1.Value, PlageTelFeuille2.Value, 0) cell1.Offset(, 3).Value = _ PlageTelFeuille2.Range("A" & Idx).Offset(, 1).Value cell1.Offset(, 4).Value = _ PlageTelFeuille2.Range("A" & Idx).Offset(, 2).Value End If Next
End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
bonjour
voici mon problème, en feuil1 j'ai en colonne A des index suivi en colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En feuil2 en colonne A des numéros de téléphones , en colonne B le pays et en C l'année. Le but est de fusionner les numéros communs pour voir dans la même feuille le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier par une couleur les autres numéros qui n'ont rien en commun. J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas , merci pour votre aide
laurent
laurent
merci pour ton aide
laurent
"Frédéric Sigonneau" a écrit dans le message de news:
Bonjour,
Si tu n'as rien contre les macros, un bout de code à tester (après recopie dans
un module standard du classeur concerné) :
Sub ConcatSi() Dim PlageTelFeuille1 As Range Dim PlageTelFeuille2 As Range Dim cell1 As Range, cell2 As Range Dim Idx&
With Sheets("Feuil1") Set PlageTelFeuille1 = .Range("B1:B" & .Range("B1").End(xlDown).Row) End With
With Sheets("Feuil2") Set PlageTelFeuille2 = .Range("A1:A" & .Range("A1").End(xlDown).Row) End With
For Each cell1 In PlageTelFeuille1 If Not IsError( _ Application.Match(cell1.Value, PlageTelFeuille2.Value, 0)) Then Idx = Application.Match(cell1.Value, PlageTelFeuille2.Value, 0) cell1.Offset(, 3).Value = _ PlageTelFeuille2.Range("A" & Idx).Offset(, 1).Value cell1.Offset(, 4).Value = _ PlageTelFeuille2.Range("A" & Idx).Offset(, 2).Value End If Next
End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
bonjour
voici mon problème, en feuil1 j'ai en colonne A des index suivi en colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En feuil2 en colonne A des numéros de téléphones , en colonne B le pays et en
C l'année. Le but est de fusionner les numéros communs pour voir dans la même feuille
le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier par
une couleur les autres numéros qui n'ont rien en commun. J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas , merci
pour votre aide
laurent
merci pour ton aide
laurent
"Frédéric Sigonneau" <frederic.sigonneau@wanadoo.fr> a écrit dans le message
de news:401D0C50.161B0E4F@wanadoo.fr...
Bonjour,
Si tu n'as rien contre les macros, un bout de code à tester (après recopie
dans
un module standard du classeur concerné) :
Sub ConcatSi()
Dim PlageTelFeuille1 As Range
Dim PlageTelFeuille2 As Range
Dim cell1 As Range, cell2 As Range
Dim Idx&
With Sheets("Feuil1")
Set PlageTelFeuille1 = .Range("B1:B" & .Range("B1").End(xlDown).Row)
End With
With Sheets("Feuil2")
Set PlageTelFeuille2 = .Range("A1:A" & .Range("A1").End(xlDown).Row)
End With
For Each cell1 In PlageTelFeuille1
If Not IsError( _
Application.Match(cell1.Value, PlageTelFeuille2.Value, 0)) Then
Idx = Application.Match(cell1.Value, PlageTelFeuille2.Value, 0)
cell1.Offset(, 3).Value = _
PlageTelFeuille2.Range("A" & Idx).Offset(, 1).Value
cell1.Offset(, 4).Value = _
PlageTelFeuille2.Range("A" & Idx).Offset(, 2).Value
End If
Next
End Sub
FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
bonjour
voici mon problème, en feuil1 j'ai en colonne A des index suivi en
colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En
feuil2 en colonne A des numéros de téléphones , en colonne B le pays et
en
C l'année.
Le but est de fusionner les numéros communs pour voir dans la même
feuille
le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier
par
une couleur les autres numéros qui n'ont rien en commun.
J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas ,
merci
"Frédéric Sigonneau" a écrit dans le message de news:
Bonjour,
Si tu n'as rien contre les macros, un bout de code à tester (après recopie dans
un module standard du classeur concerné) :
Sub ConcatSi() Dim PlageTelFeuille1 As Range Dim PlageTelFeuille2 As Range Dim cell1 As Range, cell2 As Range Dim Idx&
With Sheets("Feuil1") Set PlageTelFeuille1 = .Range("B1:B" & .Range("B1").End(xlDown).Row) End With
With Sheets("Feuil2") Set PlageTelFeuille2 = .Range("A1:A" & .Range("A1").End(xlDown).Row) End With
For Each cell1 In PlageTelFeuille1 If Not IsError( _ Application.Match(cell1.Value, PlageTelFeuille2.Value, 0)) Then Idx = Application.Match(cell1.Value, PlageTelFeuille2.Value, 0) cell1.Offset(, 3).Value = _ PlageTelFeuille2.Range("A" & Idx).Offset(, 1).Value cell1.Offset(, 4).Value = _ PlageTelFeuille2.Range("A" & Idx).Offset(, 2).Value End If Next
End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
bonjour
voici mon problème, en feuil1 j'ai en colonne A des index suivi en colonne B de numéros de téléphone , en C leurs noms et D l' adresse .En feuil2 en colonne A des numéros de téléphones , en colonne B le pays et en
C l'année. Le but est de fusionner les numéros communs pour voir dans la même feuille
le pays et l'année (donc 6 colonnes ) et de conserver ou d'identifier par
une couleur les autres numéros qui n'ont rien en commun. J'ai essayé par l'extraction ,concaténation mais je n'y arrive pas , merci
