P
Philippe
Guest
Comment supprimer des lignes à partir d'une ligne aléatoire selon les informations qui sont enregistrées :
Rows("23:65536").Select
Selection.Delete Shift:=xlUp
La ligne 23 pourrait très bien être la ligne 30 ou 15, en fait on atteint la dernière ligne par :
Range("A1).Select
Selection.SpecialCells(xlCellTypeLastCell).Select
ActiveCell.Offset(rowOffset:=1).Activate
ActiveCell.EntireRow.Select
Mais à partir de là je ne sais pas comment faire pour sélectionner toutes les lignes à partir de celle sélectionnée par l'Offset.
Merci pour les réponses.
Rows("23:65536").Select
Selection.Delete Shift:=xlUp
La ligne 23 pourrait très bien être la ligne 30 ou 15, en fait on atteint la dernière ligne par :
Range("A1).Select
Selection.SpecialCells(xlCellTypeLastCell).Select
ActiveCell.Offset(rowOffset:=1).Activate
ActiveCell.EntireRow.Select
Mais à partir de là je ne sais pas comment faire pour sélectionner toutes les lignes à partir de celle sélectionnée par l'Offset.
Merci pour les réponses.