Merci clarisse pour ton aide,
En fait j'ai posé la question car le code que j'avais tapé me fait une erreur. Je voulais être certain de ce que j'avais. N'ayant plus utilisé excel depuis qq mois..
En fait j'ai une erreur indice en dehors de la plage, voici mon code :
Private Sub CommandButton1_Click()
Dim i As Integer
Sheets('Feuil1').Select
For i = 6 To 13
If Cells(i, 1) < Cells(2, 2) Then
Range(ActiveCell(i, 1), ActiveCell(i, 9)).Select
Selection.Copy
Sheets('Feuil11').Select
Rows('10:10').Select
Selection.insert Shift:=xlDown
Application.CutCopyMode = False
Else
Exit Sub
End If
Next
End Sub
Je fais une comparaison de date dans mon tableau de la feuil1. Si la date de ma ligne est inférieur à la date du jour, je copie/colle la ligne dans le tableau de la feuil11, qui me sert d'historique.
Il me surligne en jaune la ligne 'Sheets('Feuil1').Select' et me dit erreur d'execution 9 : indice en dehors de la plage.
Je ne sais pas d'où celà peut venir..
Merci de votre aide