Données et graph en temps reel

Astice...Astuce...oui mais

Code:

---

If Range("A1").Value = Range("A1").Value

---

Serra TOUJOURS VRAI

be ca c est sur mais tu n as pas vu ma condition, derriere il y a un AND,

Sinon je te remerci beaucoup pour ton fichier , je teste , je vous tiens au courant rapidement

Bonsoir
Beau boulot!!!

Citation:

---

Envoyé par cb_60

Bonsoir
Beau boulot!!!

---

Voui !

J ai laissé tournée les 2 versions , elle sont fonctionnelle toutes les 2.
C est tres impresionnante votre niveau de codage, vraiment chapeau bas!!

Je doit dire que je suis bluffé par l esprit de syntese de ouskel'n'or qui a reussi a faire ca avec seulement 14 lignes.

Vous etes tous les deux tres bons je doit l avoué .

Ce petit fichier va interressé plus de monde que vous pensez, meme si c est une base ca prouve qu on peut s affranchir de nos plateforme de trading et voir les choses autrement.

Puis je metre ce fichier sur un autre forum specialisé en boursicotage, rien a voir avec un forum de prog?

Je donnerais le lien et le fichier en disans que c est moi qui ai tout fait.... oups!! ca m a echappé:oops:

J aimerais voir les reactions.

Je laisse tournée cette nuit ........

Je comprend pas... Y a qu'une seule versions dans mon fichier ?

La tienne et celle de ouskel'n'or :king:
Tiens il l a enlevé!
Il y a un soucis ouskel'n'or?
Je t ai froissé sans m en rendre compte peut etre?

NON TU L'A PAS FROISSE :evilred::evilred::evilred::evilred::evilred::evilred::evilred:

Desolé je comprends pas 8O, faut m expliquer si j ai bléssé quelqu un, il faut parler ou m envoyer un mail, je ne peus pas m expliquer si je ne comprends pas ou j ai fauté!!

n esitez pas.
merci

T'as pas fauté, bergoliv, dors tranquile ! J'ai juste enlevé mon message. Dans ce message je te disais de tester en créant un lien sur une autre feuille du même classeur. Malheureusement le test que j'avais préparé nécessitait des modifs pour fonctionner comme je voulais.
Bref, comme je ne pouvais pas tester sans lien DDE , je ne pouvais être sûr de rien.
Entre temps je suis allé mangé, j'ai un peu regardé la télé, l'homme des bois a mis son fichier, alors j'ai jugé inutile de corriger le test.
Maintenant tu sais tout de ma vie.

"14 lignes", tu as dit ? C'est beaucoup trop long ! Tu es sûr ? :mouarf:

Tout ce qui est sur le site appartient à DVP. Donc, si tu mets notre code ailleurs, tu mets un lien vers cette discussion ;) mais nous, on ne peut rien te permettre :aie:

Bonne soirée et fais de beaux rêve.
A+

PS - Je crois qu'on a égalé le record, sinon battu, du plus long fil sur ce forum

Bon, j'explique..
Si tu crois que la performance c'est le nombre de lignes de codes Tien, le voila avec 10 lignes

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Sub MyMacro() Dim FL1 As Worksheet   Set FL1 = Worksheets("Feuil1") 'Le test a déjà été fait dans calculate ' If FL1.Cells(1, 1) = FL1.Cells(1, 2) Then ' Exit Sub ' Else FL1.Select Range("A" & Range("A65536").End(xlUp).Row + 1).Value = Val(Cells(1, 1)) ' End If ActiveSheet.ChartObjects(ActiveSheet.ChartObjects.Count).Activate ActiveChart.SetSourceData Source:=FL1.Range("A2:A" & Range("A65536").End(xlUp).Row), PlotBy:=xlColumns Range("A1").Select Cells(1, 2) = Cells(1, 1) End Sub

---

Beaucoup de gens, quand il ont un code qui fonctionne sont capables de le modifié, la preuve ci-dessus.
Ce qui'il fallait trouver
1°) un moyen pour activer quand ta connection DDE change
2°) avoir l'idée pour simuler ta DDE que je n'ai pas.Pour pouvoir la mettre au point
3°) Le plus difficile à trouver c'est ce qu'il fallait mettre en Calculate
4°) Et encore plus, le moyen d'attendre que tout les recalculs de la feuille ont étés fait avant d'actionner la macro.(repasse autant de fois que de cellule renseignées)
Si après ça tu crois toujours que c'est le nombre de lignes qui est important c'est que t'a rien compris.
A+
EDIT: Et tu crois que je vais te croire....:evilred: j'suis pas né de la dernière pluie

EDIT2:Et passage maintenant à 7 lignes

Maintenant, c'est l'homme des bois que tu as froissé ! :( T'es vraiment impossible, bergoliv :mouarf:

Au fait, Louis, si tu mets ça, avec Excel 2007, c'est pas bon !

Citation:

---

Range("A" & Range("A65536").End(xlUp).Row + 1).Value = Val(Cells(1, 1))

---

:mouarf::aie::mouarf:

Et puis tu as oublié de compter les lignes qui sont dans Calculate :mouarf:

Edit
Et puis les codes "les plus courts sont les plus faciles à débugger !" C'est pas moi qui l'ai dit mais je pense pareil ! :mouarf:

Bonjour,

Quelle nuit j ai passé, je me suis fait un soucie monstrueux a cause de ouskel'n'or et ce matin je me léve , c est LeForestier qui est en petard!!

Vous etes sans pitié pour nerf !!

Et voila je viens de chopper 2 cheveux blanc.:evilred:

Du coup j ai bossé toute la nuit sur le fichier et j ai trouvé comment le faire en 2 lignes 8-)
c est fou!!

