Triggering VBA code using Form Control Check Box instead of ActiveX -


i have code below working in budget template work. however, before roll out users, need make mac friendly. since macs don't activex controls, i'm trying figure out way make code work using form controls. have ideas me? thanks!

private sub travelcalc_click() activesheet.unprotect password:="password"     if me.travelcalc.value = false     range("c19:l20").locked = false     sheets("travel calculator").visible = false else     sheets("travel calculator").visible = true     range("$c$19") = worksheets("travel calculator").range("$n$25")     range("$d$19") = worksheets("travel calculator").range("$p$25")     range("$e$19") = worksheets("travel calculator").range("$r$25")     range("$f$19") = worksheets("travel calculator").range("$t$25")     range("$g$19") = worksheets("travel calculator").range("$v$25")     range("$h$19") = worksheets("travel calculator").range("$x$25")     range("$i$19") = worksheets("travel calculator").range("$z$25")     range("$j$19") = worksheets("travel calculator").range("$ab$25")     range("$k$19") = worksheets("travel calculator").range("$ad$25")     range("$l$19") = worksheets("travel calculator").range("$af$25")     range("$c$20") = worksheets("travel calculator").range("$n$51")     range("$d$20") = worksheets("travel calculator").range("$p$51")     range("$e$20") = worksheets("travel calculator").range("$r$51")     range("$f$20") = worksheets("travel calculator").range("$t$51")     range("$g$20") = worksheets("travel calculator").range("$v$51")     range("$h$20") = worksheets("travel calculator").range("$x$51")     range("$i$20") = worksheets("travel calculator").range("$z$51")     range("$j$20") = worksheets("travel calculator").range("$ab$51")     range("$k$20") = worksheets("travel calculator").range("$ad$51")     range("$l$20") = worksheets("travel calculator").range("$af$51")     range("c19:l20").locked = true end if activesheet.protect password:="password", allowformattingcolumns:=true, allowformattingrows:=true  end sub

after insert form control, right click it, , select assign macro, , select new. macro assigned "click event".

checking if has been checked bit tricky, doable:

private sub checkbox1_click() 'assign macro checkbox; make sure in standard module activesheet.unprotect password:="password"  if activesheet.shapes("check box 1").oleformat.object.value <> 1   range("c19:l20").locked = false   sheets("travel calculator").visible = false else   yadda-yadda code here... end if  activesheet.protect password:="password", allowformattingcolumns:=true, allowformattingrows:=true end sub

to honest, can hope works on mac, never tried that. if form controls work ok, should it...


Comments

Post a Comment

Popular posts from this blog

android - MPAndroidChart - How to add Annotations or images to the chart -

i working latest mpandroidchart library , looking way add annotations or images clickable. example: once data reaches value event occurs want able display user - there multiple events can occur annotations (not sure if right word) or image added @ point in chart. any pointers welcome. check documentation of yaxis . focus on setspacetop(...) , setaxismaxvalue(...) methods. for background: bar-shadow , disable calling: barchart.setdrawbarshadow(false) or change color: bardataset.setbarshadowcolor(int color)
Read more

javascript - Add class to another page attribute using URL id - Jquery -

i have attached id url. ex: when click link 1 , has #tab-2 id , takes me landing page. in landing page have find element has #tab-2 id have add class .active . i tried no luck. please 1 correct code. thanks js fiddle link html <div class="menu"> <ul> <li><a href="http://jsfiddle.net/gscyoa0j/1/#tab-2">link 1</a></li> <li><a href="http://jsfiddle.net/gscyoa0j/1/#tab-44">link 2</a></li> <li><a href="http://jsfiddle.net/gscyoa0j/1/#tab-74">link 3</a></li> </ul> </div> landing page <div class="tab"> <ul> <li><a id="tab-2" class="active" >link 1 content</a></li> <li><a id="tab-44" >link 2 content</a></li> <li><a id="tab-74" >link 3 content</a></l
Read more

firefox - Where is 'webgl.osmesalib' parameter? -

i'm trying webgl running on firefox (v37.0.2) via software acceleration mesa. tried following steps have been stated in article: http://www.binarytides.com/enable-webgl-firefox-ubuntu/ however, unable find parameter named ' webgl.osmesalib ' in about:config section? has been removed (or renamed)? if yes, how should instruct firefox use mesa's software acceleration webgl? looks support osmesa removed in favour llvmpipe.
Read more