Microsoft 365 Création d'un nouvel onglet du ruban en vba et y attacher 4 macros complémentaires (MAC et PC)

[RyuAutodidacte]

Bonjour,

j'ai beau chercher partout mais je ne trouve de solution pour le moment …

Comme l'onglet "Acceuil" qui existe dans le ruban, je cherche à pourvoir créer par vba un nouvel onglet "TOTO" et y insérer 4 macros, provenant d'un complément Excel d'un fichier xlam déjà insérer par macro :

Sub Add_AddIn() 'version Mac (peut être PC aussi pouvez vous confirmer SVP)
Dim addInPath As String
    addInPath = "MonChemin/TEST.xlam"
    AddIns.Add addInPath
    AddIns("TEST").Installed = True '
End Sub

Le but est de pourvoir faire une automatisation d'installation sur plusieurs utilisateurs Mac et PC

merci d'avance pour vos réponses

Ryu

 

[patricktoulon]

re
meet (ancienement duo de google)
fcebook messenger
wattzap
skype je peux utiliser l'app web a la limite

 

[patricktoulon]

l'exemple qui fonctionne sur Mac
le mac sur le quel j'ai essayé il date de 2020

si vraiment tu a des problème on reprendra le projet variable type façon Patrick

 

[patricktoulon]

re

 

[patricktoulon]

re
modele2024
maquette de l'interface ruban pour le CreatorMacRibbonX(ça sera son nom )

 

[RyuAutodidacte]

re
modele2024
maquette de l'interface ruban pour le CreatorMacRibbonX(ça sera son nom )

Re
ok merci je regarde cela
PS : on pourrait choisir le nom ensemble

 

[patricktoulon]

re
ben c'est dans la continuité de l'autre
il sera facilement identifiable

 

[RyuAutodidacte]

re
modele2024
maquette de l'interface ruban pour le CreatorMacRibbonX(ça sera son nom )

j'ai l'impression que les point vert c'est les icones que je n vois pas :

 

[patricktoulon]

re
oui visiblement tu ne les a pas
il faudra changer certains icon dans le ruban
dans les gallery on s'en fout tu le choisi pas c'est tout

 

[RyuAutodidacte]

Patrick, est ce facile d'afficher sur une feuille toutes les icônes + les noms en dessous ??

 

[patricktoulon]

sur Mac c'est quasiment impossible visiblement

 

[RyuAutodidacte]

sur Mac c'est quasiment impossible visiblement

Et sur PC ?

 

[patricktoulon]

sur pc on a les activx et le getimageMso membre de application.commandbars

exemple ici je met l'icone bold dans le activx image1

Sub test()
ActiveSheet.OLEObjects("Image1").Object.Picture = Application.CommandBars.GetImageMso("Bold", 40, 40)
End Sub

ici c'est le smyley

Sub test()
ActiveSheet.OLEObjects("Image1").Object.Picture = Application.CommandBars.GetImageMso("HappyFace", 40, 40)
End Sub

 

[RyuAutodidacte]

Hi Patrick,

j'ai récupéré des icons censé marcher sur Mac :

AddToFavorites
AllCategories
BorderColorPicker
CatalogMergeResultsPreview
ClearAll
CompareProjectsShowLegend
FileSaveAs
FileUpdate
FontDialog
FormControlCheckBox
FormatNumberDefault
FormControlButton
FormatCellsDialog
FormsToolSaveAndClose
FrameCreateAbove
GroupBlogInsertText
GroupBy
GroupTextBreak
IncludeInNavigationBars
HorizontalSpacingIncrease
LineSpacing
ListView
Magnifier
MailMergeUpdateLabels
MicrosoftExcel
MergeOrSplitCells
NewPivotTableStyle2
ObjectAlignMenu
ObjectBringForward
ObjectBringToFront
ObjectsAlignDistributeHorizontallyRemove
ObjectsAlignDistributeVerticallyRemove
SelectRow
SelectCell
SelectColumn
ShapeEffectsMenu
SlidesPerPage9Slides
SmartArtAddBullet
SmartArtStylesGallery
SourceControlUndoCheckOut
SpacingDouble
SpacingOneAndHalf
SpacingSingle
TableStyleClear
TableStyleClear
TextEffectsGallery
ThemeSaveCurrent
ViewHandoutMasterView
ViewNotesMasterView
VisualBasic
WordArtClear
WindowMinimize
WindowClose
TextBoxInsertExcel

 

[patricktoulon]

Bonjour
sérieux c'est tout ce qui a ?
si c'est ça ca vaut même pas le coup de faire un creator mso

 

[RyuAutodidacte]

Bonjour
sérieux c'est tout ce qui a ?
si c'est ça ca vaut même pas le coup de faire un creator mso

y en a surement plus mais j'en ai sélectionné qui pourrait aller pour la construction du creator
il y en a déjà 54 ici

Il faut donc lister en texte les différentes partis/boutons qu'il y a et choisir tous les 2 les correspondances
et voir lesquels nous en manques pour voir ce que l'on pourrait rajouter selon le thèmes boutons/partis

Edit : en effet j'avais pas précisé que c'était seulement pour la construction du créator, car il y en a largement plus d'icons