excel vba - Select rows which have a numeric value in the first cell (Column A) -


i using excel vba try , select range of rows on spread sheet located below last row numeric value in column a. row 40 need select from, location change. how perform selection based on non numeric value. selecting range of rows , deleting them using following

rows("40:40").select range(selection, selection.end(xldown)).select application.cutcopymode = false selection.delete shift:=xlup 

dim lastrow integer  lastrow = activesheet.usedrange.rows.count      row = 2 lastrow     if not isnumeric(cells(row, 1))         row = row+1         rows(row).select         range(selection, selection.end(xldown)).select         application.cutcopymode = false         selection.delete shift:=xlup     end if next row 

Comments

Popular posts from this blog

Fail to load namespace Spring Security http://www.springframework.org/security/tags -

sql - MySQL query optimization using coalesce -

unity3d - Unity local avoidance in user created world -