Modifier une cellule selon une autre inscrite dans un tablea
Bonjour à tous,
J'ai un tableau à 97 lignes ("4-100") et 11 colonnes ("B-L") et j'aimerais réalisé une macro qui me permet de rechercher dans la première colonne ("A") du tableau la valeur d'une cellule qui est égale à la valeur d'une cellule définie ("F5") dans une autre feuille du classeur ("Feuil1"). Puis par la suite, j'aimerais que la valeur de la onzième colonne ("L"), sur la même ligne que la valeur trouvée dans la première colonne, diminue de 1 (les valeurs de la 11ème colonne sont toujours des chiffres).
J'ai écrit ce code, il ne me met pas un message d'erreur mais il ne marche pas.
Sub moins()
For i = 4 To 100
If Sheets("Feuil2").Range("A" & i) = Sheets("Feuil1").Range("F5") Then
Sheets("Feuil2").Range("L" & i) = Sheets("Feuil2").Range("L" & i) - 1
Exit For
End If
Next
End SubY a-t-il donc une erreur ou une autre manière de procéder?
Merci d'avance,
Viox
Bonjour
A première vue cela doit fonctionner
Mais attention : le = est sensible à la casse ( A est différent de a )
Viox a écrit :mais il ne marche pas
Comment le sais tu ?
Fournis un fichier avec ton tableau et la macro
En fait, c'est tout bon. J'ai fait une belle erreur en indiquant la recherche dans la colonne "A" en pensant que c'était ma 1ère colonne alors qu'il s'agissait de la colonne "B".
Mille excuses et merci qu'en même d'avoir pris le temps de me lire,
Viox