Match Bar Appearances  

Use customized swatches in a legend to identify labels with the appearance of bars in a bar chart.

In[1]:=

X BarChart[RandomChoice[Range[1, 10], {8, 5}], ChartLayout -> "Stacked", ChartStyle -> 88, ImageSize -> 400, ChartElementFunction -> "GlassRectangle", ChartLegends -> SwatchLegend[Row[{"lbl", #}] & /@ Range[5], LegendMarkerSize -> 20, LegendMarkers -> "GlassRectangle", LabelStyle -> {GrayLevel[0.3], Bold, 18}]]

Out[1]=