将Excel格式化为文本格式

将Excel格式化为文本格式,excel,number-formatting,Excel,Number Formatting,我已将excel格式化,通过在单元格值后添加撇号将单元格值视为文本,但是我看到撇号出现在功能栏上,如何删除撇号,或者将excel单元格值转换为文本格式的最佳方式是什么?选择单元格,按Ctrl+1,选择文本格式。选择带前导撇号的单元格并运行以下短宏: Sub dural() Dim r As Range, t As String For Each r In Selection If r.PrefixCharacter = "'" Then t

我已将excel格式化,通过在单元格值后添加撇号将单元格值视为文本,但是我看到撇号出现在功能栏上,如何删除撇号,或者将excel单元格值转换为文本格式的最佳方式是什么?

选择单元格,按Ctrl+1,选择文本格式。

选择带前导撇号的单元格并运行以下短宏:

Sub dural()
    Dim r As Range, t As String
    For Each r In Selection
        If r.PrefixCharacter = "'" Then
            t = r.Text
            r.ClearContents
            r.NumberFormat = "@"
            r.Value = t
        End If
    Next r
End Sub

另外,是否有一种方法可以使用vb.netw消除警告消息“数字格式为文本”。为什么撇号是否出现在功能栏中特别重要?如果它产生了差异(除了视觉上的差异,视觉上的差异不应该影响任何东西,因为它不会打印等),那么让我们知道差异是什么。