excel vba - Accessing PivotChart SeriesCollection with a Sub -


i quite new vba. have written macro creates 10 pivot charts , normal charts after filtering , cutting data database spreadsheet. want write sub goes through applying same formatting each one. sub follows:

sub formatchart(cht chartobject, title string) cht.activate msgbox activechart.seriescollection.count activechart     .hastitle = true     .charttitle.text = title      .axes(xlvalue).hasmajorgridlines = false end activechart.seriescollection(1).select selection.format.fill     .visible = msotrue     .forecolor.rgb = rgb(255, 182, 0) end end sub

i didn't include activates , selects, couldn't macro work without them , don't see end of world - datasets never going massive speed isn't of concern, , disable screenupdating users can't click on cells/other objects , disrupt macro runs.

here's problem. if take out second loop, proceeds , gridlines removed , title added. however, whenever try edit colours of columns above run time error '1004': invalid parameter. i've tried keeping content of second loop inside first moved out try using selection see if made difference.

i've fiddled around quite bit , recorded various macros changing colour of chart in question, think problem might referencing seriescollection when try debug 

msgbox activechart.seriescollection.count

i "0".

please let me know if i'm missing point - said new vba , trying learn as possible :)

edit: solution was passing each chart above sub after had created chart, before had set data source chart. doh!

this meant there no seriescollections chart, hence error getting.

i marked joehannah answering question (even though isn't technically solution) because made me check code , notice above causing problem - if shouldn't please tell me , i'll try fix it!

you better off using set cht = (create chart object) each chart , calling format method passing in cht.


Comments

Post a Comment

Popular posts from this blog

javascript - Google App Script ContentService downloadAsFile not working -

i have web app developed using google app script htmlservice , html form, populating excel sheet in google drive using spreadsheetapp . , 1 section calling contentservice download data excel file. function doget(e) { // read excel sheet //getappfile(); // render application html template return htmlservice.createtemplatefromfile('index').evaluate() .settitle('go smart') .setsandboxmode(htmlservice.sandboxmode.iframe); } function downloaddoublequatecsvfile() { var sheetid = propertiesservice.getscriptproperties().getproperty('sheetid'); var ss = spreadsheetapp.openbyid(sheetid).getactivesheet(); //var ss = spreadsheetapp.getactivespreadsheet().getactivesheet(); var maxcolumn = ss.getlastcolumn(); var maxrow = ss.getlastrow(); var data = ss.getrange(1, 1, maxrow, maxcolumn).getvalues(); if (data.length > 1) { var csv = ""; (var row = 0; row < data.length; row++) { (var c...
Read more

javascript - Function overwritting -

is there way overwrite function or event handling in function? using addeventlistener, can have many event handlers on element want var test=document.getelementbyid("div"); test.addeventlistener("click",function(){alert("im first");},false); test.addeventlistener("click",function(){alert("im second");},false); // alerts "im first" , after "im second" but if want overwrite function/event example based on client width example this function one() { alert("first"); } function two() { alert("second"); } window.onresize = function() { var test = document.getelementbyid("div"); if (window.innerwidth > 500) { test.onclick = 1 } else { test.onclick = two; } } is possible in javascript? in case use effective little known approach. addeventlistener can accept object property handleevent event handler. in case it's easy overwr...
Read more

php - Find a regex to take part of Email -

i have following emails need extract part from: bestellnummer xxx: 1 von xxx, 1er pack ------------- anfang der nachricht ------------- foo bar baz foo bar baz // <<<<< need text here ------------- ende der nachricht ------------- ------------- anfang der nachricht ------------- foo bar baz foo bar baz ------------- ende der nachricht ------------- there 0 unlimited occurences of ------------- anfang der nachricht ------------- ------------- ende der nachricht ------------- and i'm able extract first part regex: $re = "/------------- .*? -------------.?(.*?).?------------- .*? -------------/s"; but, i'm quite new on learning regex, i'm pretty sure there must better regex extract part (foo bar baz foo bar baz) of text between ------------- anfang der nachricht ------------- ------------- ende der nachricht ------------- as can in different languages, i'm using .? to match between hyphens. i...
Read more