如何在 R 中读取受密码保护的 excel 文件？

在本文中，我们将了解如何使用 R 编程语言读取受密码保护的 Excel 文件。

正在使用的文件：文件

方法一：使用excel.link包。

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

安装：

install.packages(“excel.link”)

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

句法：

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

示例 1：

R

# 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)

输出：

方法二：使用XLConnect包。

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

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

句法：

loadWorkbook(filename , password )

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

Syntax: readWorksheet( object, sheet).

Parameters: 

• Object: The ‘>workbook to use
• Sheet: The name or index of the worksheet to read from

程序：

电阻

# 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)

输出：