Fonction RECHERCHE en VBA

Bonsoir,

Je suis nouveau en VBA sur Excel, et j'ai commencé à suivre les cours proposés ici; sauf que je me trouve

face à un problème qui me dépasse. En fait, je ne sais pas si une macro est nécessaire ou pas.

Voilà, j'ai besoin de faire une recherche dans une plage avec des données numériques et que je veux placer

le résultat dans d'autres cellules.

Plus concrètement:

rechercher dans A2:A10 toutes les valeurs DIFFERENTES de 1 et les mettre dans B2:B5 (au cas où il y a

effectivement 4 valeurs DIFFERENTES de 1 dans la plage A2:A10.

Merci pour la solution!

Bonjour ramseshents et bienvenue,

voici un exemple,

Merci pour la réponse!!!

Juste une dernière chose avant de mettre mon "post" en résolu: tu peux mettre les

commentaires pour que je comprenne s'il te plaît?

PS:C'est exactement ce que je voulais, et assez facile en fait

Je me rends compte que la route va être encore longue

ramseshents a écrit :

PS:C'est exactement ce que je voulais, et assez facile en fait

est ce que les commentaires sur la macro sont toujours nécessaire ?

Oui s'il te plaît, ce que je voulais dire c'est que les lignes de code sont assez courtes en fait.

Et puis, pour aller plus loin dans le code, je voudrais faire la même opération mais de 2 classeurs différents;

c'est à dire la plage de données dans "classeur1" et le retour (résultat de la recherche) dans "classeur2".

Je m'en sors avec les feuilles d'un même classeur, mais j'arrive pas trouver les références pour deux classeurs

différents.

Merci.

re,

voilà,

Sub Macro1()
n = 1
For i = 2 To 10 'boucle de 1 à 10
    If Range("A" & i) <> 1 Then  'si la cellule A1 est différente de 1
        n = n + 1   'on incrémente n pour débuter le résultat à la ligne 2
        Range("B" & n) = Range("A" & i).Value   'écrit la résultat en colonne B
    End If  ' fin de la condition IF
Next i 'boucle au prochain i
End Sub

Ok, et encore merci!!