Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Selectionner toute la ligne de ActiveCell

Selectionner toute la ligne de ActiveCell

2 réponses
Avatar
ManBas
Bonjour à tous,
Je voudrais sélectionner toute la ligne de activecell, afin de la
supprimer.Je n'arrive pas à la définir convenablement en VB: une erreur de
type 13 survient avec mon code.
Dim ligne As Integer
Sheets("feuil1").Select
ligne = ActiveCell.row
Rows("ligne:ligne").Select
Selection.Delete Shift:=xlUp

Est-ce que quelqu'un veut bien corriger mon code SVP?
Merci d'avance.
Signaler un problème avec ce contenu

2 réponses

Supprimer
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
Avatar
ru-th
Salut

rows(ActiveCell.row).delete

a+
rural thierry
"ManBas" a écrit dans le message de news:

Bonjour à tous,
Je voudrais sélectionner toute la ligne de activecell, afin de la
supprimer.Je n'arrive pas à la définir convenablement en VB: une erreur de
type 13 survient avec mon code.
Dim ligne As Integer
Sheets("feuil1").Select
ligne = ActiveCell.row
Rows("ligne:ligne").Select
Selection.Delete Shift:=xlUp

Est-ce que quelqu'un veut bien corriger mon code SVP?
Merci d'avance.




Avatar
ManBas
Et ça marche en 1 ligne.
Merci Ru-TH!!
"ru-th" a écrit dans le message de news:
%
Salut

rows(ActiveCell.row).delete

a+
rural thierry
"ManBas" a écrit dans le message de news:

Bonjour à tous,
Je voudrais sélectionner toute la ligne de activecell, afin de la
supprimer.Je n'arrive pas à la définir convenablement en VB: une erreur
de
type 13 survient avec mon code.
Dim ligne As Integer
Sheets("feuil1").Select
ligne = ActiveCell.row
Rows("ligne:ligne").Select
Selection.Delete Shift:=xlUp

Est-ce que quelqu'un veut bien corriger mon code SVP?
Merci d'avance.