[求助]如何在一堆Excel文档中找出内容含有关键词的文件并移动到指定文件夹。

Kira_1984 · 发表于 2019-10-17 00:37:56

A文件夹中有数百个excel文档，需要在这些文档中找出内容含有指定关键词（例如：abc）的文件，并将这些文件移动到指定文件夹B中。
求大神帮忙写一段批处理代码

Kira_1984 · 发表于 2019-11-1 11:56:41

求助一下，有没有大神在

terse · 发表于 2019-11-1 14:07:06

回复 2# Kira_1984
试一下这个可以帮到不

$Destination = '\B\'
$SearchText = 'ABC'
if (![System.IO.Directory]::Exists($Destination)) {$null = New-Item $Destination -type directory}
$Excel = New-Object -ComObject Excel.Application
$Excel.Visible
$Files = Get-ChildItem ".\A\*.xlsx" | Select -Expand FullName
$f = ForEach($File in $Files){
$Workbook = $Excel.Workbooks.Open($File)
If($Workbook.Sheets.Item(1).UsedRange.Find($SearchText)){
$File
}
$workbook.close($false)
}
$f | Move-Item -Destination $Destination
$Excel.Quit()

复制代码

Kira_1984 · 发表于 2020-2-11 22:42:15

回复 Kira_1984
试一下这个可以帮到不
terse 发表于 2019-11-1 14:07

试了下好像不行。Windows本身的搜索功能可以用来含关键字内容的文件，不知道有没有命令可以调用windows的查找功能把文件找出来。

Batcher · 发表于 2020-2-12 07:40:49

回复 4# Kira_1984

没有。findstr命令可以查找txt文件，但是不能查找Excel这种非纯文本文件。

Batcher · 发表于 2020-2-12 07:41:56

回复 4# Kira_1984

执行3楼的代码有什么报错信息？

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文本处理] [求助]如何在一堆Excel文档中找出内容含有关键词的文件并移动到指定文件夹。