TextBoxa girilen verinin sütuna eklenip sıralanması

[sosorry]

Peki aynı olayı düğme 1 tıklamasına nasıl kanalize edebilirim? teşekkürler şimdiden

 

[sosorry]

Peki aynı olayı düğme 1 tıklamasına nasıl kanalize edebilirim? teşekkürler şimdiden

açıklama azcık kısa ve mantıksız olmuş :S
düğme 1 e tıkladığımızda userform açılıyor, yazdıktan sonra userform kayboluyor ve yazılan b sütununa alfabetik sıra ile yazılıyor.
umarım bu sefer açıklayabilmişimdir. Şimdiden teşekkürler.
kullanıcı adı: as
şifre: 1234

 

[Ömer]

Merhaba,

Private Sub CommandButton1_Click()
On Error Resume Next
If TextBox1.Text = "" Then Exit Sub
son = [B65536].End(3).Row + 1
If Range("B1") = "" Then
Range("B1") = TextBox1.Text
Else
Range("B" & son) = TextBox1.Text
End If
Range("B1:B" & son).Sort Range("B1")
TextBox1.Text = ""
End Sub

Bu şekilde kullanabilirsiniz..

.