Langage vba
Résolu
bergnela
Messages postés
3
Statut
Membre
-
néné -
néné -
Bonjour,
je ne suis pas très bon sur le langage vba de excel et j'ai besoin d'aide
j'aimerai creer une macro qui supprime toutes les lignes dont les cellules sont vides. Pour être plus clair, j'ai un tableau et il faut tester la 1ere cellulle de chaque ligne et si cette cellule est vide, alors il faut supprimer toutes la ligne
pouvez vous m'aider en me donnant 2 macro differente : une avec la formule "isempty" ou "isnull" et une avec un = "" ??
merci
voici la macro que j'ai fait et qui ne marche pas!
Sub suppr_ligne_si_cellule_vide()
'marche pas
For i = 100 To 1 Step -1
If (Cells(1, i).Value = "") Then
Rows(i).Select
Selection.Delete
End If
Next i
End Sub
je ne suis pas très bon sur le langage vba de excel et j'ai besoin d'aide
j'aimerai creer une macro qui supprime toutes les lignes dont les cellules sont vides. Pour être plus clair, j'ai un tableau et il faut tester la 1ere cellulle de chaque ligne et si cette cellule est vide, alors il faut supprimer toutes la ligne
pouvez vous m'aider en me donnant 2 macro differente : une avec la formule "isempty" ou "isnull" et une avec un = "" ??
merci
voici la macro que j'ai fait et qui ne marche pas!
Sub suppr_ligne_si_cellule_vide()
'marche pas
For i = 100 To 1 Step -1
If (Cells(1, i).Value = "") Then
Rows(i).Select
Selection.Delete
End If
Next i
End Sub
A voir également:
- Langage vba
- Langage ascii - Guide
- Langage binaire - Guide
- Excel compter cellule couleur sans vba - Guide
- Langage visual basic - Télécharger - Langages
- Vba sleep ✓ - Forum VB / VBA
7 réponses
euh... nan , cela ne marche pas nn +
le pb ac ma macro c'est qu'elle suppr toute mes données sauf celles placées sur la 1ere ligne...
c'est qq peu embetant!!
merci quand mm
le pb ac ma macro c'est qu'elle suppr toute mes données sauf celles placées sur la 1ere ligne...
c'est qq peu embetant!!
merci quand mm
A vue de nez, sans approfondir, il y a une inversion dans la coordonnées de la cellule:Cells(1, i)
avec cette fonction ta variable i pointe la colonne et pas la ligne...
Rappel de la syntaxe: Cells(ligne, colonne)
en corrigeant par Cells(i,1) je ne vois pas pourquoi ca ne fonctionnerai pas...
avec cette fonction ta variable i pointe la colonne et pas la ligne...
Rappel de la syntaxe: Cells(ligne, colonne)
en corrigeant par Cells(i,1) je ne vois pas pourquoi ca ne fonctionnerai pas...
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
essaye cette macro
Sub Macro1()
Application.ScreenUpdating = False
sup_de_ligne:
Range("A65536").Select
Selection.End(xlUp).Select
l1 = Selection.Row()
For l2 = 1 To 65536: If Range("A" & l2).Value = "" Then Exit For
Next l2
If l2 = l1 + 1 Then End
Rows(l2).Delete Shift:=xlUp
GoTo sup_de_ligne
suite:
End Sub
Sub Macro1()
Application.ScreenUpdating = False
sup_de_ligne:
Range("A65536").Select
Selection.End(xlUp).Select
l1 = Selection.Row()
For l2 = 1 To 65536: If Range("A" & l2).Value = "" Then Exit For
Next l2
If l2 = l1 + 1 Then End
Rows(l2).Delete Shift:=xlUp
GoTo sup_de_ligne
suite:
End Sub
