Inserting rows conditionally

[thaguru42]

I have a dataset where some of my text values in column A are bold and some are not. I'd like to automatically insert a row after every bold value... without having to go through and do it manually. Anyone know how to make this happen? Thanks a lot.

[Paul]

Hi Thaguru, welcome to the forum.

The following code would go into the worksheet module that contains the data. (Right-click on that sheet tab and choose View Code. Paste this code into the empty code area. Close the VB Editor. Run the macro from the Developer toolbar.)

Please Login or Register  to view this content.

It assumes your list is in A1:Axx (the last used row in column A is calculated automatically).

Hope that helps!