Bonjour à toutes et à tous,
J'espère que vous allez bien.
J'utilise VBA depuis moins d'un an donc encore débutant... J'apprends beaucoup grâce à vos contributions sur ce forum et la plus part du temps je trouve réponse à mes questions et je vous en remercie Mais aujourd'hui je bloque sur quelque chose de peut être simple pour vous ^^
J'aimerais sélectionner une plage de données variable dans chaque feuille d'un même fichier pour ensuite mettre les sélections sous forme de tableau avec ligne des totaux active (ctrl + L). La première ligne sélectionnée concerne les en-têtes ("A12:DN12") et je souhaiterais étendre la sélection jusqu'à la dernière ligne de données.
Le but ensuite est de mettre sous forme de tableau toutes les sélections dans chacune des feuilles.
Je vous joins ci-dessous le code que j'ai commencé à écrire ainsi qu'un fichier de test.
Sub Layout2()
'Déclaration des variables
Dim feuil As Worksheet
For Each feuil In Sheets
'Condition pour sélection et mise sous forme de tableau
If feuil.Name <> "Sales__YTD - Clt by Brand" Then
Application.DisplayAlerts = False
'Je sais que c'est cette ligne qui me pose problème...
feuil.Range("A12:DN12" & .Rows.Count).End(xlDown).Select
'Ici, j'aimerais mettre sous forme de tableau chaque sélection
'...
Application.DisplayAlerts = True
End If
Next
Application.ScreenUpdating = True
End Sub
Je vous remercie d'avance pour le temps que vous me consacrerez et pour l'aide précieuse que vous pourrez m'apporter.
Bien à vous,
Hugues