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

[文本处理] 求一个, bat命令批量删除多个excel 内的指定 列

[复制链接]
发表于 2018-10-10 11:47:03 | 显示全部楼层 |阅读模式
拜托删除a b d e 整列  而且是多个文件的
发表于 2018-10-10 12:36:42 | 显示全部楼层
删除列还是清空内容?
 楼主| 发表于 2018-10-10 12:56:02 | 显示全部楼层
删除列 谢谢
发表于 2018-10-10 14:08:04 | 显示全部楼层
本帖最后由 flashercs 于 2018-10-11 17:51 编辑

删除列.js
  1. var fso,
  2.     colFiles,
  3.     file,
  4.     aCols = [1, 2, 4, 5],
  5.     oExcelApp,
  6.     oWorkbook,
  7.     oSheet,
  8.     j;
  9. oExcelApp = new ActiveXObject('Excel.Application');
  10. oExcelApp.DisplayAlerts = false;
  11. fso = new ActiveXObject('Scripting.FileSystemObject');
  12. colFiles = new Enumerator(fso.GetFolder(fso.GetParentFolderName(WScript.ScriptFullName)).Files);
  13. for (; !colFiles.atEnd(); colFiles.moveNext()) {
  14.     file = colFiles.item().Path;
  15.     if ('xlsx' !== fso.GetExtensionName(file).toLowerCase()) continue;
  16.     try {
  17.         oWorkbook = oExcelApp.Workbooks.Open(file);
  18.         oSheet = oWorkbook.Worksheets(1);
  19.         for (j = aCols.length - 1; j >= 0; --j) {
  20.             oSheet.Columns(aCols[j]).Delete(-4159);
  21.         }
  22.         oWorkbook.Close(true);
  23.     } catch (err) {
  24.         WScript.Echo(file + '\n' + err.message);
  25.     }
  26. }
  27. oExcelApp.DisplayAlerts = true;
  28. oExcelApp.Quit();
  29. WScript.Echo('Mission complete');
复制代码
 楼主| 发表于 2018-10-10 17:47:18 | 显示全部楼层
本帖最后由 carter09 于 2018-10-10 17:58 编辑

不好意思 你这个是 固定文件名的 我这里文件名字都是不统一的 太多了 实在没法子 一个一个添加文件名字 麻烦能再简单点吗?最好是直接把JS文件、或是BAT文件拖进文件夹 双击就可以批量删除。拜托了
发表于 2018-10-10 17:55:21 | 显示全部楼层
回复 5# carter09


    只删 a b d e四列啊,删除列后右侧列左移
 楼主| 发表于 2018-10-10 17:59:40 | 显示全部楼层
不好意思了  最好是直接把JS文件、或是BAT文件拖进文件夹 双击就可以批量删除。拜托了
发表于 2018-10-10 18:01:13 | 显示全部楼层
回复 7# carter09


    处理当前文件夹内所有的excel文件?
 楼主| 发表于 2018-10-10 18:03:10 | 显示全部楼层
是的  太感谢了  处理当前文件夹内所有的excel文件
发表于 2018-10-10 18:38:49 | 显示全部楼层
回复 9# carter09

已修改了
 楼主| 发表于 2018-10-10 19:59:40 | 显示全部楼层
太感谢了 万分感谢
 楼主| 发表于 2018-10-11 09:40:10 | 显示全部楼层
不好意思 我又来麻烦你了 这些做好的文件 能批量打印吗?文件实在太多了。拜托
批量打印文件夹内的excel文件(很多文件)
 楼主| 发表于 2018-10-11 09:40:37 | 显示全部楼层
回复 4# flashercs


   
不好意思 我又来麻烦你了 这些做好的文件 能批量打印吗?文件实在太多了。拜托
批量打印文件夹内的excel文件(很多文件)
发表于 2018-10-11 10:48:51 | 显示全部楼层
回复 13# carter09


    打印所有工作表还是只打印Sheet1 ?
打印几份copy ?
 楼主| 发表于 2018-10-11 11:50:49 | 显示全部楼层
就是一个文件夹内的excel文件(很多文件)所以只需要打印Sheet1就行,最好能调解打印版面 用横面打印
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-20 19:13 , Processed in 0.033847 second(s), 17 queries .

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表