Bonsoir tout le monde !
J'ai deux petits problèmes sur cette macro:
1 - si je supprime tout le contenu à partir de la ligne 11 et que je lance ma macro en cliquant sur Get Quotes, j'obtiens le message d'erreur suivant:
et cette partie du code est surlignée en jaune:
Je clique sur DEBUG, j'arrête la macro, je la relance, et là ça fonctionne. ?!
2 - si je séléctionne une date antérieure dans la cellule B2 (je passe par exemple du 01/01/2012 au 01/01/2011). Il y aura plus de prix historiques à afficher et les données descendent plus bas dans les lignes. Le text to column ne fonctionne pas pour les nouvelles lignes. C'est comme si il faisait ctrl + flèche du bas et que cela s'arrêtait à l'ancienne dernière ligne (de la précédente séléction). Idem, je relance la macro, paf le text to column fonctionne.
Pouvez-vous m'aider ? Mon fichier est en PJ
Merci d'avance !!
Tweedi
J'ai deux petits problèmes sur cette macro:
1 - si je supprime tout le contenu à partir de la ligne 11 et que je lance ma macro en cliquant sur Get Quotes, j'obtiens le message d'erreur suivant:
Run Time error '1004':
Microsoft excel can convert only one column at a time. The range can be many rows tall but no more than one column wide. Try again by selection cells in one column only
et cette partie du code est surlignée en jaune:
Selection.TextToColumns Destination:=Range("A11"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=True, Space:=False, Other:=False, FieldInfo _
:=Array(Array(1, 4), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), _
Array(7, 1))
Je clique sur DEBUG, j'arrête la macro, je la relance, et là ça fonctionne. ?!
2 - si je séléctionne une date antérieure dans la cellule B2 (je passe par exemple du 01/01/2012 au 01/01/2011). Il y aura plus de prix historiques à afficher et les données descendent plus bas dans les lignes. Le text to column ne fonctionne pas pour les nouvelles lignes. C'est comme si il faisait ctrl + flèche du bas et que cela s'arrêtait à l'ancienne dernière ligne (de la précédente séléction). Idem, je relance la macro, paf le text to column fonctionne.
Pouvez-vous m'aider ? Mon fichier est en PJ
Merci d'avance !!
Tweedi
Dernière édition: