From the Wolfram documentation, I understand that a cell dingbat (circle, square, ...) is aligned with the first line in the cell (which makes sense for creating bullet points, for example).
I want to create a cell dingbat that contains text and I want to control the vertical alignment of the text in that cell. Here is the code I have so far:
CellPrint[
TextCell["Some text for my cell",
CellDingbat -> Cell[
TextData["Ex. 1"],
CellSize -> {48, 24}, CellFrame -> True,
CellMargins -> {{0, 0}, {0, 10}},
CellFrameMargins -> {{10, 0}, {0, 0}},
TextAlignment -> Left,
FontSlant -> Italic, FontWeight -> Bold,
Background -> GrayLevel[.9]]
]]
This produces the dingbat with text still aligned with the first line in the cell:
I have tried numerous things, including setting the CellBaseline and adjusting the CellFrameMargins, but I can't get the "Ex. 1" text to have more space between it and the top of the CellFrame. Note: I want to keep the current frame for the dingbat cell exactly as is (I want it aligned with the top of the main text in the cell), so increasing the CellFrameMargin for the TextCell is not a desired workaround.
Can someone explain how to achieve this spacing? Thanks.