kodun anlamı

[kan-nas]

sat = [a60000].End(3).Row + 1
Cells(sat, "A").Value = TextBox1.Value

Yukarıdaki kodun anlamı nedir. ?
Teşekkürler

 

[Necdet]

Merhaba,

A sütununda son dolu hücrenin bir sonraki değeri bulunuyor ve sat değişkenine aktarılıyor.
ikinci satırda da textbox değeri bu hücreye aktarılıyor.

 

[kan-nas]

Cells(sat, "A").Value = TextBox1.Value

Yukarıda ki A neyi ifade ediyor. A sütününü mu.?
Diyelimki en son değerden sonraki değer 50
50 yi ilk satırda buluyor.
İkinci satırda bunu cells( 50,"A") olarak görüyor. Bunu nasıl bir değer olarak Textbox atıyor..

 

[Orion1]

sat = [a60000].End(3).Row + 1
Cells(sat, "A").Value = TextBox1.Value

Yukarıdaki kodun anlamı nedir. ?
Teşekkürler

işlk satırda A sütununda son dolu satır numarasını buluyor.Ve son dolu satır numarasına +1 ekliyor.
Diyelim ki son satır no 50
bu durumda 50+1 = 51 oluyor.
2nci satırda ise A sütununda son dolu satırdan bir sonraki satıra(yani A sütunda ilk boş satıra textbox1 deki değeri aktarıyor.
"A" sütun adıdır.
İsterseniz "A" yerine indiste kullanabilirsiniz.
A nın karşılığı 1 dir.B nin karşılığı 2 dir.
Kolay gelsin.