Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

popup en fonction du jour de la semaine

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion kiki31140
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
K

kiki31140

Guest
Bonjour à tous.

Ayant eu de bonnes solutions la dernière fois, je reviens vers vous afin de vous solliciter à nouveau.
j'ai un fichier excel avec plusieurs onglets. chaque onglet corresponds à une semaine que je génère moi même ( via des macros) en fin de semaine.
je voudrais rajouter une petite macro qui m'afficherais un popup de rappel ( avec message) tous les vendredis à 10h00 et 14h00.
merci d'avance pour votre aide

christian
 
Trier par date Trier par votes
Re : popup en fonction du jour de la semaine

Salut à tous.
je pense que j'ai du poser une colle !!!!

J'essaie depuis hier de voir la chose autrement.
Dans mon onglet semaine 39 ( c'est ma semaine en cours), j'ai rajouté une case qui m'affiche la date du jour.
Ce qui existait déja, c'est une colonne où figuraient les jours de la semaine.
J'ai rajouté, en plus de la date au dessus, 2 cellules avec la formule "=EXACT(..;...) pour vérifier que ma date du jour est le vendredi ( dans une des 2) ou le samedi ( dans l'autre )
j'ai donc écrit la formule =EXACT(U1;B24) et =EXACT(U1;B48)
lorsque l'on est vendredi ou samedi, il m'affiche VRAI dans la case.

Mon idée est que lorsque cela est vérifié, j'ai une messagebox qui me demande de générer une nouvelle semaine.
Il faut que cette macro controle en permanence

voici ce que j'ai commencé à écrire (étant novice, il y certainement des erreurs):

Sub datedujour()
If ActiveSheet.Cells("U5").Value = "VRAI" Then
MsgBox "Vous devez générer la semaine suivante!", vbInformation, "Semaine suivante"
End If
If ActiveSheet.Cells("V5").Value = "VRAI" Then
MsgBox "Vous devez générer la semaine suivante!", vbInformation, "Semaine suivante"
End If
End Sub

merci par avance
 
Vote positif 0 Vote négatif
Re : popup en fonction du jour de la semaine

Bonjour kiki,

il faut mettre le code dans une évènementielle pour qu'il puisse se déclencher automatiquement

à mettre dans ThisWorkBook
Code: 
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Not Intersect(Target, Range("U5:V5")) Is Nothing And Target = True Then
MsgBox "Vous devez générer la semaine suivante!", vbInformation, "Semaine suivante"
End If
End Sub

à+
Philippe
 
Vote positif 0 Vote négatif
Re : popup en fonction du jour de la semaine

Re,
kiki31140 à dit:
ça ne marche pas ......
je vous envoie le fichier pas mp
Cliquez pour agrandir...
............désolé, rien reçu

le fichier peut être joint dans ce fil de discussion

j'ai donc écrit la formule =EXACT(U1;B24) et =EXACT(U1;B48)
lorsque l'on est vendredi ou samedi, il m'affiche VRAI dans la case.
Cliquez pour agrandir...
ça ne saurait pas fonctionner aujourd'hui puisque nous sommes Mercredi !!!!!
....... à re-tester Vendredi ou Samedi

à+
Philippe
 
Vote positif 0 Vote négatif
Re : popup en fonction du jour de la semaine

Re,

ou alors ceci (toujours dans ThisWorkBook)
Code: 
Private Sub Workbook_Open()
If Format(Date, "dddd") = "vendredi" Or Format(Date, "dddd") = "samedi" Then 
MsgBox "Vous devez générer la semaine suivante!", vbInformation, "Semaine suivante"
End If
End Sub
ça ne fonctionnera pas aujourd'hui .......... il faudra attendre 😉 la fin de la semaine

à+
Philippe
 
Vote positif 0 Vote négatif
Re : popup en fonction du jour de la semaine

nickel , ça marche .....
j'ai changé le vendredi en jeudi pour vérifier la macro.

merci encore, c'est plus simple que ce vers lequel je m'aventurais.

Bonne journée
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 Utilisation d'un module VBA en tâche de fond
Réponses
5
Affichages
134
aspect
  • Question Question
XL 2019 Gestion de 4 sources de revenu (A, B, C et D). Et rajout du jour en cours et MEFC qui doit varier selon le mois en cours...
Réponses
8
Affichages
259
sylvanu
  • Résolu(e)
XL 2019 Erreur de Type à la ligne 5581
Réponses
5
Affichages
395
Titof06
N
  • Question Question
XL 2016 Afficher un "X" dans un tableau semaine en fonction d'un récurrence Horaire
Réponses
2
Affichages
357
nicobush
N
  • Résolu(e)
Microsoft 365 VBA Insertion du numéro de semaine de manière dynamique
Réponses
11
Affichages
670
Etoto
O
  • Question Question
XL 2019 Mise a jour prix en fonction de la date
Réponses
8
Affichages
505
Ocbpatate
O
O
  • Question Question
XL 2019 resoudre la loudeur de Bdd du vba
Réponses
4
Affichages
604
mapomme
  • Question Question
XL 2021 Création calendrier ( Agenda ) en VBA
2
Réponses
15
Affichages
2 K
Nicolas JACQUIN
  • Question Question
XL 2021 Mise en forme conditionnelle date du jour
Réponses
4
Affichages
620
AIXELS
K
  • Résolu(e)
XL 2013 recherche en fonction de la valeur et du rang sur une ligne
Réponses
5
Affichages
548
komarlehomard
K
M
  • Question Question
XL 2021 Générateur Tournoi Ecole de Rugby
Réponses
5
Affichages
862
Magis
M
B
  • Résolu(e)
XL 2021 Moyenne par jour de la semaine pour plusieurs années
Réponses
7
Affichages
995
flo10
F
3
  • Question Question
XL 2013 modification de la mise en forme à chaque mise à jour de mon graphique croisé dynamique
Réponses
3
Affichages
506
chris
D
  • Résolu(e)
XL 2021 afficher prénom de la plageprénom si correspondance avec prénom à la date du jour dans plage10 (fêtes)
Réponses
5
Affichages
683
DédéW83
D
  • Question Question
Microsoft 365 Compter nombre ligne en fonction du N° de la semaine et de l'équipe
Réponses
12
Affichages
1 K
looky62
I
  • Résolu(e)
Microsoft 365 Changer la reference d'une etiquette automatiquement chaque semaine
Réponses
3
Affichages
715
ilyes4205
I
  • Question Question
Microsoft 365 VBA : copier / coller d'un onglet à l'autre en fonction d'une valeur
Réponses
8
Affichages
913
Lisette
H
  • Question Question
XL 2021 importer automatiquement des données à partir d'un tableau en fonction du jour du mois
Réponses
2
Affichages
803
Hamid84
H
  • Question Question
XL 2016 calcul d'heures en fonction du numéro de semaine
Réponses
4
Affichages
756
halecs93
L
  • Question Question
XL pour MAC Moyenne en fonction du jour de la semaine - Restaurant
Réponses
4
Affichages
819
loic33610
L
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…