Help for this page

Select Code to Download


  1. or download this
    
 Dim vtSec As Variant <br>
...
      vtSec = Array(Cells(currRow, colBBCode).Value & "  " & Cells(cur
+rRow, colSecType).Value)<br>
      vtData = bbObject.BlpGetHistoricalData(vtSec, vtFields, CDate(st
+rBdate), CDate(strEDate)) <br>
  2. or download this
    use Win32::OLE;<br>
use Win32::OLE::Variant;<br>
...
  #}<br>

print  "end"  ;<br>