Question

急！Excel VBA强制规定单元格数据类型

我在VBA代码中写入了如下的类似语句
Worksheets(1).Cells(1, 1).Value = “11-22”
发现运行后单元格A1的数据成了“11月12日”，也就是说单元格把它转换成了日期格式
我尝试加入了下面的代码
Worksheets(1).Range("A1").NumberFormatLocal = "@"
希望将单元格强制转换为文本类型，却没想到运行后A1的数据变成了一个稀奇古怪的大数，怀疑是因为在把日期转换成文本的过程中因为数据表示的不统一而出现了此问题
所以，如果我想在向单元格里输入"11-22”这样像日期但不是日期的文本，并让单元格的数据类型强制为文本类型，而且不会出现乱码，该怎么做？
急！回答好的话给高分
声明一下：我试过把Worksheets(1).Range("A1").NumberFormatLocal = "@"放在代码的任何地方，都没有用

Answer 1

把单元格的格式设置为文本，

你要在VBA中加入代码，可以把设置文体这个过程用宏录下来，再把代码加到你的里面去

把代码改成这样：
Sheet1.Cells(1, 1).Value = 11 & "-22"
Range("A1").Select
Selection.NumberFormatLocal = "@"

Answer 2

有两个办法：
1、不用 VBA，把A列设为文本格式。
2、使用 VBA，先运行，再输入数据：
Sub Macro1()
Columns("A:A").Select
Selection.NumberFormatLocal = "@"
End Sub

Answer 3

把Worksheets(1).Range("A1").NumberFormatLocal = "@"放在Worksheets(1).Cells(1, 1).Value = “11-22”的前面，就可以了。

Answer 4

Worksheets(1).Cells(1, 1).Value = "'"&"11-22"