Bonjour,
Je débute en VBA, et je souhaiterais faire un script qui nomme une plage de données identique (de A1 jusqu'à C11) sur différentes feuilles en reprenant le nom de la feuille contenue dans mon classeur, à l'exception de 2 feuilles.
J'ai visualisé le programme après avoir exécuté une macro mais le problème étant qu'il s'exécute pour une feuille précise.
Voici ci-dessous le script que j'ai fait mais qui ne fonctionne malheureusement pas!
Si quelqu'un pourrait m'aider à résoudre ce problème
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub plage_de_donées() Dim sht As Worksheet 'déclare la variable o (Onglet) For Each sht In Sheets 'boucle sur tous les onglets du classeur Select Case sht.Name 'agit en fonction du nom de l'onglet Case "Données" 'pour ce cas là pas d'action Case "Mise en forme" 'pour ce cas là pas d'action Case Else 'pour tous les autres cas nom_feuille = sht.Name Range("A1:C11").Select ActiveWorkbook.Names.Add Name:=nom_feuille, RefersToR1C1:="=ActiveSheet!R1C1:R11C3" Next sht End Sub
Merci d'avance pour vos réponses
Cordialement
Partager