vba - Hide column in excel by date YYYY MM for the rest of this year plus three more -

-

i'm trying hide columns in excel vba.

so far have hide after 36 months told needed rest of forecasted year plus 3 years hide months in year 4 , 5 except december.

i added picture of spreadsheet cells except input, cells c10 thru bj12 , row 6, come second page of workbook. in row 6 trying take year row 9 , use way, can hard coded in must dynamic because startyear changes second page depending on scenario , job selected.

'hide months except december after 36 months range("am:bj")     .entirecolumn.hidden = true         each cell in range("am7:bj7" & activecell.specialcells(xlcelltypelastcell).column)             select case cell.value             case = "currentyear"             case = "12"             cell.entirecolumn.hidden = false         end select     next cell end

image of spreadsheet looks like

try this! code should keep columns unhidden until 3 years after starting year. should hide columns except december months.

'grab starting info startingaddress = "c9" 'set first date location startingyear = left(range(startingaddress).value, 4) 'grab first 4 characters starting year  'loop through dates , determine hide/unhide = 0 application.columns.count - 2     if range(startingaddress).offset(0, i).value = vbnullstring         exit 'saves time because doesn't go through entire loop can if needed     else         'hides column if year 3 years greater starting year , month not dec.         if cint(left(range(startingaddress).offset(0, i).value, 4)) > (3 + startingyear) , right(range(startingaddress).offset(0, i).value, 2) <> "12"             range(startingaddress).offset(0, i).entirecolumn.hidden = true         else             range(startingaddress).offset(0, i).entirecolumn.hidden = false 'just in case columns previous run hidden         end if     end if next

example: (starting date = 2015 10) code keep columns unhidden until 2019 keep december months. if wanted start hiding @ 2018 change

if cint(left(range(startingaddress).offset(0, i).value, 4)) > (3 + startingyear) , right(range(startingaddress).offset(0, i).value, 2) <> "12"

to

if cint(left(range(startingaddress).offset(0, i).value, 4)) >= (3 + startingyear) , right(range(startingaddress).offset(0, i).value, 2) <> "12"

Comments

Post a Comment

Popular posts from this blog

ruby - Trying to change last to "x"s to 23 -

-
i have been playing around irb , have string looks this: irb(main):072:0> puts ["[\"4354 5432 5432 xxxxx\", \"6547 6547 8543 xxxxx\", \"2344 6543 6674 xxxxx\", \"2346 6236 7543 xxxxx\", \"1273 5585 5587 xxxxx\"]"] => nil irb(main):073:0> what want gsub last 2 "x" s of each 17 digit combination, 23 . what i've tried far (i've been using rubular): a.gsub(/\d[x]/,"23") <= grabs "x" s i'm close a.gsub(/\w[x{2}]/,"23") <= grabs "x" s grabs two digits each combination. is there easier way i'm not understanding? a.gsub(/\d{4} \d{4} \d{4} xxx\kxx/, '23') \d{4} = 4 digits what \k drop matched far. can use don't replace entire number, still able validate have in desired format.
Read more

jquery - Clone last and append item to closest class -

-
this bare-bones code on page: <div class="list-container"> <div class="single-list-item"> <button>remove</button> </div> <div class="single-list-item"> <button>remove</button> </div> <div class="single-list-item"> <button>remove</button> </div> </div> <p><button class="add-list-item">add</button></p> <div class="list-container"> <div class="single-list-item"> <button>remove</button> </div> <div class="single-list-item"> <button>remove</button> </div> <div class="single-list-item"> <button>remove</button> </div> </div> <p><button class="add-list-item">add</button></p> <di...
Read more

css - Can I use the :after pseudo-element on an input field? -

-
i trying use :after css pseudo-element on input field, not work. if use span , works ok. <style type="text/css"> .mystyle:after {content:url(smiley.gif);} .mystyle {color:red;} </style> this works (puts smiley after "buu!" , before "some more") <span class="mystyle">buuu!</span>a more this not work - colors somevalue in red, there no smiley. <input class="mystyle" type="text" value="somevalue"> what doing wrong? should use pseudo-selector? note: cannot add span around input , because being generated third-party control. :after , :before not supported in internet explorer 7 , under, on elements. it's not meant used on replaced elements such form elements (inputs) , image elements . in other words it's impossible pure css. however if using jquery can use $(".mystyle").after("add smiley here"); api docs on .after to ...
Read more