Constante publique pour nommer les feuilles

Bonjour,

dans mon projet, je navigue beaucoup avec les feuilles ; je voudrais donc déclarrer toutes mes feuilles avec des abréviations pour raccourcir mon code.

Questions :

Si je les déclare en dessous de Option Explicit dans le module 1 (par ex), seront-elles opérationnelles même dans les UsF ?

J'ai voulu faire cette déclaration

public const sH_1 as Worksheet = worksheets("Feuil1")

mais Worksheet (après As) est surligné avec le message "Erreur de compil : attendu : Nom de Type"

coment dois-je m'y prendre svp.

Merci

Bonjour

Tu peux faire plus simple en prenant le réelle de la feuille dans VBA Project

  • va dans l'éditeur VBE
  • Affiche à gauche VBA Project. Là tu vois tes onglets nommés entre paranthèses et Thisworkbook

Cela te donné par exemple pour 3 feuilles nommées Tata, titi, tutu dans ton classeur

  • feuil1(tata)
  • feuil2(Titi)
  • feuil3(tutu)
  • Thisworkbook

Utilise simplement dans tes codes Feuil1, Feuil2 ou Feuil3. cela te permet de garder le contrôle sur tes codes et fonctionera partout.

exemple de code pour activer la feuile 2

Sub Test
Feuil2.activate
End sub

Par rapport à ta demande, il faut pratiquer autrement car tu peux pas déclarer l'objet dans une constante mais une valeur ou un nom. Tu peux essayer ausi comme ceci avec Tata le nom de ton onglet.

Public Const sH_1 as string = "Tata"
Sub test()
Sheets(sH_1).Activate
End Sub

Amicalement

Merci Dan,

C'est parfait

Rechercher des sujets similaires à "constante publique nommer feuilles"