xlconnect R软件包禁用Excel模板中的计算

时间:2017-04-10 23:57:11

标签: r excel excel-vba xlconnect vba

我正在尝试在Excel模板中从R编写原始数据,然后运行一个小VBA宏将原始数据转换为漂亮且可呈现的内容。我使用XLConnect。问题是XLConnect似乎禁用了Excel工作表中的计算。

这是我将数据帧写入Excel的R代码:

VaR.dataframe = structure(list(names = c("VaR.montecarlo", "TVaR.montecarlo", "VaR.historic.1yr", "VaR.historic.2yr", "VaR.historic.3yr", "VaR.gaussian"), X95. = c(0.0363375421892311, 0.0507403479325009, 0.0402675195649073, 0.0400483852784169, 0.0357565527744698, 0.038409381028186), X97.5. = c(0.0473956950987274, 0.0598796459552848, 0.0528350062512669, 0.0483427549702983, 0.0432047576422228, 0.0488252950503447), X99. = c(0.0589594848085542, 0.0714812674589506, 0.06597791329211, 0.0596859927016254, 0.0544507369487263, 0.0609360460943547)), .Names = c("names", "X95.", "X97.5.", "X99."), class = "data.frame", row.names = c(NA, -6L))    
template_filename = "C:\\Temp\\my_template.xlsm"
writeWorksheetToFile(file = template_filename, data = VaR.dataframe, sheet = "VaR")

这会进入名为VaR的原始表格,我不会向客户展示。我向客户展示的东西看起来更像是这样:

enter image description here

表中的所有数字都是原始VaR表中的VLOOKUP公式。最后一步是运行一个小的VBA宏,它将在公式上复制粘贴特殊值,并删除看起来很可怕的橙色行和列。

R脚本更新我的Excel模板后

问题,公式不起作用。即使我打开工作簿并按F9进行计算,它们都是#N/A。这将保持正确,直到我通过Ctrl-Alt-F9进行强制计算。

我的第一直觉是在我的VBA宏中强制Ctrl-Alt-F9组合键:

Call Application.SendKeys("^%{F9}")

但这似乎也不起作用。

有谁知道如何在宏中强制计算?或者建议一个不会损坏我的电子表格的Excel编写R包?

1 个答案:

答案 0 :(得分:1)

对于Ctrl / Alt / F9,请尝试Application.CalculateFull