Bonjour a tous
J'ai un petit problème et je fais une fois de plus appel a vous pour progresser et comprendre mes erreurs. J'ai plusieurs feuilles sur lequelles j'ai mis des commentaires. Et je voudrais les regrouper en une seule feuille. (J'ai joint un fichier pour l'exemple).
J'ai essayé ce code qui semble le plus logique de tous ceux que j'avais testé avant et qui eux non plus ne marchaient pas. Pb ca coince encore et je ne vois pas pk.
Pourriez vous m'aider ? Merci bcp
Code :
J'ai un petit problème et je fais une fois de plus appel a vous pour progresser et comprendre mes erreurs. J'ai plusieurs feuilles sur lequelles j'ai mis des commentaires. Et je voudrais les regrouper en une seule feuille. (J'ai joint un fichier pour l'exemple).
J'ai essayé ce code qui semble le plus logique de tous ceux que j'avais testé avant et qui eux non plus ne marchaient pas. Pb ca coince encore et je ne vois pas pk.
Pourriez vous m'aider ? Merci bcp
Code :
Sub Commentaires()
Dim I As Integer
Dim J As Integer
For I = 10 To 73
For J = 24 To 100
If Sheets("Commentaires1").Cells(I, 8).Value = True Then
Sheets("Récapitulatif").Cells(J, 7).Value = Sheets("Commentaires").Cells(I, 8).Value
End If
Next J
Next I
End Sub