PB : avec Cours de la Bourse : Besoin d'aide

C

Compte Supprimé 979

Guest

• 10 Février 2008

• #2

Re : PB : avec Cours de la Bourse : Besoin d'aide

Salut Fd.30

Apparemment des menus ont été rajoutés sur MSN

Il faut donc changé la ligne Set Cible par :
Set Cible = Range("A1:M300").Find(Quoi, LookIn:=xlValues)

J'ai testé de nouveau, chez moi ça fonctionne avec ce code.

Voilà 😉

 

Vote positif 0 Vote négatif

F

fd.30

XLDnaute Junior

• 11 Février 2008

• #3

Re : PB : avec Cours de la Bourse : Besoin d'aide

Bonjour Bruno,

Un très grand merci pour ton aide; j'ai essayé çà fonctionne parfaitement bien.

C'était pas évident pour moi, çà me dépanne bien.

A bientôt et encore merci.

FD

 

Vote positif 0 Vote négatif

P

psmadja

Guest

• 5 Avril 2009

• #4

Re : PB : avec Cours de la Bourse : Besoin d'aide

Bonjour Bruno,

J'ai le même problème et j'ai appliqué la modification que tu a proposé.

"Il faut donc changé la ligne Set Cible par :
Set Cible = Range("A1:M300").Find(Quoi, LookIn:=xlValues)"

Pour ma part j'obtiens de cellules vides en colonne G.

Y a t-il eu une nouvelle modification du site ?

Merci d'avance pour ton aide.

Très cordialement.

Pat.

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 5 Avril 2009

• #5

Re : PB : avec Cours de la Bourse : Besoin d'aide

Salut Psmadja, bienvenue sur le forum

Effectivement, je pense que le site à encore changé 😛

J'ai donc complètement refondu le code pour qu'il soit plus compréhensible
et modifié ce qui n'allait pas, en l'occurence la cellule "cible" n'était plus bonne.

Ci-joint le fichier testé et qui fonctionne 😀

Je pense que sur le site il y en a d'autre, peut-être mieux fait 😉

A+

 

Pièces jointes

• Cours MSN V20090405.xls

  49 KB · Affichages: 727

Vote positif 0 Vote négatif

T

TOMSEND

Guest

• 27 Mars 2010

• #6

Re : PB : avec Cours de la Bourse : Besoin d'aide

Genial merci a tous, ce petit fichier excel est vraiment excellent !!!!!!

 

Vote positif 0 Vote négatif

X

Xxaann

XLDnaute Occasionnel

• 10 Mai 2010

• #7

Re : PB : avec Cours de la Bourse : Besoin d'aide

Bonjour,

Vraiment sympa ce programme.
Par contre, un truc que je ne pige pas...

Si vous prenez des codes Isin non FR cela ne marche pas...
BE0003801181 Fortis
LU0307198241 arcelormittal

Sinon, c'est tip top; mais là c'est pô cool pour moi, j'ai des actions belges (vous savez celles qui sont passées de 30€ à 2€ en quelques mois... snifff....)

 

Vote positif 0 Vote négatif

Guizbizet

XLDnaute Nouveau

• 6 Septembre 2010

• #8

Re : PB : avec Cours de la Bourse : Besoin d'aide

Bonjour,

J'ai téléchargé la macro pour récupérer les cours de bourse via excel de BrunoM45, que je remercie au passage.
J'ai adapté la macro à ma feuille en changeant seulement dans cette macro :
- le nom de la feuille : Set ShtV = Sheets("Valo") par Set ShtV = Sheets("Patrimoine")
- l'effacement des données dans la colonne de mon fichier :
.Range("G3:G" & DerLigV).ClearContents par .Range("G24:G" & DerLigV).ClearContents et For LigV = 3 To DerLigV par For LigV = 24 To DerLigV
- la date de mise à jour des cours : .Range("E1").Value = Format(Now(), "mm/dd/yyyy") par .Range("B21").Value = Format(Now(), "mm/dd/yyyy")

