在Windows系统的R语言中如何从剪贴板获取文件完整路径及文件名？

问题原因 #

utils::readClipboard()和clipr::read_clip()返回NULL的核心原因是：在文件资源管理器中复制文件时，剪贴板存储的是文件对象引用，而非纯文本路径。这两个函数仅能读取剪贴板中的文本内容，因此无法识别文件对象，返回NULL。

解决方案 #

以下两种方法可直接提取剪贴板中文件的完整路径：

方法1：调用PowerShell命令（无需额外安装包）

利用Windows内置的PowerShell命令，直接读取剪贴板中的文件拖放列表并提取路径：

# 获取剪贴板中的所有文件路径
clipboard_files <- system("powershell -command 'Get-Clipboard -Format FileDropList | Select-Object -ExpandProperty Path'", intern = TRUE)

# 输出路径列表
print(clipboard_files)

拿到路径后，可直接用Excel读取包处理文件，示例：

library(readxl)

# 批量读取并处理文件
for (file_path in clipboard_files) {
  df <- read_excel(file_path)
  # 此处添加你的数据处理逻辑
  cat("已读取文件：", file_path, "\n")
}

方法2：使用win32clipboard包（直接操作Windows剪贴板）

该包可直接访问Windows剪贴板的特定格式，需先安装：

install.packages("win32clipboard")

读取文件路径的代码：

library(win32clipboard)

# 打开剪贴板并读取文件拖放格式内容
win32clipboard_open()
clip_data <- win32clipboard_get(format = win32clipboard_format("CF_HDROP"))
win32clipboard_close()

# 解析内容提取路径（CF_HDROP格式以空字符分隔）
file_paths <- strsplit(clip_data, "\0", fixed = TRUE)[[1]]
file_paths <- file_paths[nzchar(file_paths)] # 过滤空字符串

print(file_paths)

注意事项 #

• 确保复制的是文件本身（资源管理器中选中文件后按Ctrl+C），而非文件路径的文本。
• 若复制多个文件，两种方法均会返回所有文件的完整路径列表。

内容的提问来源于stack exchange，提问作者chm