如何在VBA中将数字插入单元格而不将其更改为日期

Question

我试图在我的excel表格中插入一个值，但它不断地将字符串更改为日期。例如，我试图通过2-4 (我们使用的一个单元的名称之一)，但我得到的却是2020年2月4日。有没有办法防止它被改变呢？

x = 5
    For i = 1 To TheEnd - 1
        If IsEmpty(LANL(i, 1)) Then
            If Percent(i, 1) = 1 Then
                Cells(x, 1) = SU(i, 1)
                x = x + 1
            End If
        End If
    Next i

Answer 1

如果我们这样做：

Sub qwerty()
    With ActiveCell
        .Clear
        .NumberFormat = "@"
        .Value = "2-4"
        .ClearFormats
    End With
End Sub

我们的结果是：

​

​