OVH Cloud OVH Cloud

REPONSE OBLIGATOIRE

1 réponse
Avatar
pPTIFRED
bonjour tout le monde

voila ma fourmule

Range("c2").Select
dat = InputBox("NOMS DE L ELEVE")
ActiveCell.Value = dat

et je voudrais que la saisie soit obligatoire est ce possible par avance merci

ptifred

1 réponse

Avatar
ChrisV
Bonjour pPTIFRED,

Sub zaza()
Dim reP
Do
reP = Application.InputBox("Nom de l'élève:", _
"MPFE...", , , , , , 2)
Loop Until reP <> False And reP <> ""
[C2] = reP
End Sub


ChrisV


"pPTIFRED" a écrit dans le message de
news:
bonjour tout le monde

voila ma fourmule

Range("c2").Select
dat = InputBox("NOMS DE L ELEVE")
ActiveCell.Value = dat

et je voudrais que la saisie soit obligatoire est ce possible par avance
merci

ptifred