Sujet Précédent Sujet Suivant

Effacer une ligne à partir d'une cellule

Fermé
Mr bruce - 15 nov. 2010 à 09:55
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 15 nov. 2010 à 13:39
Bonjour,
je voudrais pourvoir effacer une ligne d'une liste a partir d'une cellule, c a dire, en écrivant une référence dans une cellule et en appuyant sur un bouton, que dans la liste, les lignes ou se trouve la même référence que dans la cellule soient effacer. Avec visual Basic. Merci de votre aide c important.

1 réponse

Réponse 1 / 1
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 302
15 nov. 2010 à 11:47
Bonjour, 

Const cellule As String = "C2" 'cellule d'appel
Const col As String = "A" 'colonne de la liste

Sub supprimer_ligne()
valeur = Range(cellule)
nbre = Application.CountIf(Columns(col), valeur)
lig = Cells.Rows.Count
Application.ScreenUpdating = False

For cptr = 1 To nbre
    lig = Columns(col).Find(valeur, Cells(lig, col), xlValues, xlWhole).Row
    Rows(lig).Delete
    lig = lig - 1
Next

End Sub
0
Mr bruce
15 nov. 2010 à 12:38
Merci bien, et maintenant je voudrai à partir de ce bouton dans une feuille, pourvoir efface une ligne d'une liste se trouvant dans une autre feuille.
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 302
15 nov. 2010 à 13:39
Il faut bien te rendre compte que ce que tu demandes n'est pas forcément facile et que personne ne veut passer parfois plusieurs heures à essayer de résoudre un problème bénévolement pour se voir dire après coup « et maintenant, je voudrai que.... »

Abandon du suivi
0

Discussions similaires

Annuaire portable gratuit à partir d'un nom
dani26 -
Authority -

9 réponses
Chemin Logo du site de la Cité de l'espace
Keiios -
blux -

11 réponses
Comment trouver un numéro à partir du nom et prénom
papillon -
guyguy -

10 réponses
Que veut dire "correspondant occupé" lors d'un appel ?
veroaaa -
Pat -

10 réponses