我怎样才能改变VBA自定义格式的单元格为通用“随机文本”？

如果我手动改变它的作品。

如果那我运行这个：

Sub cellformat() ShowCellFormat = Range("A1").NumberFormat MsgBox ShowCellFormat Range("A2").NumberFormat = ShowCellFormat End Sub 

这也起作用，msgbox显示：

通用“随机文本”

唯一不能pipe理的是改变这样的格式：

 Range("A1").NumberFormat = "Generic "randomtext"" 

尝试了100种不同的方式仍然无法正常工作

Answer 1

假设你想要你的数字格式是"XYZ"0000"DEF"来显示数字15 XYZ0015DEF ，那么你不能写你的代码为

 Range("A1").NumberFormat = ""XYZ"0000"DEF"" 'or 'Range("A1").NumberFormat = "Generic "randomtext"" 

您需要编写代码：

 Range("A1").NumberFormat = """XYZ""0000""DEF""" 'or 'Range("A1").NumberFormat = "Generic ""randomtext""" 

因为在string文字中使用的每个双引号（即" ）需要通过将其写成""来转义。