excel - Extracting a Specific Variable from a Class Module in VBA to a Standard Module -


all, following code bloomberg. designed extract bulk data servers. code works, trying extract specific variable generated in class module , bring regular module user defined functions. help.

option explicit private withevents session blpapicomlib2.session dim refdataservice blpapicomlib2.service  private sub class_initialize() set session = new blpapicomlib2.session session.queueevents = true session.start session.openservice ("//blp/refdata") set refdataservice = session.getservice("//blp/refdata") end sub  public sub makerequest(sseclist string) dim sfldlist variant dim req request dim nrow long sfldlist = "call_schedule" set req = refdataservice.createrequest("referencedatarequest") 'request type req.getelement("securities").appendvalue (sseclist) 'security + field string array req.getelement("fields").appendvalue (sfldlist) 'field string var dim cid blpapicomlib2.correlationid set cid = session.sendrequest(req) end sub  public sub session_processevent(byval obj object) dim eventobj blpapicomlib2.event set eventobj = obj if application.ready     if eventobj.eventtype = partial_response or eventobj.eventtype = response         dim blpapicomlib2.messageiterator         set = eventobj.createmessageiterator()         while it.next()             dim msg message             set msg = it.message                 dim security element                 set security = msg.getelement("securitydata").getvalue(0)                 sheet1.cells(4, 4).value = security.getelement("security").value                 dim fieldarray element                 set fieldarray = security.getelement("fielddata")                     dim field blpapicomlib2.element                     set field = fieldarray.getelement(0)                     if field.datatype = 15                         dim numbulkvalues long                         numbulkvalues = field.numvalues '76                         dim index long                         index = 0 numbulkvalues - 1                             dim bulkelement blpapicomlib2.element                             set bulkelement = field.getvalue(index)                             dim numbulkelements integer                             numbulkelements = bulkelement.numelements '2 elements per each pt                             redim call_sch(0 numbulkvalues - 1, 0 numbulkelements - 1) variant                             dim ind2 long                             ind2 = 0 numbulkelements - 1                                 dim elem blpapicomlib2.element                                 set elem = bulkelement.getelement(ind2)                                 call_sch(index,ind2)=elem.value                                 sheet1.cells(index + 4, ind2 + 5) = elem.value                             next ind2                         next index                     else                     call_sch(index,ind2)=field.value                         sheet1.cells(index + 4, ind2 + 5).value = field.value                     end if         loop     end if end if end sub

the variable trying get, specifically, call_sch. want function in main module recognize variable. again.

it isn't necessary declare variable before using redim on it; redim can declare variable. however, if added:

public call_sch() variant ' insert correct data type here

then able refer via:

<yourclassvaraiblename>.call_sch

Comments

Post a Comment

Popular posts from this blog

Why does Ruby on Rails generate add a blank line to the end of a file? -

running rails generate controller foo home results in: class foocontroller < application controller def home end end (there's nothing on line in actual file, blank line) is there purpose blank line? it's common use newline indicate end of line, last line. many editors (like vi, use) add in newline silently. consensus text files (especially in unix world) should end in newline, , there have been problems historically if wasn't present. why should text files end newline? the tool used count lines in file "wc" counts newlines in file, without trailing newline show 3 instead of 4. it improves readability of templates used in generator. consider: https://github.com/rails/rails/blob/master/railties/lib/rails/generators/rails/controller/templates/controller.rb to remove trailing newline, template have last line of: end<% end -%> instead of: end <% end -%> that seems less readable me. the discussion below refers ...
Read more

keyboard - Smiles and long press feature in Android -

i've created android keyboard. how add features inserting smilies, , using long keypresses display symbols? to create long-press behavior allows select several options pop-up menu, follow guide (specifically pop-up menu section): http://developer.android.com/guide/topics/ui/menus.html smileys (also known emoticons) combination of keys, understood programs , parsed same way. have do, when clicks smiley face on keyboard, simulate pressing of key combination matching emoticon. example, when clicks smiley, should simulate key presses ':' , ')' :). here's list of emoticons: http://en.wikipedia.org/wiki/list_of_emoticons
Read more

node.js - Bad Request - node js ajax post -

i'm using express 3.0 , node v0.11.0. have button submits form , i'm using ajax post data json object node server. client code is: $('#contact').submit(function(e) { console.log('submit called'); var formdata = json.stringify($('form').serializeobject()); console.log(formdata); $.ajax({ url: "http://localhost:3000/savedata/", type: "post", datatype: 'json', data: {objectdata: formdata}, contenttype: "application/json", complete: function() { console.log('process complete'); }, success: function(data) { console.log('process sucess'); }, error: function() { console.log('process error'); }, }); return false; }); then on server: var express = require('express'); var app = express(); app.set('views', __dirname + '/views'); app.set('view engine', 'jade'); app.use(express.bodyparser());...
Read more