Discussion :

[Kyoichi95]

Bonjour !!
Petit nouveau sur ce forum, je sollicite votre aide.
J'aimerais savoir comment créer une macro conditionnelle dans le contexte suivant :
Sur un onglet nommé "Matrice", on aurait plusieurs cellules à remplir, dont certaines obligatoires pour compléter un autre onglet "Contrat".
Je souhaiterais savoir si il est possible de cacher l'onglet "contrat" si tous les champs obligatoires de l'onglet "Matrice" ne sont pas remplis ?
Si impossible (mais impossible n'est pas excel non ? ) est-il possible d'empêcher l'impression de l'onglet "Contrat" si tous les champs obligatoires de l'onglet "Matrice" ne sont pas remplis ?

Merci d'avance,

[FanTasTik]

Tu caches de base la feuille contrat et tu crée un bouton "Générer le contrat".
Quand tu appuies sur ce bouton : il vérifie les cellules et si c'est bon il affiche la page.

[Kyoichi95]

Merci de ta réponse, mais une question alors :
Je sais cacher et faire apparaitre la feuille avec une macro mais comment faire la macro ou commande conditionnelle? Celle qui vérifie que les dites cellules soient remplies ?

[Philippe Tulliez]

Bonjour,
Une solution parmi d'autres.
Tu nommes la plage des cellules à remplir, par exemple "Obligatoire" et tu testes avec ce code.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub Test()
 Dim rng As Range: Set rng = ThisWorkbook.Worksheets("Feuil1").Range("Obligatoire")
 Select Case True
  Case Is = rng.Count = Application.WorksheetFunction.CountA(rng)
   MsgBox "Tout est rempli"
  Case Else
   MsgBox "Il reste " & rng.Count - Application.WorksheetFunction.CountA(rng) & " cellule(s) à remplir"
 End Select
End Sub

[Kyoichi95]

Merci beaucoup !! En intégrant après le code pour masquer des onglets, ça marche !
Par contre, comment faire pour de la même façon masquer une forme ou un dessin qu'on ferait apparaitre ou disparaitre dans les mêmes conditions ?

[Philippe Tulliez]

Bonsoir,
Tu utilises la propriété Visible de l'objet Shape