Probleme Excel Application finance

Fermé
Dfripe Messages postés 23 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 10 octobre 2008 - 18 sept. 2008 à 14:11
Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 - 10 oct. 2008 à 18:54
Bonjour,
J'ai cherché sans succes pendant 3 jours sur le web avant de poster, j'ai trouver des solutions approchées mais jamais exact...
Voici donc mon probleme :
J'ai crée un tableau excel avec des cours de bourse qui se mettent à jour en temps réel sur le web.
J'aimerai faire en sorte que lorsque le cours en question "approche" un plafond que j'aurais fixé (plafond - 2% du plafond) pour chaque cours, une message box apparaisse pour m'en avertir.
Je suis nul en vba donc j'ai essayer mais sans succes de programmer une macro...

Donc voilà si quelqu'un peu m'aider je lui en serais grandement reconnaissant.
Merci par avance.
A voir également:

36 réponses

Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 5 103
25 sept. 2008 à 10:18
Salut Dfripe,

Pour ce qui concerne la mise à jour des données externes par boursorama, je te conseille d'ouvrir une autre discussion sur le forum programmation afin de toucher ces spécialistes. Pour cela vide un fichier de toutes macros, laisses simplement actif les liens avec boursorama en signalant que sur un de ton micro ainsi que sur d’autre comme le mien, cela marche sauf sur ton deuxième. À mon sens il doit y avoir un problème de pare-feu, d’anti mouchard ou ton anti virus, tu me diras.

Ensuite colle ton ce code macro ci-dessous dans un module, crées un bouton sur ta feuille pour lacer la macro. Un bip sonne retentira toutes les deux minutes pour tester la cadence d’exécution des macros qui le replaceront.

Sub LancementAutomatique()
' Définit l'intervalle avec l'heure actuelle + 0heure+2minutes+0seconde
DansHourMinuteSecond = TimeSerial(Hour(Time) + 0, Minute(Time) + 2, Second(Time) + 0)
' Appel récursif de la fonction LancementAutomatique
Application.OnTime DansHourMinuteSecond, "LancementAutomatique"
' Appel des macros se fera à partir de ce stade

Beep ' Beep est le bip sonnore de windows, placé ici provisoirement
'pour tester la cadence du retour des macros qui seront insérées dans cette zone.

End Sub

A+
0
Dfripe Messages postés 23 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 10 octobre 2008
25 sept. 2008 à 11:50
Merci beaucoup Mike.
Je suis désolé mais je ne comprend pas bien ce que je dois faire.
En particulier dois lier le bouton à la Macro 1 ou à "Lancement automatique"?
En fait je ne connais rien aux propriétés des modules...
0
Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 5 103
25 sept. 2008 à 15:22
Salut,
tu ouvres un fichier, clic droit sur l'onglet de ta feuille
visualiser le code
insertion / module
et dans cette feuille tu colles le code que je t'ai envoyé
tu renviens sur ta feuille et tu crée un bouton à partir de la berre d'outils formulaire ou plus simplement tu sélectionnes une forme géométrique de ta barre de dessin exemple un rond
clic droit sur l'option choisie exemple le rond
affecté à une macro
clique sur le nom de la macro LancementAutomatique
pour lancer la macro clic sur l'option choisie (bouton ou rond) et mets le son pour juger de la fréquence de l'exécution perceptible par un bip toutes les 2 minutes
A+
0
Dfripe Messages postés 23 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 10 octobre 2008
25 sept. 2008 à 15:48
Je suis désolé mais j'ai fais exactement comme tu m'as indiqué et ça ne fonctionne pas...
J'ai toujours les 36 messages qui s'affichent!
Tu peux en juger par toi-meme:

https://www.cjoint.com/?jzpWuRT0h8

