XL 2019 vba supprimer une ligne

frederio

XLDnaute Impliqué
Bonsoir a tous

Tu vous connais comment faire un code vba ?

Si tu veux être d’accord avec moi ??? vous m’aidez a expliqué comme Excel Merci


Sur feuille "SAISON"

Supprimer des lignes une tableau

=B3:G308

COPIER /COLLER DES DONNEES

1) copie =I3:N308

2) coller =B3063
 

Pièces jointes

  • un code vba.xlsm
    826.5 KB · Affichages: 6

frederio

XLDnaute Impliqué
c est faute !

VB:
Private Sub CommandButton3_Click()
Application.ScreenUpdating = False
If Range("Tbl_Saison_2").ListObject.DataBodyRange Is Nothing Then Exit Sub    'Tableau vide
If Range("Tbl_Saison_2").ListObject.ListColumns(1).Range.SpecialCells(xlCellTypeVisible).Count > 1 Then
    ListObjects(1).DataBodyRange.Copy ListObjects(2).ListRows.Add.Range
    ListObjects(1).DataBodyRange.Delete
End If

For i = 309 To 1 Step -1
    ListObjects(2).ListRows(i).Delete
Next i
End Sub
 

Statistiques des forums

Discussions
312 895
Messages
2 093 385
Membres
105 715
dernier inscrit
Yoenai