Je viens aupres de vous solliciter une aide .
sur 5 cellules qui se suivent je veux obliger l'utilisateur à remplir les cellules dans l'ordre s'il veut remplir la 2eme avant la premiere que celle ci refuse ainsi de suite.
Sur le module de la feuille
Je tiens compte des cellules B5 à B9
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range('B6:B9')) Is Nothing Then
If ActiveCell.Offset(-1, 0) = '' Then ActiveCell.Offset(-1, 0).Select
End If
End Sub
Sélectionner A2:A5
Menu Données / Validation
Sous Autoriser : Personnalisé
Décocher : 'ignorer si vide'
Sous formule : =NON(ESTVIDE(A1))
Onglet Alerte d'erreur
Vérifier si 'quand des données non valides sont tapées' est coché
Sous Titre et Message d'erreur taper un texte au choix.
OK
Même approche si ce n'est que je remplace la formule de la Validation par celle-ci :
=NBVAL($A$1:A1)=LIGNES($A$1:A1)
Ca permet de s'assurer qu'avant de taper la 3ème valeur que les 2 précédentes ont été tapées, qu'avant de taper la 4ème valeur que les 3 précédentes ont été tapées, etc.
Si amzo peut repasser nous dire quelle solution lui convient.
cete fois j'ai bien lu le tutoriel et j'ai suivi la procédure. [file name=Classeur1_20060321192633.zip size=4016]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20060321192633.zip[/file]
Bonjour amzo, Philippe, Mytå,
bonjour Ândré et Tibo,
bonjour à toutes et à tous
amzo, je te laisse regarder le fichier joint dans lequel j'explique un peu ce que fait le code - documenté, mais pas trop. N'hésite pas à demander si tu veux plus d'explications et que cette proposition te convient.
PS : Ândré, j'avais déjà proposé par validation (moins bien que la tienne mais bon, je fais ce que je peux :lol: ), mais cette solution semblait être insuffisante pour amzo. Mais j'ai noté : j'emmagasine !