VBA to Check if a Cell Contains a Sparkline

[ormy28]

Hi. I was wondering if there was a way to check whether a cell contains a sparkline using VBA? I was hoping there would be something like ActiveCell.HasSparkLine to check the active cell, but it appears not.

I have a spreadsheet that contains around 20 sheets, all containing numerous sparklines in column D. However, the rows that contain the sparklines is inconsistent across all the sheets. I has looking to use a loop, starting in D1 and moving down a cell at a time to the last row of data, checking if the cell contained a sparkline. If it does, the range of the sparkline would be amended using a variable.

The updating of the sparkline is straightforward enough, it's just the initial check as to whether the active cell contains a sparkline that is proving problematic.

Any help here would be greatly appreciated, thanks.

 

[JvdV]

To test if a cell contains a sparkline, you could try to tap into the SparklineGroups object's count property:

If ActiveCell.SparklineGroups.Count Then
    Debug.Print "Sparkline Detected"
End If

Also, maybe you can get some idea's here to retrieve all sparklines.

 

[ormy28]

Thanks, that seems to do the trick!