Excel VBA Loop to fill column based on column header -


so have pivot table updated sql database everyday. want highlight whole section days >5, since data updated daily, conditional formatting not work. created dynamic range (see below), need run loop find column 29 (where days next name) greater 5 need below highlighted in red attachment shows. or suggestions? know pretty complex.

code:

sub dynamicrange()      'disable excel featured whilst macro running     application.calculation = xlcalculationmanual     application.enableevents = false     application.screenupdating = false      'declare variables     dim startcell range, lasrow long, lastcol long, ws worksheet      'set objects     set ws = sheet4     set startcell = range("n30")          'find last row , column of data         lastrow = ws.cells(ws.rows.count, startcell.column).end(xlup).row         lastcol = ws.cells(startcell.row, ws.columns.count).end(xltoleft).column          'select dynamic ramge of data         ws.range(startcell, ws.cells(lastrow - 1, lastcol - 1)).select       're-enable excel features after macro has run     application.calculation = xlcalculationautomatic     application.enableevents = true     application.screenupdating = true

enter image description here

howdee, should job done you. assign ws variable sheet want run on. let me know if have questions.

sub colorfill() dim ws worksheet dim rngcolor range, rngheader dim lastrow long, lastcol long, firstrow, firstcol  'set sheet desired sheet set ws = sheet1  'find top left of range firstrow = ws.usedrange.row firstcol = ws.usedrange.column  'find bottom right of range lastrow = firstrow + ws.usedrange.rows.count - 1 lastcol = firstcol + ws.usedrange.columns.count - 1  'set range of headers set rngheader = range(cells(firstrow, firstcol + 1), cells(firstrow, lastcol))  'loop through range of headers , color column each cell in rngheader if cell.value > 5     set rngcolor = range(cell.offset(1, 0), cells(lastrow, cell.column))     rngcolor.interior.colorindex = 3 end if next  end sub

Comments

Post a Comment

Popular posts from this blog

Is there a better way to structure post methods in Class Based Views -

i'm using class based views in django , never specify url in ajax calls , omit action parameter in form because know these requests go through post method of class based view. notice view - profile page make many requests depending on user updating on page - post method become convoluted , if/else mess example: def post(self, request, *args, **kwargs): # handle user changing available date if request.post.get('availabledate') != none: self.updateavailabledate(request) return jsonresponse({'result':'success'}) if request.post.get('newprojectname') != none: creative_user = creativeuserprofile.objects.get(id = request.user.id) project = project.create_project(creative_user, request.post['newprojectname']) project.save() return jsonresponse({'projectid': project.id }) if request.post.get('projectimage') != none , request.files['file']: proj...
Read more

performance - Why is XCHG reg, reg a 3 micro-op instruction on modern Intel architectures? -

i'm doing micro-optimization on performance critical part of code , came across sequence of instructions (in at&t syntax): add %rax, %rbx mov %rdx, %rax mov %rbx, %rdx i thought had use case xchg allow me shave instruction , write: add %rbx, %rax xchg %rax, %rdx however, dimay found agner fog's instruction tables , xchg 3 micro-op instruction 2 cycle latency on sandy bridge, ivy bridge, broadwell, haswell , skylake. 3 whole micro-ops , 2 cycles of latency! 3 micro-ops throws off 4-1-1-1 cadence , 2 cycle latency makes worse original in best case since last 2 instructions in original might execute in parallel. now... cpu might breaking instruction micro-ops equivalent to: mov %rax, %tmp mov %rdx, %rax mov %tmp, %rdx where tmp anonymous internal register , suppose last 2 micro-ops run in parallel latency 2 cycles. given register renaming occurs on these micro-architectures, though, doesn't make sense me done way. why wouldn't register renamer ...
Read more

c# - Asp.net web api : redirect unauthorized requst to forbidden page -

im trying redirect unauthorized request forbidden page instead i'm getting forbidden page in response body , how can fix ? here's startup class : app.createperowincontext(storecontext.create); app.createperowincontext<applicationusermanager>(applicationusermanager.create); app.createperowincontext<applicationsigninmanager>(applicationsigninmanager.create); app.usecookieauthentication(new cookieauthenticationoptions { authenticationtype = defaultauthenticationtypes.applicationcookie, expiretimespan = timespan.fromdays(30), }); app.useexternalsignincookie(defaultauthenticationtypes.externalcookie); app.usetwofactorsignincookie(defaultauthenticationtypes.twofactorcookie, timespan.fromminutes(5)); app.usetwofactorrememberbrowsercookie(defaultauthenticationtypes.twofactorrememberbrowsercookie); the method im trying reach : [httpget] [authorize(roles = "admin")] public string getcurrentusername() { return userman...
Read more