excel - VBA Run-time error '1004': Selection.Interior.Pattern -



excel - VBA Run-time error '1004': Selection.Interior.Pattern -

i have next code should alter decoration of named range based on there beingness value within it. if empty turns reddish , if not should clear decoration. have looked @ other questions similar errors , cannot seem prepare issue. have next code:

each section in mandatoryfields msgbox (thisworkbook.worksheets("worksheet").range(section).value) if trim(thisworkbook.worksheets("worksheet").range(section).value) = "" thisworkbook.worksheets("worksheet").range(section).select selection.interior .pattern = xlsolid .patterncolorindex = xlautomatic .color = 255 .tintandshade = 0 .patterntintandshade = 0 end else thisworkbook.worksheets("worksheet").range(section).select selection.interior .pattern = xlnone .tintandshade = 0 .patterntintandshade = 0 end end if next section

i have stepped through code , runtime error beingness triggered @ the

.pattern = xlnone

or

.pattern = xlsolid

lines. suggestions?

i have tried

worksheets("worksheet").activate range(section).select selection.interior .pattern = xlnone .tintandshade = 0 .patterntintandshade = 0 end

i have next code triggered on button click.

dim wb workbook set wb = application.workbooks("c new hire") wb.worksheets("worksheet").range("namerange").value = "r"

a runtime error occur on sec time click button on line

wb.worksheets("worksheet").range("namerange").value = "r"

the coloring part of code right works:

sub luxation() range("a1:a2").clear range("a1").select selection.interior .pattern = xlsolid .patterncolorindex = xlautomatic .color = 255 .tintandshade = 0 .patterntintandshade = 0 end range("a2").select selection.interior .pattern = xlnone .tintandshade = 0 .patterntintandshade = 0 end end sub

however:

before selecting range, must activate "containing" worksheet.

otherwise, follow david's advice.

edit#1:

based on updated code, after:

range(section).select

insert:

msgbox selection.address(0,0)

this shed lite on problem happening.

excel vba excel-vba

Comments

Post a Comment

Popular posts from this blog

model view controller - MVC Rails Planning -

model view controller - MVC Rails Planning - i'm starting rails , i'm building app stores films info, user can watch film , give grade on web application. i have coded cinema model, controller , views. now, have 2 questions: should need create model , controller grading? in case, should create or should wait , create first users model , controller? yes, on model , controller grades. that'd feasible way maintain track of who's graded what. it's create first, i'd start users, since grades depend on both films , users. ruby-on-rails model-view-controller
Read more

ruby on rails - Devise Logout Error in RoR -

ruby on rails - Devise Logout Error in RoR - while using devise in ror, encountering unusual error when trying log out url different root url. displays me : actioncontroller::invalidauthenticitytoken in devise::sessionscontroller#destroy" for illustration if rooting path after log in '/structure', , seek log out '/general' error, while logging out '/structure' fine. any help highly appreciated. ruby-on-rails ruby devise
Read more

html - Submenu setup with jquery and effect 'fold' -

html - Submenu setup with jquery and effect 'fold' - i want open submenu jquery effect fold, problem if user "hover effect" fast menu remain open, how can avoid this, jquery code is: $('ul.mainmenu li').hover( function() { $(this).children('ul').show('fold', 570); }, function() { $(this).children('ul').hide('fold', 500); } ); my jsfiddle link is: http://jsfiddle.net/9wkbf/ updated fiddle the reason behind problem is, first event $(this).children('ul').show('fold', 570); queued , until completes, sec animation not start. the next snippet can workaround $('ul.mainmenu > li').hover( function() { $(this).children('ul').show('fold', 570); }, function() { $('ul:not(.mainmenu)').hide('fold', 500); } ); *important note : work current scenario. jquery html css
Read more