Discussion :

[GreatDeveloperOnizuka]

Bonjour,

Je fais une macro toute simple sur EXCEL 2003 (enfin je pensais) et voilà qu'on m'affiche des erreurs 1004. Ma petite macro compare la valeur d'une cellule avec la valeur de la cellule se trouvant à la ligne d'avant. Si la valeur est la même, la ligne précédente est supprimée entièrement. Voilà mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Option Explicit
 
 
 
Sub trier()
Dim I, J, K As Integer
 
Worksheets(2).Select
For I = 2 To 7128
    If Cells(2, I + 1) = Cells(2, I) Then
        Cells(2, I).EntireRow.Delete
    End If
Next I
End Sub

L'erreur vient apparament de la condition if.

Merci de votre aide.

[Singular]

Tu compares la cellue de la ligne 2 et colonne I + 1...

[GreatDeveloperOnizuka]

Ah purée de M... j'ai inversé la ligne et la colonne .Merci bien je vais maintenant aller me faier ARAKIRI pour cette erreur aussi débile.

[Singular]

Ça peut arriver à tout l'monde.

Des fois, les yeux regardent mais ne voient pas.