afficher un useform si une cellule est vide

Dull

XLDnaute Barbatruc

• 7 Juillet 2014

• #2

Re : afficher un useform si une cellule est vide

Salut tibo.v1, le Forum

Peut être comme cela dans le Module ThisWorkbook

Code:

Private Sub Workbook_Open()
If Feuil1.[C1] = "" And Feuil1.[D1] = "" Then UserForm1.Show
End Sub

Bonne Journée

 

Dernière édition: 8 Juillet 2014

Vote positif 0 Vote négatif

T

tibo.v1

Guest

• 7 Juillet 2014

• #3

Re : afficher un useform si une cellule est vide

et dire que dans la case C1 il faut obligatoirement que se soit un chiffre on ecrit ca comment ?

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 8 Juillet 2014

• #4

Re : afficher un useform si une cellule est vide

Salut tibo.v1, le Forum

Alors comme cela si j'ai bien compris

Code:

Private Sub Workbook_Open()
If Not IsNumeric(Feuil1.[C1]) Or Feuil1.[C1] = "" And Feuil1.[D1] = "" Then UserForm1.Show
End Sub

Bonne Journée

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 8 Juillet 2014

• #5

Re : afficher un useform si une cellule est vide

Bonjour,
Salut Dull🙂

voir aussi ici :
afficher ou pas un UseForm selon une cellule : Excel - VBA
bonne journée
@+

 

Vote positif 0 Vote négatif