En fait je rentre 2 valeurs dans deux cellules differrentes, je les fusione puis j applique une incrementation exponantielle tout en activant le curseur apres chaque validation des cellules .8O

Mais ce sont les deux valeurs ajoutées qui font tout en fait:
Je les nomme: LeForestier et ouskel'n'or :mouarf:


Vous etes super performant tous les deux et c est pas un nombre de lignes qui fait la differrence . Je mexcuse si je t ai bléssé Leforestier.
C etait juste une petite remarque sans arriere pensées :oops:

Leforestier:love:

Par contre , on gagne quoi pour le record de la file la plus longue? :D :mouarf3:

Si ca permetait d etre intronisé supermegamoderateurredacteur en chef ca serait bien8O

Je vous virerais immediatement du site complet moi :aie::D :langue:

Bon je vais faire le tri des milliers de fichier excel que tout ca a engendrer.

Mon brockers (intermediaire entre moi et la boures) donne un fichiers execl libre pour boursicoter, peut etre vous l avez deja, si ca vous interresse je le metrais ici avec les acces d un compte demo .

Comme ca vous pourrez bidouiller dessus sans risque.


:lahola:

a tout

Hello,

Citation:

---

Envoyé par toi

Mon brockers (intermediaire entre moi et la boures) donne un fichiers execl libre pour boursicoter, peut etre vous l avez deja, si ca vous interresse je le metrais ici avec les acces d un compte demo .

---

Ok pour ça. Mais tu pourrais également joindre la solution adoptée pour le graphe, j'ai rien compris à ton explication :oops: Une incrémentation, ok, mais exponentielle... ? Quant à activer le curseur... J'ai beau activer mon curseur... ça n'a aucun effet sur Excel :mouarf:
Explique-nous bien tout ;)
Bonne journée
A+

Voila la procedure:

Allez sur cette page

http://www.vtsystems.com/en/products/

et excutez VT TRADER API ca contient le fichier excel et installe les API que le fichier excel a besoin pour communiquer avec le brokers.

Apres l installation vous devez allez dans le repretoire
C:\Program Files\VTAPI\Samples

La, vous trouverez le fichier VABExcelTraders.zip qu il faut decompiler et vous aurez votre fichier excel.

Vous l ouvrez , vous renseignez login et mot de passe et serveur demo.


Voila vous etes connecté


Je me suis reinscrit pour vous donner un mot de passe mais libre a vous de vous inscrire pour avoir votre propre login et mot de passe.

Username: developez
Password: ht9jv6z2

Citation:

---

j'ai rien compris à ton explication Une incrémentation, ok, mais exponentielle... ? Quant à activer le curseur... J'ai beau activer mon curseur...

---

Je vous chambrais c est du n importe quoi :mouarf:

Citation:

---

Envoyé par ouskel'n'or

Au fait, Louis, si tu mets ça, avec Excel 2007, c'est pas bon !
:mouarf::aie::mouarf:

Et puis tu as oublié de compter les lignes qui sont dans Calculate :mouarf:

Edit
Et puis les codes "les plus courts sont les plus faciles à débugger !" C'est pas moi qui l'ai dit mais je pense pareil ! :mouarf:

---

Réponse 1: Bah.. Y aurrai jamais qu'une ligne à ajouter et en plus c'est pas mon problème... J'ai Excel 2000 :langue:
Réponse 2: Ca ne fait jamais que 10, et y a encore moyen d'en supprimé 2, mais ça je te le laisse. :?
Réponse 3: Pour nous !! mais je ne suis pas du tout d'accord quand ont s'adresse à des débutants, le fait de décomposer le code au maximum leurs façilite grandement la compréhention.
Bergoliv , tu m'a pas vexé :evilred::evilred:
C'est avec plaisir que nous te retrouverrons sur le forum, j'ai aprécié ta... répartie. :king:
Si le problème est terminé.. oublie pas le petit :resolu: en bas du topic.
Cordialement à tous.

Je remercie tres sincerement ouskel'n'or et LeForestier pour l attention qu ils m ont donné et leur competence qui a repondu a mes attentes.:king:

Resolut!:yaisse2:

Bonjour tout le monde je suis nouveau développeur Excel pour une banque française.
J'ai une formation mathématiques et financière et j ai fait un peu de java aussi dans mes premières années. Ma mission consiste à développer un programme sur Excel(VBA) en utilisant l API Bloomberg.
Ce programme a pour but de renvoyer le cours d'une action ou d'un indices a partir d'une date précise et jusqu'a aujourd'hui.
Je n’arrive vraiment pas à m'y prendre étant novice sur VBA.
Je suis donc à la recherche de conseils aide ou n'importe quoi d’autre.
Si quelqu'un a déjà programmé un logiciel pareil ou est capable de le faire je suis même prêt a le rémunérer pour qu'il me sauve de ma situation de stress totale


ps: Je n'ai pas le droit d'utiliser la fonction blph de bloomberg...

Tu a mal compris ma réponse, je ne t'ai pas dit de poster içi mais de REGARDER, et éventuellement essayé de te mettre en contact avec bergoliv par MP
A+
et évite

Citation:

---

ps: Je n'ai pas le droit d'utiliser la fonction blph de bloomberg...

---

les 'murs ont des oreilles'.