Code VBA pour supprimer toute les lignes d'un tableau
j
Bonjour
S'il vous plait j'ai besoin de votre aide.
J'ai besoin d'un code VBA pour supprimer toutes les lignes d'un tableau excel sauf la première ligne.
le tableau est ci-joint.
Merci d'avance.
Bonjour, sauf la première je suppose celle avec les entêtes ?
Sub Macro1()
'
' Macro1 Macro Vider le tableau
'
Dim maligne As Long
maligne = Range("A65536").End(xlUp).Row ' Test du nombre de lignes que contient le tableau
'
Range("A2:G" & maligne).Select ' Sélection de la plage de A2 à G et nombre de lignes trouvées précédemment.
Selection.ClearContents ' effacement des données de la plage
End Sub