使用R中的rdcomclient调整从excel范围拍摄的图片的大小/分辨率

Question

在R上工作时，我一直在尝试从excel工作表中选择的字段创建图片。但是，我注意到图片的大小与实际的excelsheet不同。所以我想知道如何更改高度/宽度并提高分辨率，因为默认分辨率很差。

我正在运行以下代码，基于我在堆栈溢出的另一篇文章中所发现的内容。

有没有人知道如何解决这个问题？

谢谢！

 library(RDCOMClient)
 library(openxlsx)

 xlApp <- COMCreate("Excel.Application")
 xlWbk <- xlApp$Workbooks()$Open("C:\\Users\\...\\testbook.xlsx")
 xlScreen = 1
 xlBitmap = 2

 xlWbk$Worksheets("tab123")$Range("B2:Q63")$CopyPicture(xlScreen, 
 xlBitmap)

 xlApp[['DisplayAlerts']] <- FALSE

 oCht <- xlApp[['Charts']]$Add()
 oCht$Paste()
 oCht$Export("C:\\Users\\...\\SavedRange.png", "png")
 oCht$Delete()

 # CLOSE WORKBOOK AND APP
 xlWbk$Close(FALSE)
 xlApp$Quit()

 # RELEASE RESOURCES
 oCht <- xlWbk <- xlApp <- NULL    
 rm(oCht, xlWbk, xlApp)
 gc()