XL 2019 office 2019

C

Compte Supprimé 979

Guest

• 29 Octobre 2021

• #2

Bonjour Andre51

Une petite question pour commencer : Avez-vous envie d'apprendre ou pas le VBA ?

Quand je vois çà

Pour commencer, un code ne peut pas être dépose comme ça sans être entouré de
Sub Machin()
End Sub
Ou dans un évènement
Private Sub UserForm_Initialize()
End Sub

Ensuite il faut que le code parle des objets présents, or ListBox1 ne figure pas dans votre Userform

Quid du Userform si plusieurs anniversaires sont le même jour ?

A+

 

Vote positif 0 Vote négatif

A

Andre51

XLDnaute Nouveau

• 29 Octobre 2021

• #3

Bonjour et merci pour votre réponse,
comme je l'explique dans ma demande je n'y connais rien en VBA, et à près de 71 ans apprendre le VBA me dépasse.
Je viens sur Excel Download pour obtenir une aide me permettant de constituer mon fichier anniversaire, j'aimerai avoir vos connaisances en VBA et je peux comprendre que lorsque vous voyez çà vous soyez désespérer.
Le tableau que vous avez vu n'est qu'une copie et c'est moi qui est entré ces formules en sachant que çà ne fonctionnerais probablement pas mais comme dit le proverbe "qui ne tente rien n'a rien" .
J'espère avoir répondu à vos interrogations.

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 29 Octobre 2021

• #4

Re André

Je comprends mieux, mais Tu sais il n'est jamais trop tard pour apprendre, c'est bon pour les neurones

Les 2 fichiers sont à mettre dans le même dossier

Au plaisir

 

Pièces jointes

• Andre51_Anniversaires.xlsm

  29.4 KB · Affichages: 10
• Triste.gif

  353.8 KB · Affichages: 26

Vote positif 0 Vote négatif

Solution

A

Andre51

XLDnaute Nouveau

• 29 Octobre 2021

• #5

Merci Bruno
Tu vois Bruno c'est pas facile pour moi le vba , par contre t'inquiète s'entrîne mes neurônes en faisant des mots flèches et des sudokus très régulièrement, je lis et regarde aussi beaucoup de documentaires à la télé et sur internet.
Merci beaucoup pour ton aide, très reconnaissant.
André

 

Vote positif 0 Vote négatif

A

Andre51

XLDnaute Nouveau

• 29 Octobre 2021

• #6

C'est encore moi Bruno, toutes mes excuses pour les dérangements,.
j'ai 3 questions :
1 - est-il possible de changer la couleur du fond du gif et le centrer car je ne vois la possibilité dans les propriétés et que signifie cette " erreur 1004".
2 - est -ce que je peux créer un second userform pour le jour de l'anniversaire avec un gif correspondant et comment l'insérer dans la formule, Ton gif pleure mais mon gif anniversaire ne fait pas d'étincelle?
3 - Le bouton OK ne fonctionne pas, je supprime l'alerte avec la croix.

 

Pièces jointes

• Triste (1).gif

  353.8 KB · Affichages: 14
• Erreur 1004.jpg

  112.1 KB · Affichages: 13
• Gif et bouton OK.jpg

  126.5 KB · Affichages: 14
• Jour de l'anniversaire (1).gif

  98.7 KB · Affichages: 14

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 29 Octobre 2021

• #7

Re,

André, fallait me dire que je devais devoir tout te faire

Pour la question 1, le GIF donné est transparent normalement, je en sais pas pourquoi il apparait blanc et j'ai cherché, mais pas trouvé. Pour l'erreur 1004, c'est que tu lances directement l'USF alors qu'il faut passer par le module qui trouve et donne un numéro de ligne (c'est maintenant implémenté dans l'usf au cas ou)

Pour la question 2, inutile, il suffit de modifier le nom du GIF et les libellés dans ton USF, c'est fait
ton GIF n'en est pas un, c'est une image fixe

Pour la question 3, normal, je pensais que ça au moins tu savais faire

Voici tout les fichiers qu'il te faut

