Fusionné 2 macro

[farid]

Bonjour,

Fichier en PJ, j’ai deux icones avec les macros qui fonctionnent très bien.

1 rouge enregistrement et quitter

2 Mail :

• Si E4 = PCC alors je clic sur l’icône « Mail » qui envoie le mail et call sur la macro « enregistrementseul »

Ma demande est, est-ce possible qu’avec un seul bouton j’envoie le mail si E4= PCC en gardant les ligne de commande de la macro, sinon j’enregistre tout simplement et je quitte.

Jesper que je me suis fait comprendre.

Par avance, merci

 

[Phil69970]

Bonjour Farid, le forum

Sub Test()
If Sheets("Feuil1").Range("E4").Value = "PCC" Then
    envoiClasseur
Else
    enregistrementseul
End If
End Sub

@Phil69970

 

[farid]

Bonjour Farid, le forum

Sub Test()
If Sheets("Feuil1").Range("E4").Value = "PCC" Then
    envoiClasseur
Else
    enregistrementseul
End If
End Sub

@Phil69970

Bonjour Phil
merci infiniment, cela focntionne tres bien
Au plaisir