Je ne sais vraiment pas comment arranger cela
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 5 103
25 sept. 2008 à 16:04
Tout à fait les macros ne sont pas synchronisées avec la macro de déclenchement automatique.
Mets la macro de déclenchement automatique sur un fichier vierge ou sur le fichier avec le bouton de désactivation que je t’ai envoyé et enfonce le bouton pour arrêter les macros ce qui n’arrêtera pas la réception des infos boursorama mais tu pourra juger pas les bip perceptible la cadence a laquelle seront activer tes macros, afin d’accélérer ou ralentir.
Je te préparerai une synchronisation de l’ensemble après afin de terminer ton projet

A+
0
Dfripe Messages postés 23 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 10 octobre 2008
25 sept. 2008 à 17:32
Merci pour ta réponse,
J'ai fait comme tu m'a indiqué (cf imp écran)

https://www.cjoint.com/?jzrGyRWcxH

Quand je clique sur le cercle jaune j'entend bien un bip...
Encore une fois je suis vraiment désolé mais je ne comprends pas très bien quel retour tu attends de moi?
0
Dfripe Messages postés 23 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 10 octobre 2008
25 sept. 2008 à 17:32
Merci pour ta réponse,
J'ai fait comme tu m'as indiqué (cf imp écran)

https://www.cjoint.com/?jzrGyRWcxH

Quand je clique sur le cercle jaune j'entends bien un bip...

Encore une fois je suis vraiment désolé mais je ne comprends pas très bien quel retour tu attends de moi?
0
Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 5 103
25 sept. 2008 à 17:42
une fois que tu lances la macro en appuyant sur le bouton elle doit bipper toutes les deux minutes, ce qui correspondra à l'activation des macros dont nous avons parlé précédemment.

laisse cette macro tounée quelques temps pour voir si cette cadence d'exécution te convient, c'est tout

