excel vba - Check only for weekday values and color using VBA -


i have below vba code color values in col "m" if greater 1 , have text "moved sa (compatibility reduction)".

what want is:

  1. i have dates in col k , code should run on weekday dates , not on weekend dates.

  2. i need add additional text along "moved sa (compatibility reduction)", let's "text 2" , "text 3". so, if col p has either "moved sa (compatibility reduction)" or "text 2" or "text 3", coloring should happen.(it great if possible use wildcards here)

  3. this code should run in sheet "latency"

    sub latencymarker() dim r long dim m long on error goto exithere: m = range("m:p").find(what:="*", searchorder:=xlbyrows, searchdirection:=xlprevious).row application.screenupdating = false r = 1 m     if range("p" & r) = "moved sa (compatibility reduction)"         if range("m" & r) >= 1             range("m" & r).cells.font.colorindex = 3         else             range("m" & r).cells.font.colorindex = 0         end if     end if next r  exithere: application.screenupdating = true  end sub

pesky latency sheet not cooperating again? if understood said above correctly following code should trick:

sub latencymarker() dim targetws worksheet dim datarange range dim dataarr() variant dim rowcounter long  application.screenupdating = false set targetws = thisworkbook.sheets("latency") set datarange = targetws.range("a1:" & targetws.range(targetws.usedrange.address)(targetws.usedrange.rows.count, targetws.usedrange.columns.count)) set dataarr = datarange  rowcounter = 1 ubound(dataarr, 1)     if weekday(dataarr(rowcounter, 11), vbmonday) <= 5         if dataarr(rowcounter, 16) = "moved sa (compatibility reduction)" or dataarr(rowcounter, 16) = "text 2" or dataarr(rowcounter, 16) = "text 3"             if dataarr(rowcounter, 13) >= 1                 datarange(rowcoumter, 13).font.colorindex = 3             else                 datarange(rowcoumter, 13).font.colorindex = 0             end if         end if     end if next  exithere: application.screenupdating = true  end sub

couple things- converted of range data manipulation array data , renamed few of variables more clear-

hope helps.


-

Comments

Post a Comment

Popular posts from this blog

python - How to insert QWidgets in the middle of a Layout? -

Image
i'm using qt framework build graphical user interface. use qgridlayout position qwidgets neatly. gui looks this: my application regularly adds new widgets gui @ runtime. these new widgets not added @ end of qlayout, somewhere in middle. the procedure bit cumbersome. applied on figure above, need take out widg_c , widg_d , ... qgridlayout. next, add widg_x and widg_y , , put other widgets again. how remove widgets qgridlayout: for in reversed(range(mygridlayout.count())): self.itemat(i).widget().setparent(none) ### as long you're dealing small amount of widgets, procedure not disaster. in application display lot of small widgets - perhaps 50 or more! application freezes second while procedure ongoing, annoying user. there way insert widgets somewhere in qlayout, without need take out other widgets? edit: apparently solution qvboxlayout simple. use function insertwidget(..) instead of addwidget(..) . docs can found link: http://doc.qt.io/qt-5/qboxlayou
Read more

python - serve multiple gunicorn django instances under nginx ubuntu -

i need serve 2 webs apps (django) on gunicorn under different domain names using nginx on ubuntu. started using tutorial: https://www.digitalocean.com/community/tutorials/how-to-set-up-django-with-postgres-nginx-and-gunicorn-on-ubuntu-16-04 it worked fine 1 using that. tried same thing second gives me 502 gateway second domain. tried following tutorial: http://michal.karzynski.pl/blog/2013/10/29/serving-multiple-django-applications-with-nginx-gunicorn-supervisor/ i'm @ part run gunicorn start script: sudo bin/gunicorn_start i response: starting webuildblack root traceback (most recent call last): file "/home/devin/webuildblack/bin/gunicorn", line 7, in <module> gunicorn.app.wsgiapp import run importerror: no module named 'gunicorn.app'; 'gunicorn' not package you have named program gunicorn.py gunicorn -package. rename file , remove gunicorn.pyc file.
Read more

module - Prestashop displayPaymentReturn hook url -

i new prestashop developer , trying create paymentmodule. have got show payment method can not proceed purchase because not know hot works. does know should redirect run hooddisplaypaymentreturn method? i happy if explain me complete navigation map make purchase. anyway, can find relation between hooks , pages? when have new module payment rely on simplest provided prestashop: bankwire. inside can find 3 hooks. hookpayment: public function hookpayment($params) { if (!$this->active) return; if (!$this->checkcurrency($params['cart'])) return; $this->smarty->assign(array( 'this_path' => $this->_path, 'this_path_bw' => $this->_path, 'this_path_ssl' => tools::getshopdomainssl(true, true).__ps_base_uri__.'modules/'.$this->name.'/' )); return $this->display(__file__, 'payment.tpl'); } hookdisplaypaymenteu: public fun
Read more