DİNAMİK BOŞ SÜTUN BULMA VE TEXTBOX VERİSİ YAZDIRMA

[Drago]

Merhabalar,

öncelikle yapmak istediğim şey , vba kodunun önce excel sayfasındaki boş olan SÜTUNU bulup o sütunun ilk cell'ine kullanıcının textboxta girdiği değeri yazdırmasıdır.
ancak bunun dinamik bir yapıda olması gerekli yani kullanıcı tekrar textboxa bir değer yazıp save'e bastığı zaman yanındaki boş sütuna o değeri yazması gerekmektedir.

yardımcı olabilirseniz çok sevinirim şimdiden teşekkürler.

 

[Drago]

Yardımcı olabilecek kimse yok mu ?

 

[ismailem]

Merhabalar,

öncelikle yapmak istediğim şey , vba kodunun önce excel sayfasındaki boş olan SÜTUNU bulup o sütunun ilk cell'ine kullanıcının textboxta girdiği değeri yazdırmasıdır.
ancak bunun dinamik bir yapıda olması gerekli yani kullanıcı tekrar textboxa bir değer yazıp save'e bastığı zaman yanındaki boş sütuna o değeri yazması gerekmektedir.

yardımcı olabilirseniz çok sevinirim şimdiden teşekkürler.

boş sütun mu boş satır mı. herhangi bir sütunun altına her defasında bir alt satırda alt alta gelecek şekilde text kutusuna girilen bilgilerin saklanması mı

 

[Drago]

boş sütun mu boş satır mı. herhangi bir sütunun altına her defasında bir alt satırda alt alta gelecek şekilde text kutusuna girilen bilgilerin saklanması mı

boş sütuna yazırmasını istiyorum , mesela ilk sütun ve ikinci sütun dolu sayalım (A1 ,A2 , B1,B2 ) dolu olsun . vba kodun textbox verisini C1 e yazması gerek. eğer kullanıcı başka bir değer girerse bunuda D1 yazması gerek .

 

[Korhan Ayhan]

Deneyiniz.

Option Explicit

Private Sub CommandButton1_Click()
    If TextBox1 <> "" Then
        If Cells(1, 1) = "" Then
            Cells(1, 1) = TextBox1
        Else
            Cells(1, Columns.Count).End(1)(1, 2) = TextBox1
        End If
        TextBox1 = ""
    End If
End Sub