excel vba - application-defined or object-defined error in cell range visual basic -


having problems code below. i'm getting application-defined or object-defined error in initiation of second loop. format of second loop range seems causing problem. removing sheets() object gets rid of error, script reads wrong worksheet, , doesn't return data.

the goal of code loop on vertical array of data, , if match selection dropdown found, loops on horizontal array of data , returns color change if finds 'yes' value.

if not intersect(target, range("countryproductcell")) nothing     lastcolumn = activesheet.usedrange.column - 1 + activesheet.usedrange.columns.count     dim cellrow integer     cellrow = target.row     dim defaultcellcolumn integer     defaultcellcolumn = 4     = 5     j = 1     k = 1     if not cells(cellrow, defaultcellcolumn).value = "(select title)"         each countrycell in range(cells(cellrow, defaultcellcolumn + 1), cells(cellrow, lastcolumn))             if countrycell.value = "use default"                 countrycell.interior.colorindex = 3             end if         next         each namecell in sheets("active product catalog").range("productnames")             if namecell.value = cells(cellrow, defaultcellcolumn).value                 'error on line below!                 each purchaseablecell in sheets("active product catalog").range(cells(namecell.row, 10), cells(namecell.row, 27))                     if purchaseablecell.value = "yes"                         'if purchaseable, change color                         sheets("home template").cells(cellrow, defaultcellcolumn + j).interior.colorindex = 35                     end if                     j = j + 1                 next             end if             k = k + 1         next     elseif cells(cellrow, defaultcellcolumn).value = "(select title)"         if target.value = "(select title)"             target.interior.color = cells(target.row, target.column - 1).interior.color             each countrycell in range(cells(cellrow, defaultcellcolumn + 1), cells(cellrow, lastcolumn))                 if countrycell.value = "use default"                     countrycell.interior.colorindex = 2                 end if                 = + 1             next         elseif target.value = "use default"             target.interior.colorindex = 2         elseif application.vlookup(activesheet.cells(cellrow, target.column), sheets("active product catalog").range("e:ak"), target.column, false) = "yes"             target.interior.colorindex = 35         elseif not application.vlookup(activesheet.cells(cellrow, target.column), sheets("active product catalog").range("e:ak"), target.column, false) = "yes"             target.interior.colorindex = 3         end if     end if end if

you need qualify cells references in code. reason failing using 2 cell references 1 sheet (the active sheet) , asking vba define range in sheet (active product catalog). try this:

sheets("active product catalog").range(sheets("active product catalog").cells(namecell.row, 10), sheets("active product catalog").cells(namecell.row, 27))

you'll find bit easier read if create worksheet object or use statement.


Comments

Post a Comment

Popular posts from this blog

Change php variable from jquery value using ajax (same page) -

what i'm trying this: i've php global variable $currentid , simple jquery script check if there "id" (page) in hash of url , if yes wanted give value $currentid . i've been reading lot , notice shall use ajax i'm not managing it. my code is: <script type="text/javascript"> $(document).ready(function(){ if (parent.location.hash != '' ) { var thecurrentid = parent.location.hash.split('#')[1]; $.ajax({ url: 'my.php', //current page type: 'post', data: {theid: thecurrentid }, datatype: 'json', success: function () { } }); } // code here }); </script> could me please? thank in advance. php server side language, meaning once has sent data browser, php variables , data cannot changed... however, using ajax, can send request php page , change data in dom based on result. consider th...
Read more

How can I fetch data from a web server in an android application? -

i want retrieve data web server in android application, , don't know begin. should use web services? i recommend these tutorials: connect android php , mysql , json in android , php , mysqli i used these tutorials , managed trying working without difficulty. between them describe each step in how attempting @ each stage, android application, database , web server side , has information included can process , use received information the thing add connect android php , mysql tutorial makes use of mysql_ in php deprecated. better use mysqli why included third link. the basic outline of want this: 1) in android app make request server php script using class this: import java.io.bufferedreader; import java.io.ioexception; import java.io.inputstream; import java.io.inputstreamreader; import java.io.unsupportedencodingexception; import java.util.list; import org.apache.http.httpentity; import org.apache.http.httpresponse; import org.apache.http.namevaluepair...
Read more

jquery - How can I dynamically add a browser tab? -

since using iframes house external pages are, accounts "not preferred method" , disallowed sites (flickr, one), want dynamically generate browser tabs. e.g., when user submits form, want dynamically generate tab on browser in response submitted. e.g., might want add new tab url like: http://www.bigsurgarrapata.com/contact how in jquery? you want form target attribute action attribute. http://www.w3schools.com/tags/att_form_target.asp browsers have ultimate control on result of target attribute open new tab value of _blank. <form action="contact_submit.php" target="_blank" method="post">
Read more