Incrémenter une feuille cachée

Bonjour

Je souhaite par le biais d'un formulaire incrémenter une feuille "ListeAherents" qui doit être masquée . dans l'exemple fourni cela fonctionne quand la feuille est visible mais quand je l'a masque cela ne fonctionne plus .

14adherent.xlsm (31.70 Ko)

Il suffit de la rendre visible avant de la mettre à jour avec :

    Dim wS As Worksheet

    Set wS = Sheets("ListeAdherents")
    wS.Visible = True

    ... votre  code ...

au début et de la masquer après le transfert des données avec :

    wS.Visible = False

à la fin.

Merci

Cela fonctionne et dans le cadre d' un fichier protégé on doit certainement rajouter quelque chose ?

Vous parlez de fichier ou d'onglet protégé ?

Le fichier

Le fichier c'est votre classeur. Si j'ai bien compris, vous voulez le protéger pour être le seul à pouvoir l'ouvrir. Dans ce cas, pourquoi masquer l'onglet "ListeAdhérents" ?

Désolé je voulais dire la feuille je veux la protéger l'idée c'est que n'importe qui puisse utiliser le formulaire, mais seules une ou 2 personnes peuvent avoir accès à la liste des adhérents pour des besoin de RGPD

Le plus sûr est de ne permettre à personne (ou presque) de pouvoir accéder à votre code.

Voici comment procéder.

- Développeur...Visual Basic...Options...Outils...Propriétés de VBAProject...
- onglet Protection...Cocher la case "Verrouiller le projet pour l'affichage"
- entrez un mot de passe et son duplicata.
- sauvegardez votre classeur.

Ci-dessous : mdp = toto

14adherent.xlsm (31.43 Ko)
Rechercher des sujets similaires à "incrementer feuille cachee"