EXCEL : mettre un message d'ALERTE DATES avec échéance par ouverture d'une FENÊTRE POP-UP

No video

EXCEL : mettre un message d'ALERTE DATES avec échéance par ouverture d'une FENÊTRE POP-UP

Рет қаралды 2,650

Se faciliter la vie avec Excel

Күн бұрын

Vous trouverez en commentaire l'écriture VBA proposée dans la vidéo afin de la copier.
#excel #fenêtre #alerte #date

Пікірлер: 8

@sefaciliterlavieavecexcel5008 2 жыл бұрын

Private Sub Workbook_Open() 'Définir les constantes pour la colonne "ÉCHÉANCE" Dim Nblg1 As Long Dim Msg1 As String 'Code du bloc relatif à la vérification dans les cellules de la colonne (B, ÉCHÉANCE, 2) Application.ScreenUpdating = False With Sheets("Conventions") Nblg1 = .Range("B" & Rows.Count).End(xlUp).Row .Range("A1:B" & Nblg1).AutoFilter field:=2, Criteria1:="

@serviceinfo3060 7 ай бұрын

THANX BRO

@user-my2jr9mq2z 6 ай бұрын

Bonjour, Je me permets de commenter votre vidéo, Alors tout d'abord, merci pour ces explications de qualité. J'ai utilisé votre VBA pour un tableau excel de contrôle périodique de VGP (pour contrôle électrique, contrôle incendie, contrôle machines ...). 1/Est-ce qu'il fallait mettre la ligne dans une macro ? 2/ Vous ne présenté pas le débogage ou le lancement du code il me semble. Il faut faire un débogage ou juste lancer le code ? 3/ Est-ce que c'est une fenêtre qui s'ouvre dès l'ouverture du fichier excel ? Ou bien il faut la lancer manuellement ? (Perso j'ai fait un raccourci Ctrcl+a MAIS je souhaiterais que cette alerte s'ouvre dès que j'ouvre le fichier) Pouvez-vous m'aider svp ? Je vous remercie :)

@sefaciliterlavieavecexcel5008 5 ай бұрын

Bonjour, Je vous remercie pour votre message. Je vais essayer d'apporter une réponse à vos 3 interrogations. 1/ vidéo à 0:45 : lorsque vous double-cliquez sur "ThisWorkbook", la zone de texte grise à droite, devient blanche. C'est ici que vous collez directement le texte de la macro (je ne sais pas si j'ai répondu à votre question par rapport à la ligne dans la macro). 2/ vidéo à 1:47 : il vous suffit de cliquer sur la croix en haute à droite (la plus haute) pour fermer la fenêtre de la macro et revenir sur votre tableau Excel. Ensuite, vous devez enregistrer votre fichier sous le format "Classeur Excel (prenant en charge les macros)". Fermer ensuite votre fichier. 3/ à la 1ère ouverture, un bandeau jaune apparait "AVERTISSEMENT DE SÉCURITÉ Les macros ont été désactivées". Cliquer sur "Activer le contenu" et enregistrer à nouveau votre fichier. Dès l'ouverture du fichier, la Macro se lancera toute seule et la fenêtre pop up apparaitra avec le message d'alerte. En faisant ensuite "OK" , vous arriverez sur votre tableau Excel. N'hésitez pas à me dire si les explications vous ont permis de finaliser votre fichier comme vous le souhaitiez et/ou si vous avez besoin de précisions complémentaires.

@am0946 2 ай бұрын

merci pour ce code ! est-il possible de prendre la date d'échéance et de lancer l'alerte par anticipation sur -15 jours ou -30 ? sans forcément refaire une colonne ? merci de votre réponse et bonne journée

@sefaciliterlavieavecexcel5008 Ай бұрын

Bonjour, J'ai fait un test en ajoutant dans la VBA à la suite de CSng (Date) - CSng (-15) Le nombre correspondant au nombre de jours avant la date échéance. Ca semble fonctionner avec ma base test. Merci pour votre retour

@SergeBedouet Ай бұрын

Bonjour Où se trouve : "l'écriture VBA" à laquelle vous faites référence pour que je puisse la copier ? Merci.

@sefaciliterlavieavecexcel5008 Ай бұрын

Bonjour, elle est dans la partie "commentaires" , le 1er commençant par "Private Sub Workbook..." Je l'ai remise ci-dessous : Private Sub Workbook_Open() 'Définir les constantes pour la colonne "ÉCHÉANCE" Dim Nblg1 As Long Dim Msg1 As String 'Code du bloc relatif à la vérification dans les cellules de la colonne (B, ÉCHÉANCE, 2) Application.ScreenUpdating = False With Sheets("Conventions") Nblg1 = .Range("B" & Rows.Count).End(xlUp).Row .Range("A1:B" & Nblg1).AutoFilter field:=2, Criteria1:="