Interdire cellules vides

PascalXLD

XLDnaute Barbatruc

• 14 Mai 2007

• #2

Re : Interdire cellules vides

Bonjour

Sans passer par macro tu peux aller dans données > validation

sinon il faut faire

if [A1].value = "" Then rep=MsgBox( "Saisir le Numéro ", vbYesNo)
if rep=vbYes then
exit sub
else
msgbox "toto"
end if

 

Vote positif 0 Vote négatif

Excel_lent

XLDnaute Impliqué

• 14 Mai 2007

• #3

Re : Interdire cellules vides

Salut,
essaie cela (ni oui ni non):

Code:

Sub info()
  If [A1].Value = "" Then MsgBox "Saisir le Numéro "
  Range("A1").Select 'pour sélectionner la cellule en question
End Sub

@+

 

Vote positif 0 Vote négatif

F

friscogreencar

Guest

• 14 Mai 2007

• #4

Re : Interdire cellules vides

Merci Pascal et excel-lent

En utilisant Range ("A1"). select, la macro dans laquelle je mets ces 2 lignes continue, et ne me permets pas de remplir la cellule.

En utilisant la méthode Pascal, après if vbYes la macro s'arrête et je peux remplir la cellule. Par contre si je dis Non (donc après else) je ne veux pas un message, mais que la macro initiale continue.
Que dois-je lui indiquer ?

Merci encore de votre aide

 

Vote positif 0 Vote négatif

Excel_lent

XLDnaute Impliqué

• 14 Mai 2007

• #5

Re : Interdire cellules vides

Re,

Si la macro doit s'arrêter après la saisie, intercale Exit sub, sinon remplace mon code par celui-ci :

Code:

Sub info()
Do
  If [A1].Value = "" Then [A1] = InputBox("Saisir le Numéro ", "")
Loop While [A1] = ""
MsgBox "C'est fait"
End Sub

@+

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 14 Mai 2007

• #6

Re : Interdire cellules vides

Re

Tu as plusieurs possibilités

Soit tu inclues ton test dans ta macro initiale et là il n'y a pas de problèmes
Soit tu joues avec une variable que tu fais de cette macro vers l'initial
soit tu crées une fonction

 

Vote positif 0 Vote négatif

F

friscogreencar

Guest

• 15 Mai 2007

• #7

Re : Interdire cellules vides

Merci Messieurs

Grâce à vos conseils, tout est OK

Ayant plusieurs cellules, ma macro est un peu longue, mais elle fonctionne

Par contre je ne sais pas, sur ce forum, indiquer que mon pb est résolu.

Encore merci

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 15 Mai 2007

• #8

Re : Interdire cellules vides

RE

Ton petit merci final nous l'indique que ton prob est resolu .

Bonne journée

 

Vote positif 0 Vote négatif