VB控制EXCEL解决001变成1的两种方法为什么都不行啊？？

Question

1。Cells的格式转换成"@"
2."'001"
这两种方法都不行.不知道怎么回事情.会不会与字段格式定义有关阿

Answer 1

xlsWorksheet.Cells(lngRow + 1, lngCol).NumberFormatLocal = "@"
加这句管用的

Answer 2

Execl里就是这样的,除非把单元格属性设为文本形式的

Answer 3

一般是必须把单元格设置成文本，默认的就会显示1而不是“001”
还有就是把格中写数据时可以format一下，否则过来是1，怎么该文本属性也没用。

Answer 4

xlsWorksheet.Cells(lngRow + 1, lngCol).NumberFormatLocal = "@"
加这句管用的

Answer 5

GZ,我也被这问题难住了，解决方法就是用的.NumberFormatLocal = "@"xlSheet.Range("A" & i, "H" & i).Cells.NumberFormatLocal = "@"

Answer 6

xlsWorksheet.Cells(lngRow + 1, lngCol).NumberFormatLocal = "@"

Answer 7

在001前加上'单引号试试,也就是以'001存入Excel,应该可以

Answer 8

有个细节问题注意一下，遵循以下顺序试试：1:    xlsWorksheet.Cells(lngRow + 1, lngCol).NumberFormatLocal = "@"
2:    xlsWorksheet.Cells(lngRow + 1, lngCol)="001"
顺序不要搞反了

Answer 9

不是的阿.你们所有人的方法我都试过了.现在有了个怪现象
1我一开始生成一个空EXCEL文件的时候.修改EXCEL文件然后保存
2我先Add一个ＢＯＯＫ最后saveas
对于１：1的情况就是我所说的问题。　
对于２：２情况下这两种解决方法都可以，但是打开后Ｅｘｃｅｌ单元格会有一个绿色的小上三角提示符号。不知道什么意思

Answer 10

VB控制EXCEL解决001变成1的两种方法为什么都不行啊？？ 
1。Cells的格式转换成"@"
2."'001"
这不是两种方法！这是一种方法的两个必须的步骤：第一步，将格式转换成"@"，第二步：赋值："001"
我一直这样用的，没有出问题啊。
关于：一个绿色的小上三角，是不是你用的是OFFICE2003？