un message d'avertissement pour les fins de mois

jeanpierre

Nous a quitté

Repose en paix

• 25 Novembre 2006

• #2

Re : un message d'avertissement pour les fins de mois

Bonsoir Pascal,

Tu nous fais quoi ?

Un fil, (le même) et avec des réponses... https://www.excel-downloads.com/threads/une-formule-pour-les-fins-de-mois.70931/

Si tu veux avoir des difficultés de suivi, et perdre les contributeurs dans leurs interventions, c'est la meilleure manière !!!!😡

Tu restes sur le même fil, même si les réponses ne te conviennent pas, auquel cas, tu l'expliques....

Allez bonne soirée tout de même.

Jean-Pierre

 

Vote positif 0 Vote négatif

pascal21

XLDnaute Barbatruc

• 25 Novembre 2006

• #3

Re : un message d'avertissement pour les fins de mois

bonsoir jean pierre
en effet il peut sembler que le sujet est identique
en fait il s'agit de la suite logique du post que tu désignes et auquel j'ai répondu que la solution apportée par jean marie me convenait et je remerciais même les autre personnes de m'être venu en aide
donc comme ce sujet me parraissait clos (encore que ce n'est pas une notion utilisée sur ce forum, puisque les sujets restent ouvets pour d'autres personnes pour l'avenir) j'ai à nouveau posté pour cette nouvelle demande qui à mon sens ne pouvait pas figurer dans l'autre post puisque étant un sujet sensiblement différent
celà dit j'ai peut-être eu tort et dans ce cas c'est tout à ton honneur de me faire cette remarque cela prouve qu'il y a beaucoup de personnes qui suivent se qui se passe sur ce forum et tu en fais partie
lorsque j'ai posté ce message j'avais eu l'intention de faire reférence au premier post mais j'ai pensé que la solution pouvait venir sans cela
cordialement pascal

 

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 25 Novembre 2006

• #4

Re : un message d'avertissement pour les fins de mois

Re,

Ce n'était pas méchant et tu l'as bien analysé. Merci.

Si j'ai commis une erreur, je te prie d'accepter mes excuses.

Ceci dit, et à ce que j'ai pu lire, il me semble, tout de même, que cela reste dans la continuité, car les réponses précédentes peuvent apporter des pistes à celles ou ceux qui viendront ensuite pour tenter de résoudre ta nouvelle question.

Pas toujours facile....

Bonne soirée en tout cas.

Jean-Pierre

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 25 Novembre 2006

• #5

Re : un message d'avertissement pour les fins de mois

Bonsoir Pascal, Jean Pierre

une macro évènementielle, ci dessous à placer dans ThisWorkbook, à tester, il y a peut être plus simple...

Code:

Private Sub Workbook_Open()
If Weekday(Date) = 6 Then
    If Month(Date) <> Month(DateAdd(d, 7, Date)) Then _
        MsgBox "Dernier Vendredi"
End If
End Sub

Bonne soirée
@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 25 Novembre 2006

• #6

Re : un message d'avertissement pour les fins de mois

Re,

tout compte fait on peut faire un peu plus simple

Code:

Private Sub Workbook_Open()
If Weekday(Date) = 6 and Month(Date) <> Month(DateAdd(d, 7, Date)) Then _
        MsgBox "Dernier Vendredi"
End Sub

@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 26 Novembre 2006

• #7

Re : un message d'avertissement pour les fins de mois

Bonjour à tous

Erratum, il faut rajouter des guillemets à "d" comme ci dessous :

Code:

Private Sub Workbook_Open()
If Weekday(Date) = 6 And Month(Date) <> Month(DateAdd("d", 7, Date)) Then _
        MsgBox "Dernier Vendredi"
End Sub

Bon dimanche
@+

 

Vote positif 0 Vote négatif

pascal21

XLDnaute Barbatruc

• 26 Novembre 2006

• #8

Re : un message d'avertissement pour les fins de mois

bonjour et merci pierrot93
comme j'avais plusieurs souhaits dans le post
peux-tu m'expliquer à quel moment arrive ce message
je ne comprends pas grand chose au vba
le message s'inscrit-il 7 jours avant, le jour "j" ou autre
cette question pour savoir quoi afficher dans la mgsbox
merci

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 26 Novembre 2006

• #9

Re : un message d'avertissement pour les fins de mois

Bonjour Pascal,

le message arrive à l'ouverture du classeur, le dernier vendredi du mois (si le classeur est ouvert bien sur).

Bon dimanche
@+

 

Vote positif 0 Vote négatif

pascal21

XLDnaute Barbatruc

• 26 Novembre 2006

• #10

Re : un message d'avertissement pour les fins de mois

ok merci pierrot bon dimanche

 

Vote positif 0 Vote négatif

la croisée des pains

XLDnaute Occasionnel

• 26 Novembre 2006

• #11

Re : un message d'avertissement pour les fins de mois

Bonjour le forum,Pascal21 et Pierrot

comment modifier le code pour me dire que c'est le dernier jour du mois et qui'il faut facturer le client.
Quelles sont les modifications à apportée à ton code.

Merci et bon dimanche

Laurent

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 26 Novembre 2006

• #12

Re : un message d'avertissement pour les fins de mois

Bonjour Lolo

essaye comme ceci :

Code:

If Month(Date) <> Month(DateAdd("d", 1, Date)) Then
        MsgBox "dernier jour du mois !!!"

Bon dimanche
@+

 

Vote positif 0 Vote négatif

la croisée des pains

XLDnaute Occasionnel

• 26 Novembre 2006

• #13

Re : un message d'avertissement pour les fins de mois

bonsoir à tous

cool sa marche

merci à toi

bonne soirée
laurent

 

Vote positif 0 Vote négatif