A+
0
Dfripe Messages postés 23 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 10 octobre 2008
25 sept. 2008 à 17:52
ok très bien :
la macro produit bien un bip au bou de 2 minutes (j'ai chronométré!!)
mais elle en produit aussi 4 d'affilé au bout de 1 min 50 sec. et je ne comprends pas pourquoi? Mais je te le signale tout de meme au cas ou...

Merci à toi je m'excuse de ma précédente inconpréhension.
0
Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 5 103
1 oct. 2008 à 14:59
Salut Dripe,

Je ne t’ai pas oublié, juste un petit pépin, une limaille dans un œil en installant un réseau, ce qui m’a valu quelques jours sans écran.
Le code de déclenchement automatique que je t'ai écris est déstabilisé par la collecte des infos Boursorama. Pour y remédier j’ai dû écrire un code en cascade afin de le rendre cohérant. Je te prépare tout cela avant la fin de semaine.
J’ai également vu que tu avais posé un post pour des cellules clignotants, dès que cette discussion sera terminée je te proposerai un code.

A+
0
Dfripe Messages postés 23 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 10 octobre 2008
1 oct. 2008 à 15:08
Hello,

J'espère pour toi que ça n'est pas trop grave pour ton oeil...
En tout cas ça doit pas etre très agréable de se prendre ça dans l'oeil (j'ai mal rien qu'en imaginant)!

Je pensait que tu m'avais oublié! Je suis soulagé de t'entendre, parce que je cherche à m'en sortir seul depuis mais sans aucun succès!!

Par contre je vais suivre ton conseil et créer une autre question pour ce qui est du problème de l'actualisation de mes données.

J'attend vivement de tes nouvelles et encore merci d'etre toujours là.
0
Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 5 103
2 oct. 2008 à 16:24
Salut,

Récupéres la pièce jointe et testes la, je pense qu'elle répond à tes attentes. Il ne te reste plus qu'a l'adapter à tes besoins en prenant soin de rectifier le code en fonction.

Si c'est le cas mets le statut de cette discution en résolu.

Tu peux toujours m'envoyer un message privé pour un conseil ou une modification de ce code. Et excuses moi pour le contre temps.

Demain je regarde ton problème de cellule clignotante sur l'autre post, suis le !

Sur comment Ca Marche tout est possible

https://www.cjoint.com/?kcqyx4p7h0

A+
0
Dfripe Messages postés 23 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 10 octobre 2008
7 oct. 2008 à 11:04
Hello Mike,
Désolé de répondre si tard mais j'étais en phase de test et je ne voulais pas poster pour rien dire...
Tout d'abord merci, merci et encore merci!

Cependant j'ai quelques petites questions à te poser:

J'ai eu ce message d'erreur
https://www.cjoint.com/?khkryIf4lm
après avoir tenter de modifier la somme est-ce grave pour la suite ?

Ensuite je n'arrive pas à comprendre comment tu procède pour définir les cellules d'éxécution de la macro car j'aimerais les changer cependant les numéros de colonne ne correspondent pas?! (tu as surment du faire une démarrage à 0+1 mais je ne sais pas ou le code est!)

Le fichier ci dessous contient les questions diverses que je me pose.

https://www.cjoint.com/?khlcGhaMya

Merci par avance.
0
Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 5 103
7 oct. 2008 à 14:34
Salut,

Pour répondre à ta première question, comme j'échange pas mal de fichier, je travaille avec un niveau de sécurité élevé et donc je suis obligé de signer mes macros afin de ne pas avoir à autoriser l'activation des mes macros à chaque ouverture de fichier.
pour toi plusieurs possibilités
1/ tu crée ton propre fichier en respectant les emplacements des cellules etc ... et tu copies les macros dans un module et si tu modifies les emplacements de cellules tu dois en tenir compte dans le code macro et le modifier en conséquence.

2/ tu vas dans le visual basic editor Outils/signature électronique normalement tu devrais voir le nom de ma signature Ma Griffe, tu cliques sur supprimer mais pour ne pas être obligé d'autoriser l'activation macro tu devra placer ton niveau de protection sur moyen à partir de ta feuille de calcul outils/macro/sécurité

3/ si tu travaille sous excel 2007 tu crées ta propre signature pour authentifier tes macros, sinon il te faut Selfcert de Microsoft pour créer cette signature. Il existe surement d'autre possibilités
Pour les question concernant ton projet
Lorsque tu renommes un fichier, il convient de modifier le code macro
Windows("DernierFichierMike31.xls").Activate

Ainsi que si tu renommes une feuille
Sheets("Feuille source").Select

Pour les données multiples concernant le même titre sur la feuille exécution de la macro il ne doit pas y avoir de problème, je te regarde ça

A+
0
Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 5 103
8 oct. 2008 à 20:59
Salut,

regardes le dossier joint et on en reparle

https://www.cjoint.com/?kiu4CS3lw8

Dans le post concernant le clignotement d'une ligne, je t'ai également mis un modèle

A+
0
Dfripe Messages postés 23 Date d'inscription jeudi 18 septembre 2008 Statut Membre Dernière intervention 10 octobre 2008
10 oct. 2008 à 17:22
Hello,

Merci beaucoup je la test en ce moment...

Seulement le code semble "s'embaler" comme à l'époque du "sub Calculate" !
Plus séroeusement je veux dire que je me prend souvent deux ou trois vagues de messages d'alerte d'affilé...

J'ai regardé le code avant de t'en parlé mais je n'y arrive pas.

Je te remet le fichier (j'ai réajusté les numéros de colonnes dans VBA)

https://www.cjoint.com/?kkrsOcL4Nu

Encore un grand merci à toi et bon WE (je ne t'en voudrais pas de te pencher dessus que Lundi!).
0
Mike-31 Messages postés 18342 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 2 novembre 2024 5 103
10 oct. 2008 à 18:54
C'est bizare, je teste le fichier et change régulièrement le temps cyclique, tout marche nickel sans perturbation. La seule chose qui perturbe l'apparition des messages vient des cellules vides colonne extraction du cours en face valeur brute qui déclenche une boite par ligne. Je vais supprimer l'enclenchement automatique à l'ouverture du fichier, ce qui obligera de le lancer avec le bouton de réenclenchement pour voir

A+
0