Bonjour le Forum,

je viens demander votre aide pour modifier un code de macro qui me permettra de saisir 2 n° de lignes dans une liste avec les conditions suivantes :
- la liste couvrant les lignes 3 à 242 de la colonne "A", si le n° entré est en dehors de la plage, un message d'erreur doit s'afficher.
- le 2 ème n° saisi doit être supérieur au 1 er avec message d'erreur si ce n'est pas le cas.

Lorsque ces 2 conditions sont réunies, une macro doit s'exécuter.

Mon code de départ est le suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub Valeurs_téléchargées_Début_Fin()
Dim d1, d2
        ActiveSheet.Unprotect
d1 = InputBox("Entrez le n° de la ligne de la 1 ère valeur :")
d2 = InputBox("Entrez le n° de la ligne de la 2 ème valeur :")
 
Range("AN1") = d1
Range("AN3") = d2
 
        ActiveSheet.Protect
End Sub
Je vous remercie par avance pour vos réponses et vous souhaite une bonne journée.
Cordialement.

Nonno 94.