Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Essaie : Range(ligne & ":" & ligne1).Delete ou Range(ligne + 1 & ":" & ligne1 - 1).Delete Selon que tu veux exclure les bornes Cordialement. Daniel "pascal" a écrit dans le message de news:
Bonjour,
Je cherche à sélectionner des lignes, en partant de 2 variables que j'ai piégées.
Voici ce que j'ai suite à un Cells.Find: ligne = ActiveCell.Cells.Row ActiveCell.SpecialCells(xlLastCell).Select ligne1 = ActiveCell.Cells.Row
Je veux supprimer les lignes entre mes 2 variables. J'ai mis ceci pour une ligne: ' Rows(ligne).Delete
J'ai tenté ceci qui ne fonctionne pas: Rows(ligne& ligne1).Select ou Rows(ligne, ligne1).Select
Je ne trouve pas la syntaxe qui va bien.
Merci d'avance. Pascal
Bonjour.
Essaie :
Range(ligne & ":" & ligne1).Delete
ou
Range(ligne + 1 & ":" & ligne1 - 1).Delete
Selon que tu veux exclure les bornes
Cordialement.
Daniel
"pascal" <pascal@discussions.microsoft.com> a écrit dans le message de news:
5F053A16-BCD6-4AC6-B6BF-6785CBCF0982@microsoft.com...
Bonjour,
Je cherche à sélectionner des lignes, en partant de 2 variables que j'ai
piégées.
Voici ce que j'ai suite à un Cells.Find:
ligne = ActiveCell.Cells.Row
ActiveCell.SpecialCells(xlLastCell).Select
ligne1 = ActiveCell.Cells.Row
Je veux supprimer les lignes entre mes 2 variables.
J'ai mis ceci pour une ligne:
' Rows(ligne).Delete
J'ai tenté ceci qui ne fonctionne pas:
Rows(ligne& ligne1).Select ou Rows(ligne, ligne1).Select
Bonjour. Essaie : Range(ligne & ":" & ligne1).Delete ou Range(ligne + 1 & ":" & ligne1 - 1).Delete Selon que tu veux exclure les bornes Cordialement. Daniel "pascal" a écrit dans le message de news:
Bonjour,
Je cherche à sélectionner des lignes, en partant de 2 variables que j'ai piégées.
Voici ce que j'ai suite à un Cells.Find: ligne = ActiveCell.Cells.Row ActiveCell.SpecialCells(xlLastCell).Select ligne1 = ActiveCell.Cells.Row
Je veux supprimer les lignes entre mes 2 variables. J'ai mis ceci pour une ligne: ' Rows(ligne).Delete
J'ai tenté ceci qui ne fonctionne pas: Rows(ligne& ligne1).Select ou Rows(ligne, ligne1).Select
