vba - Trouble referencing temporary, unsaved workbook when copying worksheets -



vba - Trouble referencing temporary, unsaved workbook when copying worksheets -

i have bunch of worksheets want re-create new, temporary workbook -- without saving it.

worksheet.copy copies worksheet new, unnamed'ish (book1, book2, book3, etc) workbook. want sheets copied same workbook. worksheets after first, have tried using worksheet.copy after:=xlwb.sheets(1), not know how reference newly created workbook when setting xlwb workbook-object. maintain receiving run-time error 9, 'subscript out of range'.

i appreciate help can give.

edit: next relevant dims:

dim xlapp excel.application dim xlwb excel.workbook dim xlwbold string dim xlws excel.worksheet dim xlwbnew excel.workbook dim xlwsold excel.worksheet dim xlrng excel.range dim xlrngold excel.range xlwbold = activeworkbook.name set xlapp = new excel.application xlapp.visible = true '*** quite of import set excel.visible,_ 'otherwise user wouldn't see application's running _ 'even though run background xlapp.application.screenupdating = false set xlwb = xlapp.workbooks.add 'create new workbook set xlws = xlwb.worksheets.add

and worksheets should copied:

select case strrpttype case "daily" xlws.name = "1-daily price" 'check lastly column , lastly row llastrow = obasic.getlast(, "dailyrpt", false, "a") ilastcol = obasic.getlast(, "dailyrpt", true, 4) set xlrngold = wksdailyrpt.range(wksdailyrpt.cells(4, 1), wksdailyrpt.cells(llastrow, ilastcol)) application.screenupdating = true xlrngold.copy set xlrng = xlws.cells(1, 1) xlrng.pastespecial paste:=xlpastevalues xlws.columns.autofit each xlwsold in activeworkbook.worksheets if xlwsold.name = "forwardprices" or xlwsold.name = "forwardvolatilities" _ or xlwsold.name = "forwardreturns" or xlwsold.name = "forwardcorrelations" sheets(xlwsold.name).copy after:=workbooks(xlwb).sheets(1) end if next xlwsold end select

this little macro goes through sheets of open workbooks, , copies them after current sheet.

sub gatherallsheets() dim wb workbook, sh worksheet each wb in workbooks if not wb thisworkbook each sh in wb.worksheets sh.copy after:=activesheet next sh end if next wb end sub

is need? or need re-create content of sheets on same sheet?

vba object excel-vba copy worksheet-function

Comments

Post a Comment

Popular posts from this blog

web services - java.lang.NoClassDefFoundError: Could not initialize class net.sf.cglib.proxy.Enhancer -

web services - java.lang.NoClassDefFoundError: Could not initialize class net.sf.cglib.proxy.Enhancer - when trying request rest service @ time of response getting exception.. feb 21, 2013 2:34:49 pm com.sun.jersey.spi.container.containerresponse mapmappablecontainerexception severe: exception contained within mappablecontainerexception not mapped response, re-throwing http container java.lang.noclassdeffounderror: not initialize class net.sf.cglib.proxy.enhancer @ org.hibernate.proxy.pojo.cglib.cgliblazyinitializer.getproxyfactory(cgliblazyinitializer.java:117) @ org.hibernate.proxy.pojo.cglib.cglibproxyfactory.postinstantiate(cglibproxyfactory.java:43) @ org.hibernate.tuple.entity.pojoentitytuplizer.buildproxyfactory(pojoentitytuplizer.java:162) @ org.hibernate.tuple.entity.abstractentitytuplizer.<init>(abstractentitytuplizer.java:135) @ org.hibernate.tuple.entity.pojoentitytuplizer.<init>(pojoentitytuplizer.java:55) @ org.hibernate.tuple.e...
Read more

Accessing MATLAB's unicode strings from C -

Accessing MATLAB's unicode strings from C - how can access underlying unicode info of matlab strings through matlab engine or mex c interfaces? here's example. let's set unicode characters in utf-8 encoded file test.txt, read as fid=fopen('test.txt','r','l','utf-8'); s=fscanf(fid, '%s') in matlab. now if first feature('defaultcharacterset', 'utf-8') , c engevalstring(ep, "s") , output text file utf-8. proves matlab stores unicode internally. if mxarraytostring(enggetvariable(ep, "s")) , unicode2native(s, 'latin-1') give me in matlab: non-latin-1 characters replaced character code 26. need getting access underlying unicode info c string in unicode format (utf-8, utf-16, etc.), , preserving non-latin-1 characters. is possible? my platform os x, matlab r2012b. addendum: documentation explicitly states "[mxarraytostring()] supports multibyte encoded characters...
Read more

javascript - mongodb won't find my schema method in nested container -

javascript - mongodb won't find my schema method in nested container - i trying access method of schema stored within mixed container. here situation : have cases model can many different things, have schema each of these things stored in "casecontent" mixed property. var caseschema = mongoose.schema({ casecontent : {}, object : {type:string, default : "null"}, collision : {type : boolean, default : false} }); the casecontent property filled model of 1 of schemas, 1 exemple : var treeschema = new mongoose.schema({ applecount : {type : number, default : 3} }); treeschema.methods.dostuff = function (data) { console.log('hey, listen'); homecoming true; }; then, want utilize method of schema original container : caseschema.methods.dostuff = function (data) { if (this.casecontent.dostuff !== undefined) { this.casecontent.dostuff(); console.log('it worked'); } else { ...
Read more