excel - 将单元格从一般格式设置为文本

Question

我正在尝试编写一个小脚本来打开 Excel，格式化单元格 B1文本并保存文件，但我无法让“格式为文本”工作。有人知道我在这里缺少什么吗？

这条线不起作用:ExcelObj.Cells("B").Value = "@"

Set ExcelObj = CreateObject("Excel.Application")
ExcelObj.DisplayAlerts = False
ExcelObj.Visible  = true    ' or false
ExcelObj.Workbooks.Open "C:\Supplier\DK\ExternalPrices\Mapforcecode\Computercity\excelmapping\ExternalPrices.xlsx"
ExcelObj.Cells("B").Value = "@"
ExcelObj.Workbooks(1).SaveAs "\\file-srv1\Scalepoint\Supplier\Catalog\Data\DK\Computercity\Current\ExternalPrices.xlsx", 51
ExcelObj.Quit

Answer 1

ExcelObj.ActiveSheet.Range("B1").NumberFormat = "@"