在vba中格式化文本excel

Question

我有一個窗體用活動行上特定列中的值填充文本框。 我有一個問題，該列是數字，但具有字符「 - 」 例如0000-00-000-000 我希望當窗體打開時，文本框格式爲0000000000000。 我用下面的代碼，但它沒有做任何事情

Private Sub UserForm_Initialize() 
Dim r As Long 

    r = ActiveCell.Row 

    Me.TextBox1.value = Cells(r, 9).value 
    TextBox1.Text = Format(TextBox1.Text, "0000000000000") 
End Sub 

Answer 1

replace是根據需要，將操作字符串的函數。

最簡單的方法是簡單地用一個空字符串

TextBox1.Text = replace(TextBox1.Text,"-","")