excel - Looped call on rows in VBA -


i'm trying run call on top row, delete row , move cells below , run on new top row again. repeat excercise till there no more rows left. , yes know slow way of doing it, call takes 10 secs each row, it's nice way of keeping track of progression (i.e how many rows left).

this i've got far, not understanding request delete range a2:c2 , move cells below if there value in range a3.

any appreciated!

sub loop_through_rows()  dim rngquantitycells range  set rngquantitycells = range("a2", range("a2").end(xldown))  = 1 rngquantitycells call runsplit  if range("a3").value > 0 range("a2:c2”).delete shift:=xlup  end if next end sub 

try this:

sub loop_through_rows() dim rngquantitycells range set rngquantitycells = range("a2", range("a2").end(xldown))  = 1 rngquantitycells     call runsplit     if range("a3").value > 0         range("a2:c2").delete shift:=xlup     end if next end sub 

note needed then on same line. also, have 2 "styles"(?) of quotes in original post on range("a2:c2").


Comments

Popular posts from this blog

networking - Vagrant-provisioned VirtualBox VM is not reachable from Ubuntu host -

c# - ASP.NET Core - There is already an object named 'AspNetRoles' in the database -

ruby on rails - ArgumentError: Missing host to link to! Please provide the :host parameter, set default_url_options[:host], or set :only_path to true -