Bonjour,
Je passe les éternelles félicitations (vous êtes les + grands etc).
Voilà le problème :
Dans une feuille Excel (voir classeur joint), on a de A2 à A21 une liste de chiffres à comparer avec une liste de chiffres de 1 à 80.
Il faut alors dans les chiffres de 1 à 80 effacer ceux qui ne correspondent pas avec ceux de A1 à A20 (donc 1,2,3,4,... mais pas 7 par ex).
Autre problème :
Comment générer une liste de chiffres à partir de la cellule active ?
Car, si on se place par ex en D24 et qu'on active la macro
Sub GENERER()
Dim X As Integer
For X = 1 To 80
ActiveCell.Offset(0, X).Value = X
Next
End Sub
La liste est générée à partie de D25 et non de D24 !
Je suis long et exigeant, mais vous seriez vraiment très gentils de m'aider
Je passe les éternelles félicitations (vous êtes les + grands etc).
Voilà le problème :
Dans une feuille Excel (voir classeur joint), on a de A2 à A21 une liste de chiffres à comparer avec une liste de chiffres de 1 à 80.
Il faut alors dans les chiffres de 1 à 80 effacer ceux qui ne correspondent pas avec ceux de A1 à A20 (donc 1,2,3,4,... mais pas 7 par ex).
Autre problème :
Comment générer une liste de chiffres à partir de la cellule active ?
Car, si on se place par ex en D24 et qu'on active la macro
Sub GENERER()
Dim X As Integer
For X = 1 To 80
ActiveCell.Offset(0, X).Value = X
Next
End Sub
La liste est générée à partie de D25 et non de D24 !
Je suis long et exigeant, mais vous seriez vraiment très gentils de m'aider