A sparkline of the column type is created in a similar manner:
Sub CreateColumnSparkline()
ThisWorkbook.Worksheets("Sheet8").Activate
Range("A11").SparklineGroups.Add xlSparkColumn, "A1:A10"
End Sub
Explanation:
This time, the element xlSparkColumn from the xlSparkType enumeration is used, which generates a series of vertical bars representing the data.