Empecher la selection d'une autre cellule tant que E3 n 'est pas renseigner

jeromeN95

XLDnaute Occasionnel
Bonjour,
je souhaite forcer le remplissage d'une cellule.
J'ai bricoler ceci mais ca ne fonctionne pas trés bien:



'remplir cellule obligatoire
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$I$1" Then
If Sheets("Feuille1").Range("I1") = "" Then
Sheets("Feuille1").Range("I1").Select
End If
End If
If Target.Address <> "$B$5:$O$24" Then
If Sheets("Feuille1").Range("I1") = "" Then
Sheets("Feuille1").Range("I1").Select
End If
End If
End Sub
 

phlaurent55

XLDnaute Barbatruc
Re : Empecher la selection d'une autre cellule tant que E3 n 'est pas renseigner

Bonjour Jérôme,

avec ce code:
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If [E3] = "" Then [E3].Select
End Sub
à+
Philippe
 

gilbert_RGI

XLDnaute Barbatruc
Re : Empecher la selection d'une autre cellule tant que E3 n 'est pas renseigner

Bonjour,

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If [i6].Value = "" Then [i6].Select
End Sub
doit suffire :cool:

mettre l'adresse de la cellule à renseigner à la place de i6

Edit : hello PhLaurent55
 
Dernière édition:

jeromeN95

XLDnaute Occasionnel
Re : Empecher la selection d'une autre cellule tant que E3 n 'est pas renseigner

Bonjour,
la réponse de PhLaurent55 fonctionne bien.
merci a tous les 2.
 

Discussions similaires


Haut Bas