Microsoft 365 Personnaliser les formats de nombre proposés dans la liste Excel.

[Val_Le_S]

Bonjour,
Je souhaite personnaliser les formats de nombre proposés dans la partie

.
Est il possible de les modifier ?
Je voudrais mettre un format type # ##0 sans virgule.
Merci.

 

[chris]

Bonjour

Sauf à programmer un nouveau bouton dans un ruban personnalisé, je ne pense pas que cela soit possible

 

[patricktoulon]

Bonjour
je peux faire joujou moi aussi ?

dans le thisworkbook

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ResetBarCell
End Sub

Private Sub Workbook_Open()
AddPopupIncommandBarsCell
End Sub

dans un module standard

'patricktoulon menu cell
Sub AddPopupIncommandBarsCell()
With CommandBars("Cell")
Set pop = .Controls.Add(msoControlPopup, , , 1, True)
pop.Caption = "format Numerique Perso"

Set bout = pop.Controls.Add(msoControlButton, , , , True)
bout.Caption = " # ##0"
bout.OnAction = "formatage_Perso"

'multiplier les 3 lignes précédentes autant de fois que tu en a besoins en changant juste  le .caption
'pour avoir tes formats perso a dispo au click droite sur cellule


End With
End Sub
' on remet le menu à l'origine
Sub ResetBarCell(): CommandBars("Cell").Reset:
End Sub

'la sub appellée par lun bouton du menu
Sub Formatage_Perso()
Selection.NumberFormat = CommandBars.ActionControl.Caption
End Sub

demo