VBA: feuilles différentes

NNBBVV Messages postés 7 Statut Membre -  
NNBBVV Messages postés 7 Statut Membre -
Bonjour,

fichier excel:
- 43 bilans comptables (i=1 to 43) sur 7 années (j=1 to 8)

Le ROA (Retrun On Asset se trouve sur une cellule différente d'une feuille à l'autre.
Je souhaiterai avoir le résultat suivant sur la feuille 44:

1 2 3 4
A 31/12/08 31/12/07 31/12/06
B ROA_firme1 nombre1 nombre2 ......
C ROA_firme2
D

Mon modèle:

Sub ROA()

Dim nombre As Double
Dim i, j As Integer
Dim K As Long

For i = 1 To 43

For K = 700 To 800
If Worksheets(i).Cells(K, 1) = "12. Return on total assets (%)" Then

For j = 2 To 8
nombre = Worksheets(i).Cells(K, j)

Worksheets(44).Cells(i, j) = nombre

Next j

End If
Next K

Next i

End Sub

Il me dit que "L'indice n'appartient pas à la sélection"
Pourquoi?????
Merci pour toute aide

2 réponses

  1. NNBBVV Messages postés 7 Statut Membre
     
    Tout ca devenait trop complique pour moi
    J'ai rassemblé toutes les données via VBA sur la dernière feuilles
    et j'ai ensuite réalisé mes ratios manuellement sur la dernière feuille

    Je te remercie d'avoir essayé,

    mais je n'ai pas compris tu attendais quoi
    juste des remerciements??

    La dernière phrase de mon mail que je t'avais envoyé ci-dessous:

    dfLT et d = entier
    Par contre, j'ai essayé de faire tourner mais ily a un message d'erreur
    "Dépassement de capacité"
    Cela signifie?????

    Sub est-il capable de réaliser un calcul??
    Je pensais que c'était avec "Function".

    Merci pour ton aide

    Ou alors tu attendais quoi?????????????????
    Je n'ai jamais utilisé aucun forum de ma vie
    Mais la j'ai vraiment des problèmes, donc pas le choix...
    0