How To Generate A Bullet Checklist In Excel With VBA

July 26, 2017 by Alexander Wilson

If portion of your task requires making created reviews from Excel information, the lack of ability to automate bullet factors could be a stress. Typically, you need to have to insert a text box and then manually generate the bullets.

This write-up clarifies how you can automate your personal bullet-details in Excel with VBA.

Producing A Bullet Level From A Knowledge Established

We will use an example of a quarterly sales summary damaged down into items and amount of revenue. The data might appear like this comma-delimited listing.

Solution, Sales

Widget1,a hundred

Widget2,a hundred thirty


We need to switch the info into the adhering to format:

Widget1: 100
Widget2: one hundred thirty
Widget3: 150
We will change the knowledge by inserting the character for a bullet level just before every single worth and include the overall from the adjacent mobile. Initial, we are going to decide on the range.

excel vba training london rng as selection

set rng=range(\“a1\“).currentRegion.columns(one)

for x=two to rng.rows.depend
For every single cell we will incorporate the bullet at the start off and rewrite the new worth to the cell. The benefit for a bullet-point is 149.

rng.Rows(x) = Chr(149) & \” \” & rng.Rows(x) & \”: \” & rng.row(x).offset(,one)

At times, it makes feeling to use a textual content box to give much more overall flexibility to the design of a report. You can manually incorporate a checklist to the box by just highlighting the textual content, appropriate- clicking and selecting the suitable options for a bullet list.

Incorporating A Record To A Textual content Box

If you want to automate a record in a text box, similar code is utilised but you need to have to choose the box and include the textual content in a one variable making use of the carriage return character \“chr(10)\“.

for x=2 to rng.rows

myStr=myStr & Chr(149) & \” \” & rng.Rows(x) & chr(10)

The code can now insert the string as the textual content price into the textual content box.

ActiveSheet.Shapes.AddTextbox(one,ileft,itop,iwidth,iheight ).Select
Variety.Figures.Textual content = strg

The process previously mentioned inserts the same bulleted list into the textual content-box which can be modified by environment qualities for font sort, shade and size. If your spreadsheets are well made you can even begin to automate the responses and explanations that go with the data.


The capacity to insert a bullet checklist indicates you can develop effectively-designed reports with no utilizing secondary apps like Phrase or Electrical power Level. It implies automation and VBA can be much more successful and include productiveness to your operate.