Discussion :

[vivi4561]

Bonjour,
J'aurai aimé créer sous excel une macro capable :
- de regarder toutes les cases d'une colonne (ex : de A3 à A30000) et de supprimer la case si aucune valeur n'y est inscrite.

Avez vous une idée de comment faire ?

Je sais qu'il faudrait utiliser la boucle for mais après .....

Cordialement

[jfontaine]

Bonjour,

Ci dessous un code qui fait ce que tu souhaites

Astuce : pour ne pas avoir une boucle sans fin, j'utilise une variable j pour lire 30000 ligne et une variable i pour savoir sur quelle ligne je traite.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim i As Long
Dim j As Long
 
i = 1
 
For j = 1 To 30000
 
    If Range("A" & i).Value = "" Then
        Range("A" & i).Delete
    Else
        i = i + 1
    End If
 
Next j

[vivi4561]

C'est nikel.
Merci bcp pour cette précieuse aide.


Cdlt