时间戳

首页 > 解决方案 > 如何将一系列单元格转换为文本？

vba - 如何将一系列单元格转换为文本？

问题描述

我有一些代码可以去掉一个 ID，然后只复制这些值。

Range("F2").Select
ActiveCell.FormulaR1C1 = "=LEFT(RC[1],FIND(""."",RC[1])-1)"
Range("F2:F4448").Formula = Range("F2").Formula
Range("F2:F4448").Value = Range("F2:F4448").Value

但是结果列包含一些以字母开头的 ID，而另一些则不是。我需要将它们全部视为字符串以供以后查找，但我不知道该怎么做。复制单元格后，只有以字母开头的 ID 才能在查找中起作用。A9999 可以工作，而 9999 不行。

我试过了：

For Each i In Range("F2:F4448")
    i = CStr(i)
Next I

但这仍然没有奏效。

标签： vbaexcel

解决方案

最终使用：

Range("F2:F4448").Formula = Range("F2").Formula
Range("F2:F4448").Value = Range("F2:F4448").Value
Range("F2:F4448").NumberFormat = "@"

推荐阅读