TextBox enter

[erkan_hakan]

Textboxtayken enter tuşuna bastığım zaman girilen rakamı kaydediyor ama ben bu textbox'ı rakam girme işim bitene kadar devamlı kullanıyorum. ve hep mouse ile yeniden secmek zorunda kalıyorum. her bilgi girişimde kendi otomatik olarak seçemezmi? Yazdığım kodlar aşağıdaki gibi.

Private Sub sayım_Exit(ByVal Cancel As MSForms.ReturnBoolean)
NextRow = Application.WorksheetFunction.CountA(Range("g:g")) + 1
Cells(NextRow, 7) = sayım.Text
sayım.Text = ""
NextRow = Application.WorksheetFunction.CountA(Range("g:g")) + 1
mal.Text = Cells(NextRow, 3)
sayım.Text = Cells(NextRow, 7)
sayım.BackColor = vbWhite
End Sub



herkese kolay gelsin

 

[Korhan Ayhan]

Selamlar,

Sorunuz çok açık değil daha detaylı bir açıklama ile örnek dosya ekleyebilirmisiniz.

Örneğin; (Bu bölümde nereye kaydediyor...)

Textboxtayken enter tuşuna bastığım zaman girilen rakamı kaydediyor

 

[erkan_hakan]

sn cost control dosya ektedir.
incelerseniz sevinirim

iyi çalışmalar

 

[class37]

Merhaba
Anladığım kadar kayıttan sonra imlecin sayım adlı TextBoxun içinde kalmasını istiyorsunuz.
Doğru anladımsa CommandButton kullanarak kodlarınızın altına aşağıdaki kodları ekleyin.Her seferinde fare ile butona tıklamak istemez iseniz butonun popiretes panceresindeki Accelatör kısmına bir harf yazın ALT+kayıt ettiğiniz harfi tıkladığınızda kaydeder.İyiçalışmalar.

sayım.TabIndex = 0
sayım.SetFocus