如何在VBA中將單元格的自定義格式更改爲泛型「randomtext」？

Question

如果我手動更改它的作品。

若我運行此：

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

這個工程太，MSGBOX顯示：

通用 「randomtext」

，我不能管理的唯一的事情就是改變這樣的格式：

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""" 

，因爲每個雙引號（即"）需要通過將其寫爲""而被轉義。