Parçaal & mbul (mid & find) hatası.

[vardar07]

Merhabalar. Textbox içindeki veriden parça almak için:

Label1.Caption = Mid(TextBox1.Text, 1, Find(" ", TextBox1.Text, 1) - 1)

uygulamada find ve search ile hata veriyor. Sebebini çözemedim. Neden olabilir.?

 

[Korhan Ayhan]

Aşağıdaki gibi deneyin.

WorksheetFunction.Find(....)

 

[vardar07]

Çok teşekkürler.

Label1.Caption = Mid(TextBox1.Text, 1, WorksheetFunction.Find(" ", TextBox1.Text, 1) - 1)

Şeklinde çözdüm.