Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

RyuAutodidacte

XLDnaute Impliqué
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 :
VB: 
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
 
Trier par date Trier par votes

patricktoulon

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

exemple ici je met l'icone bold dans le activx image1
VB: 
Sub test()
ActiveSheet.OLEObjects("Image1").Object.Picture = Application.CommandBars.GetImageMso("Bold", 40, 40)
End Sub

ici c'est le smyley
VB: 
Sub test()
ActiveSheet.OLEObjects("Image1").Object.Picture = Application.CommandBars.GetImageMso("HappyFace", 40, 40)
End Sub
 
Dernière édition:
Vote positif 0 Vote négatif

RyuAutodidacte

XLDnaute Impliqué
Hi Patrick,

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


Code: 
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
 

Pièces jointes

  • 1719043358041.png
    1.3 KB · Affichages: 2
Dernière édition:
Vote positif 0 Vote négatif

RyuAutodidacte

XLDnaute Impliqué
patricktoulon à dit:
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
Cliquez pour agrandir...

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
 
Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…