Tout se passe bien jusqu'à une 'Erreur d'exécution 5" Argument ou appel de procédure incorrect et quand j'ouvre le débogeur il m'indique la ligne : .Range("G" & LigV).Value = Left(ValAdr, InStr(1, ValAdr, " ") - 1)
Je ne vois pas ce qui ne colle pas et qui marche dans le fichier de BrunoM45

Pourriez vous m'éclairer peut être.
Merci d'avance

 

Vote positif 0 Vote négatif

Guizbizet

XLDnaute Nouveau

• 6 Septembre 2010

• #9

Re : PB : avec Cours de la Bourse : Besoin d'aide

Pour illustrer mon propos, voici le fichier concerné

 

Pièces jointes

• Guizbizet_bourse.zip

  18.1 KB · Affichages: 211

Vote positif 0 Vote négatif

M

mercant76

XLDnaute Impliqué

• 6 Septembre 2010

• #10

Re : PB : avec Cours de la Bourse : Besoin d'aide

bonjour,

j'ai excel 2000, j'ai essayé ton fichier : çà marche.

j'ai ajouté 3 valeurs et j'ai bien récupéré les cours.

@+

edit : au fait, pour les sous totaux, en premier, c'est plutôt 9 à mettre que 109 ( les possibilités vont de 1 à 11.

@+

 

Dernière édition: 6 Septembre 2010

Vote positif 0 Vote négatif

Guizbizet

XLDnaute Nouveau

• 6 Septembre 2010

• #11

Re : PB : avec Cours de la Bourse : Besoin d'aide

et tu n'as pas eu d'erreur ?
parce que moi ça bloque juste avant d'inscrire la date de MAj des cours

 

Vote positif 0 Vote négatif

M

mercant76

XLDnaute Impliqué

• 6 Septembre 2010

• #12

Re : PB : avec Cours de la Bourse : Besoin d'aide

bonjour,

je n'avais pas fais attention à la date, mais en refaisant, voilà la copie d'écran.

@+

 

Pièces jointes

• copec.zip

  39.5 KB · Affichages: 118

Vote positif 0 Vote négatif

Guizbizet

XLDnaute Nouveau

• 6 Septembre 2010

• #13

Re : PB : avec Cours de la Bourse : Besoin d'aide

pour info il semble que ça plante quand on a la ligne des totaux d'un tableau en bas
mercant76 : as tu cette ligne qui apparait, je ne la voit pas sur ton image

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 6 Septembre 2010

• #14

Re : PB : avec Cours de la Bourse : Besoin d'aide

Bonjour,

Guizbizet, tu te sers dans le fichier joint de formulaires 😕
Le code n'est pas vraiment prévu pour ça, mais bon

Sinon dans ton tableau tu as "Action 3" sans référence Isin, ce qui est la source de l'erreur

A+

Nota : à la base je n'ai pas créé ce fichier, il se trouve dans la partie téléchargement du site. Je l'ai juste adapté

 

Vote positif 0 Vote négatif

Guizbizet

XLDnaute Nouveau

• 7 Septembre 2010

• #15

Re : PB : avec Cours de la Bourse : Besoin d'aide

BrunoM45 à dit:

Bonjour,

Guizbizet, tu te sers dans le fichier joint de formulaires 😕
Le code n'est pas vraiment prévu pour ça, mais bon

Cliquez pour agrandir...

de formulaires ? A part mon bouton de MAJ des cours je ne vois pas !

BrunoM45 à dit:

Sinon dans ton tableau tu as "Action 3" sans référence Isin, ce qui est la source de l'erreur

Cliquez pour agrandir...

ok mais comme il y a un tableau avec la ligne de total, ça fait l'erreur d'exécution , finalement je ne l'affiche pas et je fait un total en dessous du tableau avec une ligne vide séparatrice et tout fonctionne à merveille 🙂

BrunoM45 à dit:

Nota : à la base je n'ai pas créé ce fichier, il se trouve dans la partie téléchargement du site. Je l'ai juste adapté

Cliquez pour agrandir...

J'avais bien compris, mais merci pour l'adaptation

 

Vote positif 0 Vote négatif