Excel VBA

Sosso -  
Mike-31 Messages postés 19572 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'ai besoin de votre aide !!

J'aimerai créer une macro sous VBA !
Le but est de supprimer une ligne variable dans un classeur.

Si je tape dans la cellule B13 du classeur "Suppression", le nom de famille d'un personne (par exemple Mr X) et bien en cliquant sur le bouton de la macro toute la ligne de Mr X est supprimée dans le classeur "Vivier".

Voilà le début de mon code :

Dim Nomcellule As String
Nomcellule = Range("B13").Value

Sheets("Vivier").Select
Dim Ligne1
Ligne1 = Range("Nomcellule").Row
Rows(Ligne1 & ":" & Ligne2).Select
Selection.Delete Shift:=xlUp
Sheets("SuppressionArchivage").Select
Range("B13").Select
Selection.ClearContents
Range("A17").Select

Merci de votre aide !!!

1 réponse

Mike-31 Messages postés 19572 Date d'inscription   Statut Contributeur Dernière intervention   5 139
 
Salut,

Tu peux faire simple, en supposant que dans ta colonne B de B2 à B1000 tu saisisses le mot Suppression dans une ou plusieurs cellules

Sub supp()
Dim i%
For i = 1000 To 2 Step -1
If Cells(i, 2).Value = "Suppression" Then Rows(i).Delete
Next i
End Sub
0