Does anyone know the proper syntax to download from Bloomberg into Excel
using the Active X function. I have no experience programming with Bloomberg
so I am at a lost in this area. I just want to download the EONIA value from
Bloomberg into a column in Excel, so if anyone can help me with this it will
be appreciated.

Range("A6").Select
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.bloomberg.com/apps/quote?ticker=EONIAIC:FP",
Destination:= _
Range("A6"))
.Name = "FP_1"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "10"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With

"drinese18" wrote:

> Does anyone know the proper syntax to download from Bloomberg into Excel
> using the Active X function. I have no experience programming with Bloomberg
> so I am at a lost in this area. I just want to download the EONIA value from
> Bloomberg into a column in Excel, so if anyone can help me with this it will
> be appreciated.

Ok it does download something but not the Eonia values, but thats not biggie
I already corrected that. The thing is I didn't want it to download through
the Web query procedure because that downloads a snapshot of w/e thats in the
table, including the table names and so on, jus basically wanted it to
download one value which is why I was saying I want to do it
programmatically, if you can explain a way to do this that would be great or
anyone else, thanks

"Joel" wrote:

> Range("A6").Select
> With ActiveSheet.QueryTables.Add(Connection:= _
> "URL;http://www.bloomberg.com/apps/quote?ticker=EONIAIC:FP",
> Destination:= _
> Range("A6"))
> .Name = "FP_1"
> .FieldNames = True
> .RowNumbers = False
> .FillAdjacentFormulas = False
> .PreserveFormatting = True
> .RefreshOnFileOpen = False
> .BackgroundQuery = True
> .RefreshStyle = xlInsertDeleteCells
> .SavePassword = False
> .SaveData = True
> .AdjustColumnWidth = True
> .RefreshPeriod = 0
> .WebSelectionType = xlSpecifiedTables
> .WebFormatting = xlWebFormattingNone
> .WebTables = "10"
> .WebPreFormattedTextToColumns = True
> .WebConsecutiveDelimitersAsOne = True
> .WebSingleBlockTextImport = False
> .WebDisableDateRecognition = False
> .WebDisableRedirections = False
> .Refresh BackgroundQuery:=False
> End With
>
> "drinese18" wrote:
>
> > Does anyone know the proper syntax to download from Bloomberg into Excel
> > using the Active X function. I have no experience programming with Bloomberg
> > so I am at a lost in this area. I just want to download the EONIA value from
> > Bloomberg into a column in Excel, so if anyone can help me with this it will
> > be appreciated.

You can use a refresh by settting the refreshperiod

Set objPC = Worksheets("Sheet1").PivotTables("PivotTable3").PivotCache
objPC.RefreshPeriod = 15

or just perform a refresh

Worksheets(1).PivotTables(1).PivotCache.Refresh



"drinese18" wrote:

> Ok it does download something but not the Eonia values, but thats not biggie
> I already corrected that. The thing is I didn't want it to download through
> the Web query procedure because that downloads a snapshot of w/e thats in the
> table, including the table names and so on, jus basically wanted it to
> download one value which is why I was saying I want to do it
> programmatically, if you can explain a way to do this that would be great or
> anyone else, thanks
>
> "Joel" wrote:
>
> > Range("A6").Select
> > With ActiveSheet.QueryTables.Add(Connection:= _
> > "URL;http://www.bloomberg.com/apps/quote?ticker=EONIAIC:FP",
> > Destination:= _
> > Range("A6"))
> > .Name = "FP_1"
> > .FieldNames = True
> > .RowNumbers = False
> > .FillAdjacentFormulas = False
> > .PreserveFormatting = True
> > .RefreshOnFileOpen = False
> > .BackgroundQuery = True
> > .RefreshStyle = xlInsertDeleteCells
> > .SavePassword = False
> > .SaveData = True
> > .AdjustColumnWidth = True
> > .RefreshPeriod = 0
> > .WebSelectionType = xlSpecifiedTables
> > .WebFormatting = xlWebFormattingNone
> > .WebTables = "10"
> > .WebPreFormattedTextToColumns = True
> > .WebConsecutiveDelimitersAsOne = True
> > .WebSingleBlockTextImport = False
> > .WebDisableDateRecognition = False
> > .WebDisableRedirections = False
> > .Refresh BackgroundQuery:=False
> > End With
> >
> > "drinese18" wrote:
> >
> > > Does anyone know the proper syntax to download from Bloomberg into Excel
> > > using the Active X function. I have no experience programming with Bloomberg
> > > so I am at a lost in this area. I just want to download the EONIA value from
> > > Bloomberg into a column in Excel, so if anyone can help me with this it will
> > > be appreciated.