OVH Cloud OVH Cloud

CommandBars

3 réponses
Avatar
EG
Bonjour,

Est-il possible de savoir quels sont les CommandBars qui
sont visibles car je ne sais pas ce que chacun des
usagers utilise ?

Merci !

3 réponses

Avatar
michdenis
Bonjour EG


'--------------------------
Sub ListeBarreOutilsVisible()

For Each c In Application.CommandBars
If c.Visible = True Then
Message = Message & c.NameLocal & vbCrLf
End If
Next
MsgBox Message
End Sub
'--------------------------



Salutations!



"EG" a écrit dans le message de news:227801c49a8f$5dafce20$
Bonjour,

Est-il possible de savoir quels sont les CommandBars qui
sont visibles car je ne sais pas ce que chacun des
usagers utilise ?

Merci !
Avatar
EG
Juste une question.
Je dim mais variable alors que représente c

Dim c as ?????

Merci.
-----Message d'origine-----
Bonjour EG


'--------------------------
Sub ListeBarreOutilsVisible()

For Each c In Application.CommandBars
If c.Visible = True Then
Message = Message & c.NameLocal & vbCrLf
End If
Next
MsgBox Message
End Sub
'--------------------------



Salutations!



"EG" a écrit dans
le message de news:227801c49a8f$5dafce20

$
Bonjour,

Est-il possible de savoir quels sont les CommandBars qui
sont visibles car je ne sais pas ce que chacun des
usagers utilise ?

Merci !


.



Avatar
michdenis
Bonjour EG,

Dim C As CommandBar


Salutations!



"EG" a écrit dans le message de news:22c601c49a94$7ed96430$
Juste une question.
Je dim mais variable alors que représente c

Dim c as ?????

Merci.
-----Message d'origine-----
Bonjour EG


'--------------------------
Sub ListeBarreOutilsVisible()

For Each c In Application.CommandBars
If c.Visible = True Then
Message = Message & c.NameLocal & vbCrLf
End If
Next
MsgBox Message
End Sub
'--------------------------



Salutations!



"EG" a écrit dans
le message de news:227801c49a8f$5dafce20

$
Bonjour,

Est-il possible de savoir quels sont les CommandBars qui
sont visibles car je ne sais pas ce que chacun des
usagers utilise ?

Merci !


.