Discussion :

[Le POlonais]

Bonjour,

Je voudrais savoir si avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Sub Worksheet_Change(ByVal Target As Range)

je peux en me positionnant sur la feuille A de la colonne A, je saisie une valeur, je recherche si cette valeur existe à l'intérieur de la feuille B colonne B, puis je saisie une autre valeur sur la feuille A de la colonne F.
Je récupére la valeur sur la feuille A de la colonne Z et je la compare à la valeur de la colonne de la feuille B colonne C.
Si elle est supérieur then Msgbox.

Est-ce que c'est possible ???????????????

Merci pour votre aide

Très cordialement

Norbert

[jfontaine]

Oui, c'est faisable

Inspire toi de ce bout de code

Saisie dune donnée dans la colonne A de la feuil1, recherche de cette saisie dans la colonne B de la feuille2. Affichage dans la colonne B de la feuille 1 de l'adresse de la cellule trouvée

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
On Error Resume Next
 
If Target.Column = 1 Then
 
    Sheets("Feuil2").Select
    Sheets("Feuil2").Columns("B:B").Select
    Selection.Find(What:=Target.Value, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        False, SearchFormat:=False).Activate
    Sheets("feuil1").Range("B" & Target.Row).Value = ActiveCell.Address
    Sheets("feuil1").Select
End If
 
End Sub

[Le POlonais]

Bonjour,

Je te remercie pour ton aide mais je me suis mal exprimé
j'ai une feuille A , je saisie dans la colonne A par exemple en A6 mais cela peux être de A6 à A1000
je compare dans la feuille B colonne B si oui mssageBox.
j'ai saisie NONO ok sur la feuille B il y a déjà NONO
C'est OK jusqu'à là.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Toujours sur la  même ligne mais en H6, je saisie des chiffres, Je trie, la totalité des sommes appartenant à NONO et je compare feuille B colonne C si > à la somme maximum autorisé appartenant à NONO alors mssageBox.

C'est cette partie que je n'arrive pas
par exemple
J'ai pensé à partir de la première partie, je saisie en H6, puis je trie et je recherche en partant de A65550.down et en remontant je retrouve NONO et je récupére la somme par offset en Hx et je la compare dans la feuille B en faisant pareil.

C'est réalisable ou il y a plus simple.

Merci d'avance.

A+

Norbert

[Qwazerty]

SAlut
Pourquoi ne pas utiliser un Filter Auto (AutoFilter + F1 ou AutoFilter dans une recherche sur le forum)

Aussi dans ta Feuille B tu fait un trie sur ta colonne B avec comme paramettre "Nono" (enfin le nom selectionner en feuille A quoi)
ensuite tu recuper les valeur qui reste afficher dans ton tableau avec un End(XlDown) par exemple

A++
Qwaz

[Le POlonais]

Bonjour,

J'ai pu grace à votre aide réussir.

Encore une fois merci

Très cordialement

Norbert