Bonjour à tous:
pour faire simple, j'importe à l'aide d'une macro des données financières d'un site web sous Excel puis je copie certaines valeurs, toujours avec une macro, sur une autre feuille.
extrait de la macro:
For ligne = 1 To 1000
If Left(Sheets("TEMP").Cells(ligne, 2), 23) = "Consommation Défensive" Then
Sheets("xxx").Cells(35, 2) = Sheets("TEMP").Cells(ligne + 0, 3)
Sheets("xxx").Cells(32, 2) = Sheets("TEMP").Cells(ligne + 0, 2)
End If
Next
le problème c'est que dans les données importées par ma 1ère macro sur la feuille "TEMP", j'ai une case nommée "Consommation Défensive" (celle qui m'intéresse) et une autre quelques lignes plus bas nommée "Consommation DéfensiveConsommation Défensive". Bien sur que fait ma macro ? elle importe la deuxième valeur !! (celle qui ne m'intéresse pas).
Ma question est la suivante: comment identifier sans ambiguité la case "Consommation Défensive" ?
adresse url des données importées : Aberdeen Global - Emerging Markets Equity Fund E2|LU0498181733
celui qui me trouve une solution sera déclaré Héro du jour
Merci d'avance
Arno.
pour faire simple, j'importe à l'aide d'une macro des données financières d'un site web sous Excel puis je copie certaines valeurs, toujours avec une macro, sur une autre feuille.
extrait de la macro:
For ligne = 1 To 1000
If Left(Sheets("TEMP").Cells(ligne, 2), 23) = "Consommation Défensive" Then
Sheets("xxx").Cells(35, 2) = Sheets("TEMP").Cells(ligne + 0, 3)
Sheets("xxx").Cells(32, 2) = Sheets("TEMP").Cells(ligne + 0, 2)
End If
Next
le problème c'est que dans les données importées par ma 1ère macro sur la feuille "TEMP", j'ai une case nommée "Consommation Défensive" (celle qui m'intéresse) et une autre quelques lignes plus bas nommée "Consommation DéfensiveConsommation Défensive". Bien sur que fait ma macro ? elle importe la deuxième valeur !! (celle qui ne m'intéresse pas).
Ma question est la suivante: comment identifier sans ambiguité la case "Consommation Défensive" ?
adresse url des données importées : Aberdeen Global - Emerging Markets Equity Fund E2|LU0498181733
celui qui me trouve une solution sera déclaré Héro du jour
Merci d'avance
Arno.