textboxtaki 1/1 excelde 1

[xxihsidxx]

iyi geceler
arkadaşlar textboxta (bu siteden bulduğum aşağıdaki kodlarla)
Private Sub TextBox6_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If TextBox6 Like "#" Then TextBox6 = TextBox6 & "/"
End Sub
11 yazdığımda 1/1 şeklinde gözüken sayı excel sayfasında 1 şeklinde gözüküyor hücre biçimlendirmeyi denedim başaramadım userform üzerindeke textboxla nasıl yapabilirim? herkese iyi çalışmalar

 

[Ali]

Hiçbir değişiklik yapmadan göstermesi lazım mesela A1 hücrenizde gözükecekse bu veri (A1 hücreniz genel olsun) aşağıdaki gibi yazabilirsiniz

Private Sub TextBox6_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If TextBox6 Like "#" Then TextBox6 = TextBox6 & "/"
Range("a1") = TextBox6
End Sub

 

[xxihsidxx]

fructose sağolasın
range("a1")=textbox6 ile a1 hücresine 1/1 şeklinde kaydediyor. ama benim commandbutton ile cells(i,6)=textbox6 kodu ile f2 sütunundan itibaren artırarak kaydediyor. f hücresini genel olarak ayarladım ama bu seferde 03.Mart olarak kaydediyor.

 

[Ali]

Hücre biçimlendirinden isteğe uyarlanmış kısımdan f sütununuzu #/### olarak yaparak deneyin