Empêcher l'ajout d'une feuille

Jacques25 · 16 Décembre 2014

Bonjour à tous,

Afin de brider un fichier pour limiter son utilisation je souhaiterai interdire l'ajout d'onglet. Est ce que c'est possible et si oui commetn?

merci de votre aide.

Bonne journée.

Jack

camarchepas · 16 Décembre 2014

Re : Empêcher l'ajout d'une feuille

Bonjour ,

Oui , en protégeant la structure du classeur,

pour Excel 2010 : Menu Fichier
information,
protéger le classeur
puis protéger la structure du classeur ,

et voilà

Scoobidoo · 16 Décembre 2014

Re : Empêcher l'ajout d'une feuille

Bonjour Jacques25,

Pour ma part, j'utilise ce code placé dans ThisWorkbook:

Code:

Private Sub Workbook_NewSheet(ByVal Sh As Object)

    If Worksheets.Count > 3 Then

        Application.DisplayAlerts = False
        'supprime la nouvelle feuille
        Sh.Delete
        MsgBox "Désolé, l'ajout de feuille n'est pas possible !", _
               vbExclamation, _
               "ACTION NON AUTORISEE."
        Application.DisplayAlerts = True

    End If
    
End Sub

Dans cet exemple, le nombre de feuille du classeur est limité à 3.

A+

Scoobidoo

Jacques25 · 16 Décembre 2014

Re : Empêcher l'ajout d'une feuille

Bonjour Nono,Scoobidou,

Merci pour vos réponses, j'ai pas testé la macro mais je le garde, selon les cas j'aurai besoin de l'une ou l'autre des solutions.

Encore merci.
Bonne fin de journée.

Jack

Empêcher l'ajout d'une feuille

Jacques25

XLDnaute Occasionnel

camarchepas

XLDnaute Barbatruc

Scoobidoo

XLDnaute Occasionnel

Jacques25

XLDnaute Occasionnel

Discussions similaires

Empêcher l'ajout d'une feuille

Jacques25

XLDnaute Occasionnel

camarchepas

XLDnaute Barbatruc

Scoobidoo

XLDnaute Occasionnel

Jacques25

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency