Bonjour j'ai un problème avec le code suivant:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Sub branche()
Dim k, i As Long
For k = 4 To 33
For i = 2 To 30
Worksheets("BRAN").Cells(k, i + 2) = Worksheets(i).Cells(k + 2, 4) + Worksheets(i).Cells(k + 2, 8)
Next i
Next k
End Sub
J'ai un classeur contenant une feuille "BRAN" et d'autres dont les noms sont 1,2,....,29 et je veux sommer les valeurs de certaines cellules des feuilles 1,2,....,29 et les déverser dans des cellules de la feuille "BRAN" mais VBA m'affiche ERREUR INCOMPATIBILITE DE TYPE.
Merci de m'aider.