Philippe Tulliez

Toutes les macros (procédures Sub) sont visibles dans la liste des macros sauf si elles ont au moins un argument

Pour diverses raisons il est préférable d'en cacher certaines pour éviter par exemple que l'utilisateur lance une macro qui doit être lancée par une autre procédure.

Comment cacher une procédure Sub ?

Il y a plusieurs possibilités

1. Si la procédure est dépourvue d'argument, en ajouter un qui est optionnel.
   Exemple :

...

Par moment nous souhaitons que les utilisateurs ne filtrent que certains champs spécifiques d'une liste, comme illustré ci-dessous.



Pour l'exemple, j'utilise un tableau structuré (ListObject) présent dans la feuille dont le CodeName est shtData

Procédure qui masque les flèches du filtre automatique des colonnes 1, 2, 3, 6 et 7

Code vba :

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

1
2
Sub HideArrowsSomeColumns()
  ' Masquer les flèches de certaines colonnes d'un filtre

...

Lorsque l'on tape du code VBA dans l'éditeur (Visual Basic Editor, celui-ci nous suggère automatiquement les méthodes, propriétés, les valeurs d’énumérations, etc.



et ce à condition d'avoir coché l'option Complément automatique des instruction (Outils/Options... [Editeur])

Il est également possible d'utiliser l'auto-complétion manuellement.
Dans une procédure nommée TestA nous décidons d'utiliser une variable dont ...

Lorsque l'on veut effectuer un copier/coller d'une plage de cellules en VBA et que pour en connaître le code on utilise l'enregistreur de macros, voici le code que l'on reçoit pour la copie de la plage A1:G7 d'une feuille vers la cellule J1 de la même feuille.

Code VBA :

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

1
2
3
4
5
6
7
8
9
Sub Macro1()
'
' Macro1 Macro
'
 Range("A1:D10").Select
 Selection.Copy
 Range("J1").Select
 ActiveSheet.Paste
End Sub

La première chose à faire est ...

Nous sommes régulièrement amenés à remplacer une plage de cellules contenant des formules par leur résultat.
Autrement dit un Copier/Collage spécial–Valeur.
En VBA, après avoir éventuellement utilisé l’enregistreur de macros pour nous aider, nous aurions tendance à utiliser ce code.

Exemple pour la page A1:H100 de la feuille nommée Feuil1

Code VBA :

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

1
2
3
With ThisWorkbook.Worksheets("Feuil1").Range("A1:H100")
.Copy
.PasteSpecial Paste:=xlPasteValues

...