Új hozzászólás Aktív témák

• #43673 Fferi50 Topikgazda Véreshurka #43672

  Új Válasz 2020-04-23 17:08:42 #43673

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Fferi50

  Topikgazda

  válasz Véreshurka #43672 üzenetére

  Szia!
  Ezt próbáld ki még Lappy javaslata mellé (az ugyanis csak az x tengelyt formázza):
  Sub formaz()
Dim diag As Object, src As Series
    For Each diag In Sheets
        If TypeName(diag) = "Chart" Then
           For Each src In diag.SeriesCollection
               src.HasDataLabels = True
               src.DataLabels.NumberFormat = "#,##0.00"
           Next
        End If
     Next
End Sub
  Üdv.

Új hozzászólás Aktív témák