demande d'aide

[picronte53]

bonjour le fil
j'ai un fichier avec plus dates et je souhaiterai qu'a la date anniverssaire le fichier donne une alerte en ouvrant mon ordi le matin. ily a t'il une solution
Merci
picronte

 

[picronte53]

Re : demande d'aide

bonjour JCGL
j'ai mis tes formules dans mon fichier mais ca ne fonctionne pas
ci joint mon fichier
Cdlt
picronte

 

[JCGL]

Re : demande d'aide

Bonjour à tous,

Mise en application des MeFC dans ton fichier.
Tu n'avais pas respecté les opérateurs (< au lieu de <=)
Et tu avais une espace dans le format personnalisé

A+ à tous

 

[picronte53]

Re : demande d'aide

merci beaucoup JCGL
Maintenant je recherche un envoie automatique de mail quand I arrive a 4 mois avant la date anniverssaire
Cdlt
Picronte

 

[JCGL]

Re : demande d'aide

Bonjour à tous,

Un essai en semi-automatique : il faut cliquer sur le GO et sur "envoyer" dans ton client de messagerie

A+ à tous

 

[bbanor]

Re : demande d'aide

Bonjour à tous,

Un essai en semi-automatique : il faut cliquer sur le GO et sur "envoyer" dans ton client de messagerie

A+ à tous

Super travail JCGL!!!!
Lorsque l'on clique sur le "GO" il envoie les mail automatiquement.
Pourrais tu modifier le code pour qu'il envoie la feuille active par mail s'il te plaît?

Merci d'avance.
PS : Je suis sous Mac et c'est la première fois que je tombe sur un code qui marche avec mon logiciel de messagerie "Mail". ENFIN !!!!

Merci et à te lire

 

[picronte53]

Re : demande d'aide

merci JCGL
pour ta rapidité.
ca me convient parfaitement sauf si il y a une possibilité pour un envoie automatique si je m'ai mon fichier dans la tache de windows
Cdlt

 

[JCGL]

Re : demande d'aide

Bonjour à tous,

BBanor : le code ne sera [pas] le même. Je regarde 🙂

Picronte53 : J'ai cru comprendre que tu avais défini une Tâche Planifiée pour ce fichier. Tu la lances à 09:00 par exemple

Dans le ThisWorkbook :

Option Explicit

Private Sub Workbook_Open()
Call EnvoiUnMail
End Sub

Dans le Module1 et après le Next X et avant le End Sub :

Next X
ThisWorkbook.Save
ThisWorkbook.Close
End Sub

A+ à tous

 

[picronte53]

Re : demande d'aide

bonsoir JCGL
j'ai essaié de modifier vba je n'ai pas reussi. par contre j'ai modifier I en jour pour envoyer un mail a 120 jours et 75jours
peux tu modifier J pour avoir un croix a 75 et 120
merci
Cdlt
Picronte

 

[JCGL]

Re : demande d'aide

Bonjour à tous,

Dépose le fichier sur lequel tu travailles.

A+ à tous

 

[picronte53]

Re : demande d'aide

ok desolé
je vais me coucher demain je me leve tot
je revient sur le fil mardi soir
merci
Picronte

 

[JCGL]

Re : demande d'aide

Bonjour à tous,

Le WorkBook_Open se place, généralement, dans le ThisWorkBook :



Tu appelais une Sub EnvoiUnMail () qui n'existait pas (tu avais supprimé la ligne).

Le fichier est maintenant automatique à l'ouverture.

Pour modifier le fichier (modification des adresses courriels, des dates...), il faut désactiver les macros (Outils / Macro / Sécurité et passer en Moyen : mais il faudra remettre sur Faible si tu souhaites un envoi automatique).
Il est nécessaire de fermer Excel et de le réouvrir pour la prise en compte du changement

A+ à tous

 

[bbanor]

Re : demande d'aide

Salut JCGL

Je sais que tu dois être occupé avec picronte53, mais est ce que tu as pu te pencher sur mon problème?

A te lire

 

[picronte53]

Re : demande d'aide

Bonjour JCGL
merci pour tous
Cdlt
Picronte