Bonjour le forum,
En faisant l'extraction de données de la feuille1 vers Feuille2 je doir rectifier la ligne 8 de façon d'afficher "=somme de !A41+!A42+!A43+!A45"
là où j'ai ecrit ???????????
Priere m'aider merci
En faisant l'extraction de données de la feuille1 vers Feuille2 je doir rectifier la ligne 8 de façon d'afficher "=somme de !A41+!A42+!A43+!A45"
là où j'ai ecrit ???????????
With Worksheets(1)
For i = 2 To Worksheets.Count
Z = Worksheets(i).Name
If Left(Z, 17) = "Feuille1" Then
.Cells(9 + i, 1) = Z
.Cells(9 + i, 2).Formula = "=" & Z & "!A55"
.Cells(9 + i, 3).Formula = "=" & Z & "!A53"
.Cells(9 + i, 4).Formula = ???????????
ElseIf Left(Z, 17) <> "Feuille1" Then
.Cells(9 + i, 1) = Z
.Cells(9 + i, 5).Formula = "=" & Z & "!J3"
End If
Next i
End With
Priere m'aider merci
Dernière édition: