j'ai une liste de clients avec leur dates de naisances=20
(j'ai une centaine de feuille dans mon document Excel) et=20
j'aimerais que pour chaque personne il y ait une MSGBox=20
qui vient quand il a son anniversaire. Et s'il n'y aucun=20
anniversaire j'aimerais que rien ne vienne.
J'avais essay=E9 avec la fonction SI, mais il n'y a qu'un=20
nombre limit=E9 de SI que l'on peut inclure (7 je crois)
voil=E0 ma formule SI:
=3DSI(Toto!B6=3DAUJOURDHUI();"Toto =E0 son anniversaire=20
aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait =EAtre =E9gal au=20
jour, mois et ann=E9e! hors j'aimerais qu'il ne prenne en=20
compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou,=20
encore mieux, comment faire un popup au d=E9marrage?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Bruno LOUIS
Salut,
=si(et(jour(aujourd'hui())=jour(toto!B6);mois(aujourd'hui())=mois(toto!B6));"Toto à son anniversaire aujourd'hui";"")
Cordialement,
Bruno a écrit dans le message de news: 06bb01c51434$0782e180$ Hello,
j'ai une liste de clients avec leur dates de naisances (j'ai une centaine de feuille dans mon document Excel) et j'aimerais que pour chaque personne il y ait une MSGBox qui vient quand il a son anniversaire. Et s'il n'y aucun anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au jour, mois et année! hors j'aimerais qu'il ne prenne en compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou, encore mieux, comment faire un popup au démarrage?
MErci d'avance!
Salut,
=si(et(jour(aujourd'hui())=jour(toto!B6);mois(aujourd'hui())=mois(toto!B6));"Toto
à son anniversaire aujourd'hui";"")
Cordialement,
Bruno
<anonymous@discussions.microsoft.com> a écrit dans le message de news:
06bb01c51434$0782e180$a401280a@phx.gbl...
Hello,
j'ai une liste de clients avec leur dates de naisances
(j'ai une centaine de feuille dans mon document Excel) et
j'aimerais que pour chaque personne il y ait une MSGBox
qui vient quand il a son anniversaire. Et s'il n'y aucun
anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un
nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire
aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au
jour, mois et année! hors j'aimerais qu'il ne prenne en
compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou,
encore mieux, comment faire un popup au démarrage?
=si(et(jour(aujourd'hui())=jour(toto!B6);mois(aujourd'hui())=mois(toto!B6));"Toto à son anniversaire aujourd'hui";"")
Cordialement,
Bruno a écrit dans le message de news: 06bb01c51434$0782e180$ Hello,
j'ai une liste de clients avec leur dates de naisances (j'ai une centaine de feuille dans mon document Excel) et j'aimerais que pour chaque personne il y ait une MSGBox qui vient quand il a son anniversaire. Et s'il n'y aucun anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au jour, mois et année! hors j'aimerais qu'il ne prenne en compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou, encore mieux, comment faire un popup au démarrage?
wrote in message news:06bb01c51434$0782e180$ Hello,
j'ai une liste de clients avec leur dates de naisances (j'ai une centaine de feuille dans mon document Excel) et j'aimerais que pour chaque personne il y ait une MSGBox qui vient quand il a son anniversaire. Et s'il n'y aucun anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au jour, mois et année! hors j'aimerais qu'il ne prenne en compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou, encore mieux, comment faire un popup au démarrage?
<anonymous@discussions.microsoft.com> wrote in message
news:06bb01c51434$0782e180$a401280a@phx.gbl...
Hello,
j'ai une liste de clients avec leur dates de naisances
(j'ai une centaine de feuille dans mon document Excel) et
j'aimerais que pour chaque personne il y ait une MSGBox
qui vient quand il a son anniversaire. Et s'il n'y aucun
anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un
nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire
aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au
jour, mois et année! hors j'aimerais qu'il ne prenne en
compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou,
encore mieux, comment faire un popup au démarrage?
wrote in message news:06bb01c51434$0782e180$ Hello,
j'ai une liste de clients avec leur dates de naisances (j'ai une centaine de feuille dans mon document Excel) et j'aimerais que pour chaque personne il y ait une MSGBox qui vient quand il a son anniversaire. Et s'il n'y aucun anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au jour, mois et année! hors j'aimerais qu'il ne prenne en compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou, encore mieux, comment faire un popup au démarrage?
MErci d'avance!
Bruno LOUIS
Oups, petite erreur de syntaxe
=SI(ET(JOUR(AUJOURDHUI())=JOUR(TOTO!B6);MOIS(AUJOURDHUI())=MOIS(TOTO!B6));"Bonne anni. Toto";"")
wrote in message news:06bb01c51434$0782e180$ Hello,
j'ai une liste de clients avec leur dates de naisances (j'ai une centaine de feuille dans mon document Excel) et j'aimerais que pour chaque personne il y ait une MSGBox qui vient quand il a son anniversaire. Et s'il n'y aucun anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au jour, mois et année! hors j'aimerais qu'il ne prenne en compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou, encore mieux, comment faire un popup au démarrage?
MErci d'avance!
Oups, petite erreur de syntaxe
=SI(ET(JOUR(AUJOURDHUI())=JOUR(TOTO!B6);MOIS(AUJOURDHUI())=MOIS(TOTO!B6));"Bonne
anni. Toto";"")
Voilà qui est mieux :)
"Daniel.M" <prenom.maher@bigfoot.inutil.com> a écrit dans le message de
news: e7zx$XDFFHA.2784@TK2MSFTNGP14.phx.gbl...
<anonymous@discussions.microsoft.com> wrote in message
news:06bb01c51434$0782e180$a401280a@phx.gbl...
Hello,
j'ai une liste de clients avec leur dates de naisances
(j'ai une centaine de feuille dans mon document Excel) et
j'aimerais que pour chaque personne il y ait une MSGBox
qui vient quand il a son anniversaire. Et s'il n'y aucun
anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un
nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire
aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au
jour, mois et année! hors j'aimerais qu'il ne prenne en
compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou,
encore mieux, comment faire un popup au démarrage?
wrote in message news:06bb01c51434$0782e180$ Hello,
j'ai une liste de clients avec leur dates de naisances (j'ai une centaine de feuille dans mon document Excel) et j'aimerais que pour chaque personne il y ait une MSGBox qui vient quand il a son anniversaire. Et s'il n'y aucun anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au jour, mois et année! hors j'aimerais qu'il ne prenne en compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou, encore mieux, comment faire un popup au démarrage?
MErci d'avance!
ChrisV
Bonjour,
Pourrais-tu préciser l'organisation réelles des données... un onglet regroupe-t-il une seule liste des clients avec leur date de nais., ou trouve-ton une liste de clients avec leur date de nais. sur chaque onglet du classeur...?
En supposant qu'un onglet (nommé ici CltDdN) regroupe la totalité des clients avec la date de naissance correspondante ( en B2:Bxx)... Tu pourrais passer par une mise en forme conditionnelle... la plage B2:Bxx étant sélectionnée, par les menus: Format/Mise en forme conditionnelle... Condition 1: La formule est: =ET(MOIS(B2)=MOIS(AUJOURDHUI());JOUR(B2)=JOUR(AUJOURDHUI())) Format... etc...
Si tu tiens à une MsgBox à l'ouverture du classeur... dans la feuille de code de ThisWorkbook
Private Sub Workbook_Open() Dim adR As String Dim clT As String Dim reP As String Application.ScreenUpdating = False Set aC = ActiveCell Set colDates = Sheets("CltDdN").[B:B] Sheets("CltDdN").[A:A].Interior.ColorIndex = xlNone cherCh = Month(Date) & "/" & Day(Date) With colDates Set C = .Find(What:=cherCh) If Not C Is Nothing Then adR = C.Address Do C.Offset(0, -1).Interior.ColorIndex = 19 clT = clT & vbCrLf & C.Offset(0, -1).Value Set C = .FindNext(C) Loop While Not C Is Nothing And C.Address <> adR Else: Application.ScreenUpdating = True reP = MsgBox("Aucun anniversaire(s) ce jour !", vbInformation, _ "Anniversaire à souhaiter...") Exit Sub End If End With If Not IsEmpty(clT) Then Application.ScreenUpdating = True reP = MsgBox(clT, vbExclamation, "Anniversaire(s) à souhaiter...") aC.Select End If Set aC = Nothing Set colDates = Nothing End Sub
ChrisV
a écrit dans le message de news: 06bb01c51434$0782e180$ Hello,
j'ai une liste de clients avec leur dates de naisances (j'ai une centaine de feuille dans mon document Excel) et j'aimerais que pour chaque personne il y ait une MSGBox qui vient quand il a son anniversaire. Et s'il n'y aucun anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au jour, mois et année! hors j'aimerais qu'il ne prenne en compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou, encore mieux, comment faire un popup au démarrage?
MErci d'avance!
Bonjour,
Pourrais-tu préciser l'organisation réelles des données... un onglet
regroupe-t-il une seule liste des clients avec leur date de nais., ou
trouve-ton une liste de clients avec leur date de nais. sur chaque onglet du
classeur...?
En supposant qu'un onglet (nommé ici CltDdN) regroupe la totalité des
clients avec la date de naissance correspondante ( en B2:Bxx)...
Tu pourrais passer par une mise en forme conditionnelle...
la plage B2:Bxx étant sélectionnée, par les menus:
Format/Mise en forme conditionnelle...
Condition 1: La formule est:
=ET(MOIS(B2)=MOIS(AUJOURDHUI());JOUR(B2)=JOUR(AUJOURDHUI()))
Format... etc...
Si tu tiens à une MsgBox à l'ouverture du classeur...
dans la feuille de code de ThisWorkbook
Private Sub Workbook_Open()
Dim adR As String
Dim clT As String
Dim reP As String
Application.ScreenUpdating = False
Set aC = ActiveCell
Set colDates = Sheets("CltDdN").[B:B]
Sheets("CltDdN").[A:A].Interior.ColorIndex = xlNone
cherCh = Month(Date) & "/" & Day(Date)
With colDates
Set C = .Find(What:=cherCh)
If Not C Is Nothing Then
adR = C.Address
Do
C.Offset(0, -1).Interior.ColorIndex = 19
clT = clT & vbCrLf & C.Offset(0, -1).Value
Set C = .FindNext(C)
Loop While Not C Is Nothing And C.Address <> adR
Else:
Application.ScreenUpdating = True
reP = MsgBox("Aucun anniversaire(s) ce jour !", vbInformation, _
"Anniversaire à souhaiter...")
Exit Sub
End If
End With
If Not IsEmpty(clT) Then
Application.ScreenUpdating = True
reP = MsgBox(clT, vbExclamation, "Anniversaire(s) à souhaiter...")
aC.Select
End If
Set aC = Nothing
Set colDates = Nothing
End Sub
ChrisV
<anonymous@discussions.microsoft.com> a écrit dans le message de news:
06bb01c51434$0782e180$a401280a@phx.gbl...
Hello,
j'ai une liste de clients avec leur dates de naisances
(j'ai une centaine de feuille dans mon document Excel) et
j'aimerais que pour chaque personne il y ait une MSGBox
qui vient quand il a son anniversaire. Et s'il n'y aucun
anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un
nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire
aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au
jour, mois et année! hors j'aimerais qu'il ne prenne en
compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou,
encore mieux, comment faire un popup au démarrage?
Pourrais-tu préciser l'organisation réelles des données... un onglet regroupe-t-il une seule liste des clients avec leur date de nais., ou trouve-ton une liste de clients avec leur date de nais. sur chaque onglet du classeur...?
En supposant qu'un onglet (nommé ici CltDdN) regroupe la totalité des clients avec la date de naissance correspondante ( en B2:Bxx)... Tu pourrais passer par une mise en forme conditionnelle... la plage B2:Bxx étant sélectionnée, par les menus: Format/Mise en forme conditionnelle... Condition 1: La formule est: =ET(MOIS(B2)=MOIS(AUJOURDHUI());JOUR(B2)=JOUR(AUJOURDHUI())) Format... etc...
Si tu tiens à une MsgBox à l'ouverture du classeur... dans la feuille de code de ThisWorkbook
Private Sub Workbook_Open() Dim adR As String Dim clT As String Dim reP As String Application.ScreenUpdating = False Set aC = ActiveCell Set colDates = Sheets("CltDdN").[B:B] Sheets("CltDdN").[A:A].Interior.ColorIndex = xlNone cherCh = Month(Date) & "/" & Day(Date) With colDates Set C = .Find(What:=cherCh) If Not C Is Nothing Then adR = C.Address Do C.Offset(0, -1).Interior.ColorIndex = 19 clT = clT & vbCrLf & C.Offset(0, -1).Value Set C = .FindNext(C) Loop While Not C Is Nothing And C.Address <> adR Else: Application.ScreenUpdating = True reP = MsgBox("Aucun anniversaire(s) ce jour !", vbInformation, _ "Anniversaire à souhaiter...") Exit Sub End If End With If Not IsEmpty(clT) Then Application.ScreenUpdating = True reP = MsgBox(clT, vbExclamation, "Anniversaire(s) à souhaiter...") aC.Select End If Set aC = Nothing Set colDates = Nothing End Sub
ChrisV
a écrit dans le message de news: 06bb01c51434$0782e180$ Hello,
j'ai une liste de clients avec leur dates de naisances (j'ai une centaine de feuille dans mon document Excel) et j'aimerais que pour chaque personne il y ait une MSGBox qui vient quand il a son anniversaire. Et s'il n'y aucun anniversaire j'aimerais que rien ne vienne.
J'avais essayé avec la fonction SI, mais il n'y a qu'un nombre limité de SI que l'on peut inclure (7 je crois)
voilà ma formule SI:
=SI(Toto!B6=AUJOURDHUI();"Toto à son anniversaire aujourd'hui;"")
Ca ne marche pas, car le AUJOURDHUI() devrait être égal au jour, mois et année! hors j'aimerais qu'il ne prenne en compte que le jour et le mois
Pouvez-vous me dire ce que je dois faire dans mon SI ou, encore mieux, comment faire un popup au démarrage?
