[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[amibroker] Re: Excel VBA code to change chart in AB



PureBytes Links

Trading Reference Links


Thanks Mike!  That worked perfectly.

In the event someone wants to do something similar here's the code I used (MS-Excel VBA) Note: I'm not a programmer so please excuse anything that isn't quite kosher or efficient.  Also, if the ticker doesn't already exist, it does nothing.

Sub ChangeABTicker()

    Dim Amibroker As Object
    Dim StockName As String
    Dim ActiveDoc As Object

    ActiveSheet.Activate
    StockName = ActiveCell.Value
    If StockName = "" Then End
    
    Set Amibroker = CreateObject("Broker.application")
    Set ActiveDoc = Amibroker.ActiveDocument
    ActiveDoc.Name = StockName
    
    Amibroker.RefreshAll

    Set ActiveDoc = Nothing
    Set Amibroker = Nothing

End Sub


--- In amibroker@xxxxxxxxxxxxxxx, "Mike" <sfclimbers@xxx> wrote:
>
> I seem to recall that changing the Name property of the ActiveDocument property of the Application object will load the symbol. Haven't tried it recently though, so I can't swear to it ;)
> 
> e.g. from JScript
> 
> ab = new ActiveXObject("Broker.Application");
> ab.ActiveDocument.Name = "ORCL";
> 
> http://www.amibroker.com/guide/objects.html#Application
> 
> Mike
> 
> --- In amibroker@xxxxxxxxxxxxxxx, "kurasake" <kurasake@> wrote:
> >
> > Hi.
> > 
> > I'm trying to find some code in MS-Excel VBA that would allow me to select a cell in Excel containing a stock ticker, pass that stock ticker to AB and have AB select that symbol and change the graph/chart.
> > 
> > I see plenty of examples that show how to export/import stock data but I don't seem to see any code or objects, methods. properties in the AB Object Model that would change the chart.
> > 
> > The closest I've found is if I add a new ticker/symbol using the Stocks.Add(<stockname>) method then it will add the symbol to AB, switch to it and have the chart created on the fly (I'm using a live data feed).  But, if the ticker already exists in AB then it does nothing.  
> > 
> > I'm using AB 5.2 Pro and Excel 2003
> > 
> > Any help would be appreciated.
> > 
> > Thank you.
> >
>



------------------------------------

**** IMPORTANT PLEASE READ ****
This group is for the discussion between users only.
This is *NOT* technical support channel.

TO GET TECHNICAL SUPPORT send an e-mail directly to 
SUPPORT {at} amibroker.com

TO SUBMIT SUGGESTIONS please use FEEDBACK CENTER at
http://www.amibroker.com/feedback/
(submissions sent via other channels won't be considered)

For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
http://www.amibroker.com/devlog/

Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/amibroker/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/amibroker/join
    (Yahoo! ID required)

<*> To change settings via email:
    amibroker-digest@xxxxxxxxxxxxxxx 
    amibroker-fullfeatured@xxxxxxxxxxxxxxx

<*> To unsubscribe from this group, send an email to:
    amibroker-unsubscribe@xxxxxxxxxxxxxxx

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/