excel - VBA 布隆伯格公式

标签 excel vba formula bloomberg

我的代码有问题,这里是:

Sheets("Data - Backtest").Cells(5, linCompteur - 1).FormulaR1C1 = _
  "=BDH(R[-3]C[1],""PX_LAST"",""ED-"" & " & .Cells(6, 5).Value & " & ""AYA""," & .Cells(7, 5).Value & ", **""per="" & " & .Cells(9, 6).Value & "** , **""fx="" & " & .Cells(8, 5).Value & "** ,""Days=W"",""Fill=P"",""cols=2"")"

在 Excel 中它给出了这个,
=BDH(R[-3]C[1];"PX_LAST";"ED-" & 5 & "AYA";; **"per=" & d**; **"fx=" & EUR**;"Days=W";"Fill=P";"cols=2")

我知道问题出在哪里,是 d 和 EUR,应该是这样的:
=BDH(R[-3]C[1];"PX_LAST";"ED-" & 5 & "AYA";;**"per=" & "d"**;**"fx=" & "EUR"**;"Days=W";"Fill=P";"cols=2";"cols=2;rows=1305")

但我不知道如何为 VBA 中的等效项执行此操作。

最佳答案

我将一些字符串连接放在一起,似乎没有任何理由将它们分开。

workSheets("Data - Backtest").Cells(5, linCompteur - 1).FormulaR1C1 = _
  "=BDH(R[-3]C[1], ""PX_LAST"", ""ED-" & .Cells(6, 5).Value & "AYA"", " & .Cells(7, 5).Value & ", ""per=" & .Cells(9, 6).Value & """ , ""fx=" & .Cells(8, 5).Value & """ , ""Days=W"", ""Fill=P"", ""cols=2"")"

这是工作表上的结果。
=BDH(R[-3]C[1], "PX_LAST", "ED-5AYA", , "per=d" , "fx=EUR" , "Days=W", "Fill=P", "cols=2")

关于excel - VBA 布隆伯格公式,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/52402066/

相关文章:

excel - 当 VBA 代码到达第 1,048,576 行时如何更改目标输出

excel - 有人能解释一下这个 Excel 2010 或更早版本的密码保护器是如何工作的吗

vba - 在 PowerPoint 2007 中将宏另存为插件

regex - 是否可以改进此正则表达式以在 Excel 单元格中查找编号的文本行以避免错误匹配?

当方程不可因式分解时,Java 仅返回 0

excel - 为什么 outlook.timezones.converttime 会导致 DST 更改错误?

excel - 能否从 Excel 单元格中选择 if 语句中的运算符?

vba - 如何使用宏在 Excel 中缩放图表特定区域

Excel从固定单元格引用到列末尾?

excel - 将公式应用于excel中的所有其他列