Une boite de dialogue qui stoppe la procédure

Bonjour à tous,

j'aimerais insérer un code VBA avec une msgbox qui stoppe ou continue la procédure en fonction d'une donnée contenue ou pas dans une colonne.

si dans ma colonne "HT" je trouve des #N/A alors je voudrais qu'une boîte de dialogue apparaisse avec l’information suivante : "Des taux de TVA ne sont pas renseignés. Merci de corriger". Ainsi un bouton "OK" permettait de stopper la procédure.

Si dans ma colonne "HT" je ne trouve pas de #N/A alors je voudrais que cette boîte de dialogue n'apparaisse pas et la procédure suit son cours normalement.

Merci d'avance de votre aide

Bonjour,

    Dim pl As Range
    On Error Resume Next
    Set pl = Columns(2).SpecialCells(xlCellTypeFormulas, xlErrors)
    On Error GoTo 0
    If Not pl Is Nothing Then
        MsgBox pl.Cells.Count & " cellule(s) en erreur" & vbLf & "Abandon du traitement": Exit Sub
    End If
    ' suite du code

arrêt si une cellule en erreur, quelle que soit l'erreur.

eric

Merci Eric

Ton code est encore mieux car il s'applique à toutes les erreurs

super

Rechercher des sujets similaires à "boite dialogue qui stoppe procedure"