à quoi y servent tout ces outils de la boite à outils?

[pascal21]

bonsoir
curieux de nature, j'ai farfouillé un peu dans mon excel du coté des barres d'outils
je m'aperçois qu'il y a de très nombreux outils dont je n'ai aucune idée de leur utilité ni même de leur fonctionnement
je suis tombé sur un certain "système moniteur" avec pleins de couleurs tout partout mais sans comprendre à quoi ça sert
quelqu'un à t-il déjà eu l'idée de crée une liste avec un tuto pour chaque outils disponible
au cas où en voila un sujet qu'il est bien et qui pourrait être utile non?

 

[ftho]

Re : à quoi y servent tout ces outils de la boite à outils?

Bonsoir,

Arf...je t'aurais bien répondu mais je ne voudrais pas t'importuner avec ma fumée de cigarette... 😛

N'étant pas rancunier... 😀 il me semble que la liste d'aide intégrée à Excel est déjà fort complète, as-tu essayé F1 ?

A+ 😉

 

[jeanpierre]

Re : à quoi y servent tout ces outils de la boite à outils?

Bonsoir Pascal, ftho,

On peut faire un tuto, encore faudra t-il qu'il soit très exhaustif, entre deux cigarettes....

C'est simple, il faut s'y coller... au délà de l'aide d'excel...

Grognon, des fois, mais jamais rancunier non plus

 

[pascal21]

Re : à quoi y servent tout ces outils de la boite à outils?

bonsoir à vous deux
c'est vrai que ça serait du boulot rien que dans ma liste j'ai 177 outils
sacré tuto en perspective

 

[Staple1600]

Re : à quoi y servent tout ces outils de la boite à outils?

Bonsoir à tous


Si j'ai bien compris

Voici une macro qui liste dans un *.txt
le nom et le faceid des BO.

Option Explicit

Sub listeBO()
On Error Resume Next
Dim oCB As CommandBar
Dim oCBB As CommandBarButton
Dim i As Integer
Dim ii As Integer
Open "C:\FaceIds.txt" For Output As #1
Print #1, Application.Name & " Command Bar Button FaceIds"
Print #1,
For i = 1 To Application.CommandBars.Count
Set oCB = Application.CommandBars(i)
For ii = 1 To oCB.Controls.Count
Set oCBB = oCB.Controls(ii)
Print #1, "Nom Barre outil: [" & oCB.Name & "] Caption du bouton: [" & oCBB.Caption & "] Face ID: [" & oCBB.ID & "]"
Next
Set oCBB = Nothing
Next
Set oCB = Nothing
Close #1
End Sub

 

[pascal21]

Re : à quoi y servent tout ces outils de la boite à outils?

bonjour
j'ai essayé ta macro par curiosité mais je n'arrive pas à la faire fonctionner

 

[Staple1600]

Re : à quoi y servent tout ces outils de la boite à outils?

Bonjour à tous


Et avec cet ajout, cela fonctionne non?

Sub listeBO()
On Error Resume Next
Dim oCB As CommandBar
Dim oCBB As CommandBarButton
Dim i As Integer
Dim ii As Integer
Open "C:\FaceIds.txt" For Output As #1
Print #1, Application.Name & " Command Bar Button FaceIds"
Print #1,
For i = 1 To Application.CommandBars.Count
Set oCB = Application.CommandBars(i)
For ii = 1 To oCB.Controls.Count
Set oCBB = oCB.Controls(ii)
Print #1, "Nom Barre outil: [" & oCB.Name & "] Caption du bouton: [" & oCBB.Caption & "] Face ID: [" & oCBB.ID & "]"
Next
Set oCBB = Nothing
Next
Set oCB = Nothing
Close #1
'chemin correct pour PC sous Windows 98
[COLOR=Red][B] Shell "C:\Windows\Write.exe C:\FaceIds.txt", vbMaximizedFocus[/B][/COLOR]
'ici chemin à adapter sous XP le chemin de Write.exe   (alias Wordpad)
'théoriquement sous XP  (à vérifier)
'[B]C:\Windows\System32\[/B][B]Write.exe[/B]
End Sub

 

[pascal21]

Re : à quoi y servent tout ces outils de la boite à outils?

re

[COLOR=Red]Shell [/COLOR]"C:\Windows\System32\Write.exe"

j'ai activé cette ligne là et rajouté shell
ça lance bien wordpad mais rien ne s'écrit
mais au fait ç'est pour faire quoi ce code
juste lister ou plus que ça?

 

[Staple1600]

Re : à quoi y servent tout ces outils de la boite à outils?

RE


Sur mon poste (XL2000/W98SE)

Cela fonctionne:

Voici le début du fichier:

Microsoft Excel Command Bar Button FaceIds

Nom Barre outil: [Standard] Caption du bouton: [&Nouveau] Face ID: [2520]

Et effectivement cela liste les BO , leur caption et leur FaceId

Pour XP la ligne doit être:
Shell "C:\Windows\System32\Write.exe C:\FaceIds.txt", vbMaximizedFocus

 

[pascal21]

Re : à quoi y servent tout ces outils de la boite à outils?

ça marche
sacrée liste!!!!