复制到excel工作表的文本显示为图像

我有一张excel表格，其中包含几个单元格，这些单元格应该是文本（从网站复制的），但实际上单元格内容的行为就像某种图像，允许选择其中包含的文本。我想将excel工作表导出为CSV文件，但无法导出这些单元格的内容。由于有数百个单元格存在此问题，我想知道是否有一种快速方法可以将所有这些图像-文本混合体转换为纯文本，以便它们可以正确导出为txt/CSV

提前谢谢

---

编辑：“奇数”单元格内容类型原来是Excel形状。下面的例子说明了这一点。

在这里有点冒险，这个假设可能有帮助，也可能没有帮助

在确认Tim的评论后，我假设文本“容器”是Excel形状，位于活动工作表中

此代码将从每个形状中提取文本，并将其放置在形状左上角单元格附近的空白单元格中，然后再删除形状。它不会按形状区分，也不会识别形状是否包含在组中，也不会将提取的文本放入列表中。但是，如果有帮助，您可以相应地细化代码

Sub textFromShapes()
Dim shp As Shape
Dim shpLoc As String

    For Each shp In ActiveSheet.Shapes
        With shp
            shpLoc = .TopLeftCell.Address
                Do Until Range(shpLoc) = ""
                    shpLoc = Range(shpLoc).Offset(1, 0).Address
                Loop
                Range(shpLoc) = .TextFrame.Characters.Text
                .Delete
        End With
    Next

End Sub

---

你需要再解释一点，或者包括重现问题的确切步骤。这正是我需要的！多谢各位@barryleajo@Philip-太好了！在这种情况下，请单击“勾选”复选标记接受答案。