Bloquer impression feuille tant qu'une cellule n'est pas renseignee possible ?

[tuff]

Bonjour ,

je voudrais pour ma feuille bloquer l’impression tant que toutes les cellules demandés ne sont pas renseignés

cela est il possible ?

Cordialement

 

[mutzik]

Re : Bloquer impression feuille tant qu'une cellule n'est pas renseignee possible ?

bonjour,

oui, mais ...

 

[tuff]

Re : Bloquer impression feuille tant qu'une cellule n'est pas renseignee possible ?

bonjour,

oui, mais ...

Mais quel est le problème ? en sachant que les cellules = chois liste déroulante !

Merci

 

[DoubleZero]

Re : Bloquer impression feuille tant qu'une cellule n'est pas renseignee possible ?

Bonjour, tuff, mutzik , le Forum,

Comme ceci ?

Option Explicit
Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Dim c As Range
    For Each c In Sheets("Feuil1").Cells.SpecialCells(xlCellTypeAllValidation)
        If c = "" Then
            MsgBox ("Veuillez renseigner la cellule  ") & c.Address(0, 0)
            Cancel = True
        End If
    Next c
End Sub

A bientôt