Voila le PB deux tableau "data"et "data1". "data" étant le tableau de
référence
data
1
2
3
4
5
6
7
8
9
data1 dans le deuxième tableaux des valeurs
différentes
1
3
0
1
6
2
2
0
5
J'aimerai extraire les deux plus grandes valeurs du deuxième tableau dans
ce cas le 6 et le 5 dans deux cellules Ex : A1 et A2 (sachant que les
valeurs peuvent se trouver dans n'importe quelle cases et êtres
différentes.)
Ensuite en B1 et B2 afficher les valeurs du tableau de référence soit 5 et
9 .
J'ai trouvé pour extraire les grandes valeurs
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1].Value = "=LARGE( data1,1)"
[A2].Value = "=LARGE( data1,2)"
End Sub
Mais ensuite je nage j'espère que quelqu'un pourra me venir en 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
cousinhub
Bonsoir, essaie ce code :
Sub essai() prem = [address(MIN(IF(data1=large(data1,1),ROW(data1),"")),COLUMN(data1))] deux = [address(MIN(IF(data1=large(data1,2),ROW(data1),"")),COLUMN(data1))] [a1] = [LARGE(data1,1)] [a2] = [LARGE(data1,2)] [b1] = Range(" " & prem & " ").Offset(0, -1).Value [b2] = Range(" " & deux & " ").Offset(0, -1).Value End Sub
Bon courage
Bonjour à tous,
Une solution à vous demander
Voila le PB deux tableau "data"et "data1". "data" étant le tableau de référence
data
1 2 3
4 5 6
7 8 9
data1 dans le deuxième tableaux des valeurs différentes
1 3 0
1 6 2
2 0 5
J'aimerai extraire les deux plus grandes valeurs du deuxième tableau dans ce cas le 6 et le 5 dans deux cellules Ex : A1 et A2 (sachant que les valeurs peuvent se trouver dans n'importe quelle cases et êtres différentes.)
Ensuite en B1 et B2 afficher les valeurs du tableau de référence soit 5 et 9 .
J'ai trouvé pour extraire les grandes valeurs
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1].Value = "=LARGE( data1,1)"
[A2].Value = "=LARGE( data1,2)"
End Sub
Mais ensuite je nage j'espère que quelqu'un pourra me venir en aide
Merci d'avance a +
Bonsoir,
essaie ce code :
Sub essai()
prem = [address(MIN(IF(data1=large(data1,1),ROW(data1),"")),COLUMN(data1))]
deux = [address(MIN(IF(data1=large(data1,2),ROW(data1),"")),COLUMN(data1))]
[a1] = [LARGE(data1,1)]
[a2] = [LARGE(data1,2)]
[b1] = Range(" " & prem & " ").Offset(0, -1).Value
[b2] = Range(" " & deux & " ").Offset(0, -1).Value
End Sub
Bon courage
Bonjour à tous,
Une solution à vous demander
Voila le PB deux tableau "data"et "data1". "data" étant le tableau de
référence
data
1
2
3
4
5
6
7
8
9
data1 dans le deuxième tableaux des valeurs
différentes
1
3
0
1
6
2
2
0
5
J'aimerai extraire les deux plus grandes valeurs du deuxième tableau dans
ce cas le 6 et le 5 dans deux cellules Ex : A1 et A2 (sachant que les
valeurs peuvent se trouver dans n'importe quelle cases et êtres
différentes.)
Ensuite en B1 et B2 afficher les valeurs du tableau de référence soit 5 et
9 .
J'ai trouvé pour extraire les grandes valeurs
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1].Value = "=LARGE( data1,1)"
[A2].Value = "=LARGE( data1,2)"
End Sub
Mais ensuite je nage j'espère que quelqu'un pourra me venir en aide
Sub essai() prem = [address(MIN(IF(data1=large(data1,1),ROW(data1),"")),COLUMN(data1))] deux = [address(MIN(IF(data1=large(data1,2),ROW(data1),"")),COLUMN(data1))] [a1] = [LARGE(data1,1)] [a2] = [LARGE(data1,2)] [b1] = Range(" " & prem & " ").Offset(0, -1).Value [b2] = Range(" " & deux & " ").Offset(0, -1).Value End Sub
Bon courage
Bonjour à tous,
Une solution à vous demander
Voila le PB deux tableau "data"et "data1". "data" étant le tableau de référence
data
1 2 3
4 5 6
7 8 9
data1 dans le deuxième tableaux des valeurs différentes
1 3 0
1 6 2
2 0 5
J'aimerai extraire les deux plus grandes valeurs du deuxième tableau dans ce cas le 6 et le 5 dans deux cellules Ex : A1 et A2 (sachant que les valeurs peuvent se trouver dans n'importe quelle cases et êtres différentes.)
Ensuite en B1 et B2 afficher les valeurs du tableau de référence soit 5 et 9 .
J'ai trouvé pour extraire les grandes valeurs
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1].Value = "=LARGE( data1,1)"
[A2].Value = "=LARGE( data1,2)"
End Sub
Mais ensuite je nage j'espère que quelqu'un pourra me venir en aide
Merci d'avance a +
gilbert
Merci mais j'ai trouvé Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1] = [LARGE(data1,1)] [a2] = [LARGE(data1,2)] [B1] = [INDEX(data, MATCH(A1,data1,0))] [B2] = [INDEX(data, MATCH(A2,data1,0))] End Sub ---------------------------------------------- "cousinhub" a écrit dans le message de news: %
Voila le PB deux tableau "data"et "data1". "data" étant le tableau de référence
data
1 2 3
4 5 6
7 8 9
data1 dans le deuxième tableaux des valeurs différentes
1 3 0
1 6 2
2 0 5
J'aimerai extraire les deux plus grandes valeurs du deuxième tableau dans ce cas le 6 et le 5 dans deux cellules Ex : A1 et A2 (sachant que les valeurs peuvent se trouver dans n'importe quelle cases et êtres différentes.)
Ensuite en B1 et B2 afficher les valeurs du tableau de référence soit 5 et 9 .
J'ai trouvé pour extraire les grandes valeurs
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1].Value = "=LARGE( data1,1)"
[A2].Value = "=LARGE( data1,2)"
End Sub
Mais ensuite je nage j'espère que quelqu'un pourra me venir en aide
Merci d'avance a +
Merci mais j'ai trouvé
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1] = [LARGE(data1,1)]
[a2] = [LARGE(data1,2)]
[B1] = [INDEX(data, MATCH(A1,data1,0))]
[B2] = [INDEX(data, MATCH(A2,data1,0))]
End Sub
----------------------------------------------
"cousinhub" <pmcsnhb_nospam@aol.com> a écrit dans le message de news:
%23xgUJ4DWHHA.5068@TK2MSFTNGP03.phx.gbl...
Voila le PB deux tableau "data"et "data1". "data" étant le tableau de
référence
data
1
2
3
4
5
6
7
8
9
data1 dans le deuxième tableaux des valeurs
différentes
1
3
0
1
6
2
2
0
5
J'aimerai extraire les deux plus grandes valeurs du deuxième tableau dans
ce cas le 6 et le 5 dans deux cellules Ex : A1 et A2 (sachant que les
valeurs peuvent se trouver dans n'importe quelle cases et êtres
différentes.)
Ensuite en B1 et B2 afficher les valeurs du tableau de référence soit 5
et 9 .
J'ai trouvé pour extraire les grandes valeurs
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1].Value = "=LARGE( data1,1)"
[A2].Value = "=LARGE( data1,2)"
End Sub
Mais ensuite je nage j'espère que quelqu'un pourra me venir en aide
Merci mais j'ai trouvé Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1] = [LARGE(data1,1)] [a2] = [LARGE(data1,2)] [B1] = [INDEX(data, MATCH(A1,data1,0))] [B2] = [INDEX(data, MATCH(A2,data1,0))] End Sub ---------------------------------------------- "cousinhub" a écrit dans le message de news: %
Voila le PB deux tableau "data"et "data1". "data" étant le tableau de référence
data
1 2 3
4 5 6
7 8 9
data1 dans le deuxième tableaux des valeurs différentes
1 3 0
1 6 2
2 0 5
J'aimerai extraire les deux plus grandes valeurs du deuxième tableau dans ce cas le 6 et le 5 dans deux cellules Ex : A1 et A2 (sachant que les valeurs peuvent se trouver dans n'importe quelle cases et êtres différentes.)
Ensuite en B1 et B2 afficher les valeurs du tableau de référence soit 5 et 9 .
J'ai trouvé pour extraire les grandes valeurs
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[A1].Value = "=LARGE( data1,1)"
[A2].Value = "=LARGE( data1,2)"
End Sub
Mais ensuite je nage j'espère que quelqu'un pourra me venir en aide