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
poc
Bonjour Sub tri() j = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 End If Next i End Sub
Cordialement Poc "maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI D AVANCE
Bonjour
Sub tri()
j = 1
For i = 1 To Range("A6000").End(xlUp).Row
If Range("A" & i).Offset(, 1) = "OUI" Then
Sheets("feuil3").Range("A" & j) = Range("A" & i)
Sheets("feuil3").Range("B" & j) = Range("B" & i)
j = j + 1
End If
Next i
End Sub
Cordialement
Poc
"maud s" <maud2604@neuf.fr> a écrit dans le message de news:
uglRoTlOIHA.6108@TK2MSFTNGP03.phx.gbl...
Bonjour j ai deux colonnes du type
DANS MA FEUIL1
2000 OUI
2001 NON
2002 NON
....... ........
3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT
LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN
SUPERIEUR)
ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
Bonjour Sub tri() j = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 End If Next i End Sub
Cordialement Poc "maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI D AVANCE
MichDenis
A ) Tu donnes des étiquettes à tes 2 colonnes B) Tu sélectionnes la feuille où tu veux obtenir le résultat C) tu définis ta zone de critère en utilisant 2 cellules En C1 : étiquette de ta colonne OUI/NON En C2 : Oui D ) Tu copies l'entête de la colonne des nombres vers ta plage de destination
E ) Et de cette même feuille, tu appeles le filtre élaboré et en utilisant le bouton de chaque boîte de saisie tu sélectionnes tes 2 colonnes de ta plage de données. Renseigne ta zone de critère Coche le bouton radio vers une autre destination Et la case vers, tu indiques la cellule où tu as inscris le nom de l'étiquette des nombres dans ta plage de résultat.
"maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI D AVANCE
A ) Tu donnes des étiquettes à tes 2 colonnes
B) Tu sélectionnes la feuille où tu veux obtenir le résultat
C) tu définis ta zone de critère en utilisant 2 cellules
En C1 : étiquette de ta colonne
OUI/NON
En C2 : Oui
D ) Tu copies l'entête de la colonne des nombres vers
ta plage de destination
E ) Et de cette même feuille, tu appeles le filtre élaboré
et en utilisant le bouton de chaque boîte de saisie
tu sélectionnes tes 2 colonnes de ta plage de données.
Renseigne ta zone de critère
Coche le bouton radio vers une autre destination
Et la case vers, tu indiques la cellule où tu as
inscris le nom de l'étiquette des nombres dans ta
plage de résultat.
"maud s" <maud2604@neuf.fr> a écrit dans le message de news:
uglRoTlOIHA.6108@TK2MSFTNGP03.phx.gbl...
Bonjour j ai deux colonnes du type
DANS MA FEUIL1
2000 OUI
2001 NON
2002 NON
....... ........
3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT
LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR)
ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
A ) Tu donnes des étiquettes à tes 2 colonnes B) Tu sélectionnes la feuille où tu veux obtenir le résultat C) tu définis ta zone de critère en utilisant 2 cellules En C1 : étiquette de ta colonne OUI/NON En C2 : Oui D ) Tu copies l'entête de la colonne des nombres vers ta plage de destination
E ) Et de cette même feuille, tu appeles le filtre élaboré et en utilisant le bouton de chaque boîte de saisie tu sélectionnes tes 2 colonnes de ta plage de données. Renseigne ta zone de critère Coche le bouton radio vers une autre destination Et la case vers, tu indiques la cellule où tu as inscris le nom de l'étiquette des nombres dans ta plage de résultat.
"maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI D AVANCE
maud s
MERCI BCP CA MARCHE EXTRA VRAIMENT UNE AGUILLE A TRICOTER ENLEVEE DU PIED
"poc" a écrit dans le message de news: 475bebbd$0$27414$
Bonjour Sub tri() j = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 End If Next i End Sub
Cordialement Poc "maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI D AVANCE
MERCI BCP CA MARCHE EXTRA
VRAIMENT UNE AGUILLE A TRICOTER ENLEVEE DU PIED
"poc" <poc@parame.fr> a écrit dans le message de news:
475bebbd$0$27414$ba4acef3@news.orange.fr...
Bonjour
Sub tri()
j = 1
For i = 1 To Range("A6000").End(xlUp).Row
If Range("A" & i).Offset(, 1) = "OUI" Then
Sheets("feuil3").Range("A" & j) = Range("A" & i)
Sheets("feuil3").Range("B" & j) = Range("B" & i)
j = j + 1
End If
Next i
End Sub
Cordialement
Poc
"maud s" <maud2604@neuf.fr> a écrit dans le message de news:
uglRoTlOIHA.6108@TK2MSFTNGP03.phx.gbl...
Bonjour j ai deux colonnes du type
DANS MA FEUIL1
2000 OUI
2001 NON
2002 NON
....... ........
3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS
DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN
SUPERIEUR)
ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI BCP CA MARCHE EXTRA VRAIMENT UNE AGUILLE A TRICOTER ENLEVEE DU PIED
"poc" a écrit dans le message de news: 475bebbd$0$27414$
Bonjour Sub tri() j = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 End If Next i End Sub
Cordialement Poc "maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI D AVANCE
maud s
merci de ta macro ca marche super mais si je veux en meme temps placer sur la feuil2 les colonnes avec les "NON" je dois faire comment?
"poc" a écrit dans le message de news: 475bebbd$0$27414$
Bonjour Sub tri() j = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 End If Next i End Sub
Cordialement Poc "maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI D AVANCE
merci de ta macro ca marche super mais si je veux en meme temps placer sur
la feuil2 les colonnes avec les "NON"
je dois faire comment?
"poc" <poc@parame.fr> a écrit dans le message de news:
475bebbd$0$27414$ba4acef3@news.orange.fr...
Bonjour
Sub tri()
j = 1
For i = 1 To Range("A6000").End(xlUp).Row
If Range("A" & i).Offset(, 1) = "OUI" Then
Sheets("feuil3").Range("A" & j) = Range("A" & i)
Sheets("feuil3").Range("B" & j) = Range("B" & i)
j = j + 1
End If
Next i
End Sub
Cordialement
Poc
"maud s" <maud2604@neuf.fr> a écrit dans le message de news:
uglRoTlOIHA.6108@TK2MSFTNGP03.phx.gbl...
Bonjour j ai deux colonnes du type
DANS MA FEUIL1
2000 OUI
2001 NON
2002 NON
....... ........
3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS
DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN
SUPERIEUR)
ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
merci de ta macro ca marche super mais si je veux en meme temps placer sur la feuil2 les colonnes avec les "NON" je dois faire comment?
"poc" a écrit dans le message de news: 475bebbd$0$27414$
Bonjour Sub tri() j = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 End If Next i End Sub
Cordialement Poc "maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI D AVANCE
poc
Et voilà Sub tri() j = 1 k = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 Else Sheets("feuil3").Range("C" & k) = Range("A" & i) Sheets("feuil3").Range("D" & k) = Range("B" & i) k = k + 1 End If Next i End Sub
@+ Poc
"maud s" a écrit dans le message de news:
merci de ta macro ca marche super mais si je veux en meme temps placer sur la feuil2 les colonnes avec les "NON" je dois faire comment?
"poc" a écrit dans le message de news: 475bebbd$0$27414$
Bonjour Sub tri() j = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 End If Next i End Sub
Cordialement Poc "maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
MERCI D AVANCE
Et voilà
Sub tri()
j = 1
k = 1
For i = 1 To Range("A6000").End(xlUp).Row
If Range("A" & i).Offset(, 1) = "OUI" Then
Sheets("feuil3").Range("A" & j) = Range("A" & i)
Sheets("feuil3").Range("B" & j) = Range("B" & i)
j = j + 1
Else
Sheets("feuil3").Range("C" & k) = Range("A" & i)
Sheets("feuil3").Range("D" & k) = Range("B" & i)
k = k + 1
End If
Next i
End Sub
@+
Poc
"maud s" <maud2604@neuf.fr> a écrit dans le message de news:
erswCSoOIHA.1208@TK2MSFTNGP03.phx.gbl...
merci de ta macro ca marche super mais si je veux en meme temps placer sur
la feuil2 les colonnes avec les "NON"
je dois faire comment?
"poc" <poc@parame.fr> a écrit dans le message de news:
475bebbd$0$27414$ba4acef3@news.orange.fr...
Bonjour
Sub tri()
j = 1
For i = 1 To Range("A6000").End(xlUp).Row
If Range("A" & i).Offset(, 1) = "OUI" Then
Sheets("feuil3").Range("A" & j) = Range("A" & i)
Sheets("feuil3").Range("B" & j) = Range("B" & i)
j = j + 1
End If
Next i
End Sub
Cordialement
Poc
"maud s" <maud2604@neuf.fr> a écrit dans le message de news:
uglRoTlOIHA.6108@TK2MSFTNGP03.phx.gbl...
Bonjour j ai deux colonnes du type
DANS MA FEUIL1
2000 OUI
2001 NON
2002 NON
....... ........
3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS
DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN
SUPERIEUR)
ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.
Et voilà Sub tri() j = 1 k = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 Else Sheets("feuil3").Range("C" & k) = Range("A" & i) Sheets("feuil3").Range("D" & k) = Range("B" & i) k = k + 1 End If Next i End Sub
@+ Poc
"maud s" a écrit dans le message de news:
merci de ta macro ca marche super mais si je veux en meme temps placer sur la feuil2 les colonnes avec les "NON" je dois faire comment?
"poc" a écrit dans le message de news: 475bebbd$0$27414$
Bonjour Sub tri() j = 1 For i = 1 To Range("A6000").End(xlUp).Row If Range("A" & i).Offset(, 1) = "OUI" Then Sheets("feuil3").Range("A" & j) = Range("A" & i) Sheets("feuil3").Range("B" & j) = Range("B" & i) j = j + 1 End If Next i End Sub
Cordialement Poc "maud s" a écrit dans le message de news:
Bonjour j ai deux colonnes du type DANS MA FEUIL1
2000 OUI 2001 NON 2002 NON ....... ........ 3000 OUI
BIEN EVIDEMMENT LES OUI ET NON PEUVENT CHANGER
JE VOUDRAIS QUE DANS UNE AUTRE FEUILLE N'APPARAISSENT QUE LES NUMEROS DONT LA DEUXIEME COLONNE EST OUI EN ORDRE CROISSANT .
LES NUMEROS DE 2000 à 3000 PAR EXEMPLE (LE 3000 POUVANT ETRE BIEN SUPERIEUR) ET DANS LA COLONNE B LES OUI ETANT SUR LA MEME LIGNE.