Hi Vidyut, Check out below quick and easy code.
Sub hiderow() Range("c1").Select Range("c1:e1").Select For i = 1 To WorksheetFunction.CountA(Range("a:a")) + 10 If WorksheetFunction.CountA(Selection) = 0 Then Selection.EntireRow.Hidden = True Selection.Offset(1, 0).Select Else Selection.Offset(1, 0).Select End If Next Cells(1, 1).Select End Sub Workbook with the same macro is also attached with this email. Thanks. -- DILIP KUMAR PANDEY MBA-HR,B COM(Hons.),BCA Mobile: +91 9810929744 dilipan...@gmail.com dilipan...@yahoo.com New Delhi - 110062 On 9/19/09, vidyut more <vidyutm...@gmail.com> wrote: > > Hi, > Dilip > can u give me code for macro that will hide rows which are empty or no > values. i am attaching file for example. > sir i am learning macro now. i am new in it. Please help me. Thanks in > advance. > > --~--~---------~--~----~------------~-------~--~----~ ---------------------------------------------------------------------------------- Some important links for excel users: 1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at http://www.excelitems.com 2. Excel tutorials at http://www.excel-macros.blogspot.com 3. Learn VBA Macros at http://www.vbamacros.blogspot.com 4. Excel Tips and Tricks at http://exceldailytip.blogspot.com To post to this group, send email to excel-macros@googlegroups.com If you find any spam message in the group, please send an email to: Ayush Jain @ jainayus...@gmail.com or Ashish Jain @ 26may.1...@gmail.com <><><><><><><><><><><><><><><><><><><><><><> HELP US GROW !! We reach over 6,500 subscribers worldwide and receive many nice notes about the learning and support from the group. Our goal is to have 10,000 subscribers by the end of 2009. Let friends and co-workers know they can subscribe to group at http://groups.google.com/group/excel-macros/subscribe -~----------~----~----~----~------~----~------~--~---
Hide Rows by DILipandey.xls
Description: MS-Excel spreadsheet