如何在R中创建超链接以移动到下一个工作表

Question

我在R中需要帮助。

我有3个部门的销售，营销，帐户数据的数据。 将这些数据导出到excel时，我想要的输出看起来像在第一张表中我需要3行数据，即：销售，营销，帐户。

这3行包含指向下一个工作表的超链接 当我点击销售时，它将带我进入销售表以及剩余。

任何人都可以帮助完成这项工作吗？ 任何帮助将不胜感激。

Answer 1

要链接到其他工作表，请使用

addHyperlink(cell, "sheetname!colRow", linkType="DOCUMENT") 

例如

library(xlsx) 
wb <- createWorkbook() 
sheet1 <- createSheet(wb, "Sheet1") 
sheet2 <- createSheet(wb, "Sheet2") 
rows <- createRow(sheet1, 1:10) # 10 rows 
cells <- createCell(rows, colIndex=1:8) # 8 columns 

row <- 1
link <- paste0(names(getSheets(wb))[2], "!", "A", row)
setCellValue(cells[[row,1]], "link to other sheet") 
addHyperlink(cells[[row,1]], link, linkType="DOCUMENT") 

saveWorkbook(wb, "links.xlsx") 
shell.exec("links.xlsx")