VBA Copie sous conditions

[actaris51]

Bonjour,
Je possède un fichier avec deux colonne "Delay" et "Delay causes", comme dans le template ci dessous :
Cijoint.fr - Service gratuit de dépôt de fichiers
Je voudrais créer une macro qui remplit automatiquement les cellules vides de la colonne "delay causes" par "Unknown" UNIQUEMENT si le "delay" associé est >0

en gros ca serait :
Si "delay cause" = "vide" ET SI "Delay>0" alors "Delay cause"="Unknown"

Pouvez vous m'aider ?
Merci

 

[Cousinhub]

Re : VBA Copie sous conditions

Bonjour,

essaie avec ce code :

Sub Macro2()
Dim Cel As Range
For Each Cel In Columns("B:B").SpecialCells(xlCellTypeBlanks)
    If Cel.Offset(, -1).Value > 0 Then
        Cel.Value = "Unknown"
    End If
Next Cel
End Sub

 

[actaris51]

Re : VBA Copie sous conditions

Ca marche, c'est parfait !
Merci beaucoup