sheet.Cells(1,9).NumberFormatLocal = "@"

以上是将单元格设置成文本格式