ExcelVBA 每张工作表只保留第一列
网友提问:

我的回复:

网友回复:

现在基本可以理解网友需求了,于是我进一步与网友核对需求

我每次文章都发网友需求,只是想让大家用原图+目标图的方式提问,这样可以节省很多时间。你们问题大多很简单,比如今天的问题都不需要录视频,把工作簿复制一份,用For Each 遍历所有工作表,每张表确定最大列,从B列到最大列删除即可搞定。
例如有如下表格,每张表的列数不一样,无需将每张表A列复制,只需要将这个工作簿复制一份,删除B列到最大列即可



代表如下:
不算Sub 和 End Sub代码只有5行,我对每行写了注释,并注明了笔记出处
结果如下:



不同软件不同功能,Access也能完成这件事,但是就这件事不适合。PowerQuery处理这件事就更不适合了。这件事适合用ExcelVBA处理。

ExcelVBA合集:https://www.bilibili.com/video/BV1rt4y1a72y

