Discussion :

[robinet sauvage]

Bonjour tout le monde,
Es ce que quelqu'un sait comment on pourrait supprimer tout les donner d'une colonne, sauf la première ligne, juste en cliquant sur le bouton de commande.
Merci pour votre aide.


Exemple supprimé tout ce qui est en jaune, juste en cliquant sur clean.

[michael9431]

Bonjour,

essaye ce code ça devrait fonctionner

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("a2", Cells(Application.WorksheetFunction.CountA(Range("A:A")), Application.WorksheetFunction.CountA(Range("1:1")))).Delete

bonne journée

[robinet sauvage]

Bonjour michael9431
Merci pour votre réponse
Quand j'applique le code, cela me supprime ligne par ligne, est il possible de tout supprimer d'un coup, et sur plusieurs feuilles différentes ?

[Philippe Tulliez]

Bonjour,
Rien de plus simple si vous utilisez les tableaux structurés d'excel

Voici un exemple de la suppression du contenu de la colonne nommée CA de la table nommée t_Ventes

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub t()
  With Range("t_Ventes").ListObject
  .ListColumns("CA").DataBodyRange.ClearContents
  End With
End Sub

[robinet sauvage]

bonjour Philippe Tulliez,
merci pour votre réponse, je vais regarder tout ça ce soir.