将单元格数据复制为字符串并粘贴到新单元格中

Question

我在工作中使用的一种工具可以选择将数据记录到 Excel 中。 它吐出的数据以其原始形式是不可读的。

我发现如果我复制出现在公式栏中的字符串（而不仅仅是选择单元格本身并复制）并将其粘贴到另一个单元格中，它会扩展数据以使其可读。

我发现的所有复制/粘贴宏都将单元格复制到另一个单元格中，在这种情况下，它保留了初始格式。

我需要复制字符串而不是单元格，然后将其粘贴到另一个单元格中。

Answer 1

我不知道你不可读的数据。 看看下面的代码是否有效？ 根据您的工作表/数据更改代码

Sub text_Writing_through_Variable() 
    Dim text As String
    text = ActiveCell.FormulaR1C1 ' Make a String of data contain in active cell
    Range("a5").Value = text      'paste String in `A5`
End Sub