test colonne par rapoort à une autre Résolu

Question

Bonjour,
J'ai un petit soucis de programmation
J'ai dans un onglet dans la colonne A des numéros
Dans un autre onglet j'ai également des numéros dans la colonne A
J'aimerais trouver un petit programme sous excel pour dire

Prendre la première valeur de la colonne A (2eme onglet)
Faire une recherche dans la colonne A (onglet1), pour trouver le même chiffre que sélectionner si avant
Prendre toutes les lignes correspondantes et les coller dans un troisième onglet

Est ce possible, pouvez vous m'aider
Merci beaucoup

gbinforme · Answer

bonjour

Tu peux faire cela avec un filtre élaboré en partant de ta feuille 3 .

yoshino · Answer

j'ai réalisé ce petit programme

Sub Macro6()
Dim drligne
Dim prligne
Dim ligne
Dim nb
Dim n
Dim a
Dim b
Dim i
Dim j
a = 0
b = 0
i = 0
j = 0
nb = 0
n = 0
Sheets("Feuil2").Select
prligne = 2
drligne = prligne
Cells(drligne, 1).Select
Do While ActiveCell.Value <> ""
drligne = drligne + 1
Cells(drligne, 1).Select
nb = drligne - 1
Loop
Sheets("Feuil1").Select
ligne = prligne
Cells(ligne, 1).Select
Do While ActiveCell.Value <> ""
ligne = ligne + 1
Cells(ligne, 1).Select
n = ligne - 1
Loop
Sheets("Feuil2").Select
For i = prligne To nb
a = Cells(i, 1).Value
Sheets("feuil1").Select
For j = prligne To n
b = Cells(j, 1).Value
If a = b Then
Sheets("feuil1").Select
Rows("j:j").Select
Selection.Copy
Sheets("Feuil3").Select
Rows("j:j").Select
ActiveSheet.Paste
j = j + 1
Else
j = j + 1
End If
Next
Next i
End Sub

seulement quand je le lance il met une erreur sur la ligne: Rows("j:j").select
et je ne sais pas pourquoi.
Si quelqu'un peut m'aider merci beaucoup

gbinforme · Answer

bonjour

seulement quand je le lance il met une erreur sur la ligne: Rows("j:j").select

"j:j" pourrais presque être une colonne mais avec "J:J"

Si tu veux utiliser ta variable j tu mets : Rows(j).select

yoshino · Answer

merci c nikel

Test colonne par rapoort à une autre

4 réponses

Votre réponse

Newsletters