Textbox a sayı yazma

[CenTay]

Selamlar arkadaşlar textbox8 e skor yazdırmak istiyorum mesela 9-1 , 0-3 gibi
TextBox8=Format (TextBox8, "dd.mm.yyyy")
Buradaki tarih formatı yerine ne yazmam gerekir yardımcı olacak arkadaşlara teşekkürler.

 

[askm]

Textbox exit olayına yazın.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
On Error GoTo Hata
TextBox1.Text = Split(TextBox1, "-")(0) & " - " & Split(TextBox1, "-")(1)
Exit Sub
Hata:
MsgBox "Hatalı veri girişi...", vbInformation, "ASKM"
TextBox1.SetFocus
End Sub

 

[Orion1]

Textboxı formatlamayın.Yazdığınız gibi bırakın.

 

[CenTay]

Arkadaşlar selamlar çok sağolun cevaplarınız için ,sorunum galiba textboxa yazarken değil, excele kayıt ederken 9-0 Eyl.00 gibi gözüküyor hücre biçimlerinmeden ne yaptımsa 9-0 yapamadım tekrar teşekürler.

 

[Ömer]

Merhaba,

Örnek:

[A1] = "'" & TextBox1

Yada;

[A1].NumberFormat = "@"
[A1] = TextBox1

Gibi yazabilirsiniz.

.

 

[CenTay]

Ömer hocam selamlar teşekkür ediyorum biçimlenecek (textboxdan akrarılan) hücre E sütunda ve her aktarılmada kayıt bir alt hücreye oluyor.Şöyle yaparak çözüm ama pek pratik gelmedi Textboxta 9-0 ın önüne tırnak işareti koyarak yaptım

 

[Ömer]

İlk verdiğim örneği kullanırsanız tırnak işaretini kendi koyacaktır.

.

 

[CenTay]

Ömer hocam birinci formülü Vba ya mı yazıyoruz? Teşekkürler

 

[Ömer]

TextBox daki değeri hücreye aktarmak için kullandığınız kod;

[A1] = TextBox1 bu ise aşağıdaki gibi değiştirmeniz yeterli.

[A1] = "'" & TextBox1

Örnek bir koddur. Siz çalışmanızda kullandığınız ilgili aktarım koduna kırmızı ilaveyi yapmanız yeterli.
.

 

[CenTay]

Ömer hocam her şey için çok teşekkürler hallettim.