RDCOMClient删除自动筛选

问题描述

我已经用RDCOMClient打开了一个工作簿,并想删除某个工作表上的自动过滤器:

xlApp <- COMCreate("Excel.Application")
xlApp[['Visible']] <- TRUE 
xlWbk <- xlApp$Workbooks()$Open('file.xlsx')

## sheet with data filters
sheet <- xlWbk$Worksheets('Sheet1')

我尝试了一些类似的事情:

sheet$AutoFilter()[['Value']] = FALSE

sheet$AutoFilter()$Filter = FALSE

但是还不能完全禁用数据过滤器

解决方法

这可以解决问题。查找并转换了VBA代码。将来应该会有用。

sheet[["AutofilterMode"]] <- F