excel - Skip rows with blank cell in particular column -


please advise me how change code select rows if have value in bc column (ignore complete row if cell in bc column blank):

private sub commandbutton3_click()     range("a:a,b:b,c:c,e:e,bc:bc").select     selection.copy     workbooks.add               selection.pastespecial paste:=xlpastevalues, operation:=xlnone, skipblanks:=true, transpose:=false     selection.pastespecial paste:=xlpasteformats, operation:=xlnone, skipblanks:=true, transpose:=false end sub 

first run code is. perform row deletions in added workbook:

sub dural()     dim n long, long, r range     n = cells(rows.count, "bc").end(xlup).row     = n 1 step -1         set r = cells(i, "bc")         if isempty(r)             r.entirerow.delete         end if     next end sub 

Comments

Popular posts from this blog

java - Run a .jar on Heroku -

java - Jtable duplicate Rows -

validation - How to pass paramaters like unix into windows batch file -