Macro qui imprime SI

Résolu
Bonjour,

Je cherche depuis quelques heures et je ne trouve pas ma réponse. Ce que je veux faire :

Je veux imprimer une page seulement si celle-ci contient du texte dans une cellule spécifique.

Mes boutons pour imprimer sont tous dans un onglet "Imprimer" et je veux que quand je clique sur un des boutons d'impression, cela imprime l'onglet "Coût-Parité (2)" SEULEMENT si la cellule I21 de l'onglet "Coût-Parité" possède du texte sinon je veux qu'il ne se passe rien !

J'avais ceci :

If ("Coût-Parité (2)I21") = ESTTEXTE Then Sheets("Coût-Parité (2)").PrintOut Else Exit Sub

Mais le *If ("Coût-Parité (2)I21") = ESTTEXTE Then* se met en jaune et ça ne fonctionne pas.

Merci beaucoup de votre aide !!!

Mylou

1 réponse

  1. Contributeur
    Bonjour,

    il faudrait plutôt faire (à mon avis) :

    If IsEmpty(Sheets("Coût Parité (2)").Cells(21,9)) Then
      Exit Sub
    Else
       Sheets("Coût-Parité (2)").PrintOut
    Enf If


    Cordialement.
    0
    1. Ça fonctionne !!! Merci beaucoup !!!!!!!!!!! :D
      0