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
garnote
Salut Thierry,
Une tite macro peut-être ? Je suppose ici que tes noms sont entrés sur une seule ligne et que la plage contenant ces noms se nomme "noms". Sélectionne alors ta plage de 0 et de 1 (elle doit contenir le même nombre de colonnes que "noms") et appelle cette macro :
Sub Remplace() Set ici = Selection Set la = Range("noms") For i = 1 To ici.Columns.Count For j = 1 To ici.Rows.Count If ici(j, i) = 1 Then ici(j, i) = la(1, i) Next j Next i End Sub
Ai-je bien compris ta demande ? Serge
"Thierry" <== a écrit dans le message de news:
Bonjour,
J'ai une liste de nom. 4 pour l'exemple A,B,C,D Puis une matrice du type 0011 0101 1001 0110 1010 1100
Existe t'il une focntion qui me permette de remplacer (ou remplir une autre feuille) les 1 par le nom de la personne ?
Merci
Salut Thierry,
Une tite macro peut-être ?
Je suppose ici que tes noms sont entrés sur
une seule ligne et que la plage contenant
ces noms se nomme "noms".
Sélectionne alors ta plage de 0 et de 1
(elle doit contenir le même nombre
de colonnes que "noms")
et appelle cette macro :
Sub Remplace()
Set ici = Selection
Set la = Range("noms")
For i = 1 To ici.Columns.Count
For j = 1 To ici.Rows.Count
If ici(j, i) = 1 Then ici(j, i) = la(1, i)
Next j
Next i
End Sub
Ai-je bien compris ta demande ?
Serge
"Thierry" <==sitetr@wanadoo.fr> a écrit dans le message de news:
uTa27LyMGHA.420@tk2msftngp13.phx.gbl...
Bonjour,
J'ai une liste de nom. 4 pour l'exemple
A,B,C,D
Puis une matrice du type
0011
0101
1001
0110
1010
1100
Existe t'il une focntion qui me permette de remplacer (ou remplir une
autre feuille) les 1 par le nom de la personne ?
Une tite macro peut-être ? Je suppose ici que tes noms sont entrés sur une seule ligne et que la plage contenant ces noms se nomme "noms". Sélectionne alors ta plage de 0 et de 1 (elle doit contenir le même nombre de colonnes que "noms") et appelle cette macro :
Sub Remplace() Set ici = Selection Set la = Range("noms") For i = 1 To ici.Columns.Count For j = 1 To ici.Rows.Count If ici(j, i) = 1 Then ici(j, i) = la(1, i) Next j Next i End Sub
Ai-je bien compris ta demande ? Serge
"Thierry" <== a écrit dans le message de news:
Bonjour,
J'ai une liste de nom. 4 pour l'exemple A,B,C,D Puis une matrice du type 0011 0101 1001 0110 1010 1100
Existe t'il une focntion qui me permette de remplacer (ou remplir une autre feuille) les 1 par le nom de la personne ?
Merci
Ange Ounis
RechercherRemplacer Non ?
---------- Ange Ounis ----------
Bonjour,
J'ai une liste de nom. 4 pour l'exemple A,B,C,D Puis une matrice du type 0011 0101 1001 0110 1010 1100
Existe t'il une focntion qui me permette de remplacer (ou remplir une autre feuille) les 1 par le nom de la personne ?
Merci
RechercherRemplacer
Non ?
----------
Ange Ounis
----------
Bonjour,
J'ai une liste de nom. 4 pour l'exemple
A,B,C,D
Puis une matrice du type
0011
0101
1001
0110
1010
1100
Existe t'il une focntion qui me permette de remplacer (ou remplir une autre
feuille) les 1 par le nom de la personne ?
