Macro pour effacer une ligne
Fermé
manoelinho
Messages postés
46
Statut
Membre
-
aquarelle Messages postés 7181 Date d'inscription Statut Modérateur Dernière intervention -
aquarelle Messages postés 7181 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
j'aimerai savoir comment on peut faire pour pouvoir effacer une ligne par rapport au contenu du cellule.
je précise ma pensée,
je voudrais que quand la cellule A1 affiche faux, la ligne 23 soit effacée dans sa totalité.
est ce que c'est possible?
merci d'avance....
j'aimerai savoir comment on peut faire pour pouvoir effacer une ligne par rapport au contenu du cellule.
je précise ma pensée,
je voudrais que quand la cellule A1 affiche faux, la ligne 23 soit effacée dans sa totalité.
est ce que c'est possible?
merci d'avance....
A voir également:
- Macro pour effacer une ligne
- Partager photos en ligne - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Mètre en ligne - Guide
- Comment effacer une page word - Guide
- Formulaire en ligne de meta - Guide
4 réponses
Salut,
Je m'y connais pas trop en VBA, mais ce que je fais en général, c'est que j'enregistre la macro et après je la modifie.
Dans le cas présent, enregistre une macro, sélectionne la cellule A1, puis supprime la ligne 27. Ensuite tu arrêtes l'enregistrement de la macro et il faudra mettre un truc genre "if Range(A1)="FAUX" then" et là tu mets l'opération que tu as faites.
Je m'y connais pas trop en VBA, mais ce que je fais en général, c'est que j'enregistre la macro et après je la modifie.
Dans le cas présent, enregistre une macro, sélectionne la cellule A1, puis supprime la ligne 27. Ensuite tu arrêtes l'enregistrement de la macro et il faudra mettre un truc genre "if Range(A1)="FAUX" then" et là tu mets l'opération que tu as faites.
voilà qui devrait pouvoir t'aider :
Sub suppression()
If Range("A1").Value = FAUX Then
Rows("23:23").Select
Selection.Delete Shift:=xlUp
End If
End Sub
Sub suppression()
If Range("A1").Value = FAUX Then
Rows("23:23").Select
Selection.Delete Shift:=xlUp
End If
End Sub
Bonsoir,
La discussion étant en double sur le forum, je ferme celle-ci. Merci de continuer sur l'autre : http://www.commentcamarche.net/forum/affich 12404109 excel supprimer une ligne
Cordialement
La discussion étant en double sur le forum, je ferme celle-ci. Merci de continuer sur l'autre : http://www.commentcamarche.net/forum/affich 12404109 excel supprimer une ligne
Cordialement
