如何将具有合并列的 xls 文件转换为 csv？

Question

我正在尝试将一些 .xls 文件转换为 .csv，其中一个文件包含一些合并的列。当我进行转换时，只返回一个值。这张图片将解释这种情况：

Answer 1

首先，您应该取消合并 .xls 文件中的单元格。给定的代码将正确取消合并单元格。

==>>

1. 打开你的 sheet.
2. Alt + F11
3. 插入 => 模块
4. 粘贴此代码：

Sub activesheet_unmerge()
  Dim c As Range
  Dim c2 As Range
  Dim rMergeArea As Range
  Dim vMergeValue As Variant
  For Each c In ActiveSheet.UsedRange
    If c.MergeCells Then
      Set rMergeArea = c.MergeArea
      vMergeValue = c.Value
      rMergeArea.unmerge
      For Each c2 In rMergeArea
        c2.Value = vMergeValue
      Next
    End If
  Next
End Sub

5. 将鼠标指针放在此代码中间的某个位置，然后按 F5 到 运行 代码。