Quelqu'un peut-il m'aider avec cette formule (en rouge) ?? ( je veux exprimer que si dans les cellules (c17àc27) c'est égale à "COLAS NE" alors mettre en copie "bitume@colas.com." sinon CC= rien
Je n'y arrive pas..Please help
With oBjMail .Subject = Range("A11") & " " & "Confirmation de commande" & " " & Range("G11") & " " & Range("I6").Value & Range("j6").Value ' l'objet du mail
.Body = "Bonjour" & Chr(13) & Chr(13) & "Veuillez trouver ci-joint une confirmation de commande" & Chr(13) & Chr(13) & "Dans le cas où l'heure de livraison n'est pas encore acceptée merci de nous la confirmer par retour de mail dans les plus brefs délais" & Chr(13) & Chr(13) & "Cordialement" & Chr(13) & Chr(13) & Range("A2") & Chr(13) & Range("A3") & Chr(13) & Range("A4") & Chr(13) & Range("A5") & Chr(13) & Range("A6")
'le corps du mail ..son contenu
.BodyFormat = olFormatHTML
.To = (Range("A34").Value) & ";" & (Range("G32").Value) IfRange("C17:C27") <> ("Colas NE") Then .CC = ("bitume@colas.com")Else.CC = ""
End If