Pb de format dans le titre d'un graph. en VBA

[regis1973]

Bonjour,
je souhaite donner un format date, plus exactement celui-ci(NumberFormat = '0'000'000'')à X dans le titre du graph.
Merci d'avance
Régis

X = Range('i43').Value
ActiveSheet.ChartObjects('Graphique 3').Activate
ActiveChart.ChartTitle.Select
Selection.Characters.Text = 'Total:' & Chr(10) & X

 

[MichelXld]

bonjour

ci joint un exemple de personnalisation du format (à adapter pour ton projet)

Dim X As String

X = Format(Range('A1').Value, '# ### ###')
ActiveSheet.ChartObjects('Graphique 3').Chart.ChartTitle. _
Characters.Text = 'Total:' & Chr(10) & X


bonne journée
MichelXld

 

[Regis1973]

.............ca marche nickel!!!
Merci