HI Ron Please find the attached sheet
Sub InsertBlankRow() Dim rngRange As Range Set rngRange = Range("A1").CurrentRegion.Columns(1) rngRange.Replace "Category: ", "" Set rngRange = rngRange.SpecialCells(xlCellTypeBlanks) rngRange.Value = "Category: " rngRange.Offset(1).EntireRow.Insert End Sub Rajan From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com] On Behalf Of Ronald Cayne Sent: Apr/Wed/2012 05:00 To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ Inserting blank row Ie Every time the word Category appears insert a line. On Wednesday, April 4, 2012, Ronald Cayne wrote: Have a list in excel within one column Name Tel Address Has data or not Has data or not Category: eg "Category: Designers" This line always has the word "Category" on extreme left Want to insert blank line after this line. Macro to perform task. SVPACCIDENT Thanks Ron -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ---------------------------------------------------------------------------- -------------------------- To post to this group, send email to excel-macros@googlegroups.com <javascript:_e(%7b%7d,%20'cvml',%20'excel-macros@googlegroups.com');> -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ---------------------------------------------------------------------------- -------------------------- To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com
BlankROw.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12