Excel vba da toolbox girilen değerin sol başından karakter silme

[can34frht]

Merhaba,

Toolbox içine farklı bir yerden kopyala yapıştır olarak yaptığım metnin başında yer alan karakterlerin ilgili toolbox'ın change durumunda nasıl düzenlerim.
Örneğin kopyaladığım 000123456 sayısını toolbox a yapıştırdığımda 123456 olarak yazsın sadece.
Yardımcı olabileceklere şimdiden çok teşekkür ederim.

 

[pitchoute]

Merhabalar, kod penceresinin üst kısmındaki soldaki açılır listeden TextBox kontrolünüzü seçin. Sağdaki açılır listeden Change olayını seçin. Vermiş olduğum kodu eklerseniz, sorununuzun çözüleceğini düşünüyorum;

Private Sub TextBox1_Change()
    Dim txt As String
    Dim pos As Long
    Static isUpdating As Boolean

    If isUpdating Then Exit Sub

    txt = TextBox1.Text

    txt = LTrim(txt)
    While Left(txt, 1) = "0" And Len(txt) > 1
        txt = Mid(txt, 2)
    Wend

    isUpdating = True
    TextBox1.Text = txt
    isUpdating = False

    TextBox1.SelStart = Len(txt)
End Sub

 

[can34frht]

Çok teşekkür ederim pitchoute tam istediğim gibi oldu

 

[pitchoute]

Rica ederim hocam, iyi çalışmalar