N'hésite pas à ouvrir un nouveau post s'il te faut autre chose

A+

 

Pièces jointes

• Andre51_Anniversaires v2.xlsm

  32.2 KB · Affichages: 13
• VeilleAnniversaire.gif

  353.8 KB · Affichages: 28
• JourAnniversaire.gif

  402.1 KB · Affichages: 25

Vote positif 0 Vote négatif

A

Andre51

XLDnaute Nouveau

• 29 Octobre 2021

• #8

Tu es super sympa Bruno, grand merci, mais je te répète je suis nul en informatique, je m'occupe autrement , le cyclisme que je pratique et que je regarde à la télé , le foot mais je ne te dirais quel club je supporte et puis je marche.
De temps en temps l'ordi pour jeter un oeil sur facebook, YouTube, voilà pour principales activités, la vie de retraité n'est pas facile.
Je te souhaite une bonne soirée, et au besoin je reviendrais vers toi mais je ne veux pas abuser non plus.
André

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 29 Octobre 2021

• #9

re
bonsoir
@BrunoM45

Pour la question 1, le GIF donné est transparent normalement, je en sais pas pourquoi il apparait blanc et j'ai cherché, mais pas trouvé. Pour l'erreur 1004, c'est que tu lances directement l'USF alors qu'il faut passer par le module qui trouve et donne un numéro de ligne (c'est maintenant implémenté dans l'usf au cas ou)

Cliquez pour agrandir...

c'est la couleur de remplacement du claque transparent du gif
il a mal été concu ce gif c'est tout
il faut le shunter avec gimp( qui est gratos ) par exemple et qui le fait très bien

 

Vote positif 0 Vote négatif

A

Andre51

XLDnaute Nouveau

• 30 Octobre 2021

• #10

Merci à vous 3, Bruno,Patrick et cp4 pour les infos, mon fichier est parfait, il fonctionne bien et j'ai réussi à mettre le fond du WebBrowser de la même couleur que le fond de mon Userform, j'ai même redimentionné le Gif animé.
Eh ! les gars je m'améliore, dans 9 ans soit à 80 ans je connaîtrai tout sur excel .

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 30 Octobre 2021

• #11

a ben si c’était que ça il fallait me demander ma fonction couleur VBA to HTML
et c’était réglé

 

Vote positif 0 Vote négatif

A

Andre51

XLDnaute Nouveau

• 30 Octobre 2021

• #12

D'accord avec toi Patrick, mais je ne vais pas sans cesse vous ennuyer et puis il faut bien que je mette en application les conseils de BrunoM45, "faire travailler mes neurones". Maintenant je vais tenter de mettre la musique Happy Birsday uniquement sur le jour de l'anniversaire, mais çà c'est pas gagné.

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 30 Octobre 2021

• #13

perso j'ai travaillé sur le projet de séparer les 3 positions
hier , aujourd'hui , demain
j'ai tout repensé y compris le code de la "VérifierAnniv"
j'ai mis ma fonction perso couleur vba to html dans le module aussi
3 lignes ça casse pas des brique a convertir
tu a maintenant 3 userforms
a toi de les décorer comme tu veux

 

Pièces jointes

• Anniversaires v patricktoulon.xlsm

  43 KB · Affichages: 18
• demain.gif

  291.8 KB · Affichages: 32
• JourAnniversaire.gif

  402.1 KB · Affichages: 29
• VeilleAnniversaire.gif

  353.8 KB · Affichages: 27

Vote positif 0 Vote négatif

A

Andre51

XLDnaute Nouveau

• 30 Octobre 2021

• #14

C'est sympa, merci à toi Patrick ainsi qu'à tout les amis qui m'aide et me conseille, par contre étant nouveau je ne sais trop ce qu'il faut faire lorsqu'un problème est solutionné.

 

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 30 Octobre 2021

• #15

re la musique c'est un mp3 ou mid ou tu veux la faire dynamiquement en mid ou beep api
bref j'ai tout ce qu'il te faut

 

Vote positif 0 Vote négatif