XL 2016 Rendre inactif le bouton affiché liste macro.

soan à dit:

maintenant, si vraiment tu veux inverser, tu peux mettre :

VB:

Sub Onglet_visible(Flg As Boolean)
  ActiveWindow.DisplayWorkbookTabs = Not ActiveWindow.DisplayWorkbookTabs
End Sub

Sub Essai()
  Onglet_visible 0
End Sub

à chaque fois que tu exécuteras la sub Essai(), les onglets seront successivement masqués puis affichés ; remarque : le 0 n'est pas une erreur : c'est l'équivalent de False ; j'aurais aussi pu mettre Onglet_visible -1 car -1 est l'équivalent de True ; et de toutes façons, 0 ou 1, peu importe puisque Flg est un argument bidon car non utilisé dans la sub Onglet_visible().​

soan

Cliquez pour agrandir...

Sub Onglet_visible(Flg As Boolean)
  ActiveWindow.DisplayWorkbookTabs = True
End Sub
Sub Essai()

  Onglet_visible 0

End Sub

patricktoulon à dit:

tiens regarde

VB:

Function Onglet_visible()
  ActiveWindow.DisplayWorkbookTabs = Not ActiveWindow.DisplayWorkbookTabs
End Function

Sub Essai()
  Onglet_visible
End Sub

tu ne verra pas onglet_visible dans la liste de macro mais si tu lance la sub essai ca marchera

comme chez renault c'est simple

bonsoir Soan

Cliquez pour agrandir...

soan à dit:

bon, alors dans ce cas, il faudrait un mot de passe que toi seul connaît.

VB:

Option Explicit

Dim pwd$ 'password = mot de passe

'mettre du code VBA pour initialiser pwd selon l'utilisateur qui est connecté ;
'si c'est toi en tant qu'Administrateur qui t'es connecté : pwd = "loup"

Sub Onglet_visible()
  If pwd = "loup" Then ActiveWindow.DisplayWorkbookTabs = True
End Sub

ainsi, la sub affichera les onglets uniquement si c'est toi qui est connecté ; si une autre personne s'est connectée (donc avec un autre mot de passe que le tien), le test pwd = "loup" sera faux et l'instruction d'affichage des onglets ne sera pas exécutée.​

soan

Cliquez pour agrandir...

soan à dit:

ok, donc la solution de patrick était la bonne ! ➯ problème réglé !

---

mon code VBA n'était qu'un exemple à compléter pour faire ce qui était écrit en commentaire : une gestion des mots de passe selon la personne connectée ; si toi = Administrateur, alors pwd = "loup" ; pour d'autres utilisateurs, d'autres mots de passe ; mais ça sort du cadre de ce fil.

sans cette gestion des mots de passe, c'est tout à fait normal que mon code VBA ne fait rien ! ​

soan

Cliquez pour agrandir...

soan à dit:

mais je croyais que le problème était réglé, avec la solution de patrick ; c'est pas le cas ?

soan

Cliquez pour agrandir...

BrunoM45 à dit:

Bonjour le fil,

Je n'ai pas lu/compris toute la discussion mais apparemment c'est réglé

Nota : tout ça pour simplement ne pas lancer une macro via le bouton

Cliquez pour agrandir...