如何在多个 excel 文件中删除和添加特定列

Question

我有一个包含 5 列的文件：

一个||乙|| C || D || E

我想删除 E 列并在单元格中添加 2 个内容相同的新列。我试图在 excel 中找到一种方法，但这是不可能的。

我在 excel 中使用了 MACROS 记录，因为人们建议我在原始查询中使用 MACROS。但问题是我拥有的 excel 文件具有不同的行号。因此，在第一个文件中，我需要添加一个包含 10 行的新列（里面的文本相同），而在另一个文件中，我需要添加 2 行。

如何在 MACROS 中进行编程？更具体地说，我想转换这个：

进入这个：

我只需要图2的那几栏，其他的我已经不需要删除了。我使用这些文件将它们导入 openCRM。

Answer 1

在 excel 宏中

sub ColReplaceInCurrentSheet ()
dim LastCellRow as integer

'uncomment for removing warning message
'Application.CutCopyMode = False
Columns("E:E").Delete Shift:=xlToLeft

' Define last row of data
Range("A65534").Select
Selection.End(xlUp).Select
LastCellRow = Selection.Row

for each ThisCell in Range ( "E1:F" & LastCellRow)
   ThisCell.value='The Value I want here'
 next

end sub

假设行数等于 A 列中最后（下方）填充的单元格（此处任意限制为 65534）
你可以在单元格中输入任何你想要的值，我在这里将它设置为任意字符串
宏是放入一个额外的excel文件，这样你就可以从任何其他excel
当前活动的宏工作 sheet。

如何在多个 excel 文件中删除和添加特定列

How to delete and add specific columns in multiple excel files

excel

edit