R语言 如何读取受密码保护的Excel文件

在这篇文章中，我们将看到如何在R编程语言中读取受密码保护的Excel文件。

使用的文件： 文件

方法1：使用excel.link包

这里我们将使用excel.link包来读取有密码的文件。

安装

install.packages(“excel.link”)

xl.read.file() 函数用于在R编程中读取Excel文件。

语法

xl.read.file( “file_name”, password = “pass”)

例子1 :

# import lib
library("excel.link")
  
# read file with pass
df <- xl.read.file("data.xlsx", password = "gfg@123")
  
# display df
head(df)

输出

同样的模块可以用来首先解锁文件，然后将其内容复制到另一个文件，这样就可以在没有任何密码的情况下再次访问该文件。这里我们用一个密码NULL值来保存文件，并将其保存到另一个文件中。

语法

xl.save.file( file.object, “New_file”, password = NULL , write.res.password = NULL)

程序

# import lib
library("excel.link")
  
# read file with pass
df <- xl.read.file("data.xlsx", password = "gfg@123")
  
# save the df into new file
xl.save.file(df, "Output.xlsx", password = NULL,
             write.res.password = NULL)
  
# read file without any password
df1 <- xl.read.file("Output.xlsx")
  
head(df)

输出

方法2：使用XLConnect包

这里我们将使用XLConnect包来读取 受密码保护的文件。这个包 提供了全面的功能来读取、写入和格式化Excel数据 。

loadWorkbook() 函数加载Microsoft Excel工作簿。

语法

loadWorkbook(filename , password )

readWorksheet() 函数从工作表中读取数据。

语法： readWorksheet(object, sheet)

参数

• object： 要使用的 ‘ **> 工作簿 **
• sheet： 要读取的工作表的名称或索引

程序

# import lib
library(XLConnect)
  
# load the file
workbook <- loadWorkbook("data.xlsx", password = "gfg@123")
  
# read the object
df <- readWorksheet(workbook, "sheet1")
  
# display df
head(df)

输出