arrays - VBA - looping through cells using "i" -
i trying loop through range on cells in column , check if cell empty, if is, want copy corresponding row new sheet. have far:
if len(cells(i, 17)) = 0 sheets("ges1").activate activesheet.range(cells(i, 1), cells(i, 17)).select selection.copy worksheets.add after:=sheets(sheets.count) activesheet.paste end if next the problem code there empty cell corresponding row gets copied , pasted new sheet , following rows copied , pasted new sheets if corresponding cells not blank. want code copy , paste row corresponding empty cell value in column q i.e 17 single new sheet
problem line. try correcting it.
worksheets.add after:=sheets(sheets.count)
Comments
Post a Comment