Consulting

Results 1 to 4 of 4

Thread: Conditional format of bars based on values of PowerPoint Waterfall Charts

  1. #1
    VBAX Regular
    Joined
    Dec 2007
    Posts
    76
    Location

    Conditional format of bars based on values of PowerPoint Waterfall Charts

    Hi

    I have charts created in Powerpoint (not Excel) using one series with 6 data points. I want to conditional format those bars for each data point based on whether the value for each data point/bar is positive (set to green) or negative (set to red).


    I have several charts across multiple sheets that I would like to apply this to but can't get beyond the first stage. The following codes lets me set the colours when selecting a single chart so I know how to set the colours but not how to do the evaluation:


    Sub Testbarcolour()
    Dim p As Point
    Dim s As Series
    Dim c As Chart
    
    
    Set c = ActiveWindow.Selection.ShapeRange(1).Chart
    Set s = c.SeriesCollection(1)
    
    
    With s
        .Points(1).Format.Fill.ForeColor.RGB = RGB(0, 176, 240)
        .Points(2).Format.Fill.ForeColor.RGB = RGB(0, 88, 240)
    
        .Points(6).Format.Fill.ForeColor.RGB = RGB(0, 176, 240)
       End With
    
    
    End Sub
    I tried to add in the evaluation like this line but it does not work

    If .Values(1) > 0 Then .Points(1).Format.Fill.ForeColor.RGB = RGB(25, 176, 24)
    Would be great if someone can help with this.

    Thanks

    Hamond

  2. #2
    VBAX Master
    Joined
    Feb 2007
    Posts
    2,012
    Location
    My experience is that the PowerPoint vba object model for Waterfall charts (which are fairly new) is not well implimented. I don't think what you need can be done for this type of chart but I could be wrong (haven't found a way yet though)
    John Wilson
    Microsoft PowerPoint MVP
    Amazing Free PowerPoint Tutorials
    http://www.pptalchemy.co.uk/powerpoi...tutorials.html

  3. #3
    VBAX Regular
    Joined
    Dec 2007
    Posts
    76
    Location
    Thanks for info John.

    It appears someone was able to retrieve values using the DataLabel property at the link here but not sure if we are referring to the same thing.

    https://stackoverflow.com/questions/...aterfall-chart

    Hamond

  4. #4
    VBAX Master
    Joined
    Feb 2007
    Posts
    2,012
    Location
    Unless I have misunderstood it's not agreat workaround though (changing the chart type) and I don't think you could change the fill colors.
    John Wilson
    Microsoft PowerPoint MVP
    Amazing Free PowerPoint Tutorials
    http://www.pptalchemy.co.uk/powerpoi...tutorials.html

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •