[a65536].End(3).Row ne demek

[Aytaç]

arkadaşlar bu kodu üstadların yazdığı döngü kodlarında sık sık görüyorum tam olarak çalışma şeklini ve ne işe yaradığını anlayamadım acaba bu kodu açıklayabilirmisiniz

 

[uzmanamele]

merhaba
A sütunundaki son dolu hücreyi işaret eder

 

[Aytaç]

peki son dolu hücre varmı

Sayın Uzmanamele öncelikle teşekkür ediyorum... başlıktanda anlaşılacağı gibi şimdide bunun son dolu sütun için olanının olup olmadığını merak ettim sutün içinde var mı acaba bu koddan

 

[Kemal Demir]

Gunaydın,

Sorunuza nedenli cevap olur bilemiyorum ama paylaşmak istedim.

Aşagıdaki Satır 1.sıradaki kolonların kactane oldugunu sayar

kolonsay = WorksheetFunction.CountA(Rows("1:1"))
MsgBox kolonsay

Aşagıdaki Satır ise IV1 hucresinden basa donerek ılk dolu hucreye
kadar olan sayıyı saymaya yarıyor.

Range("IV1").Select
sonkolonno = Range(Selection, Selection.End(xlToLeft)).Count
Range("a1").Select

MsgBox "Colon Numarası" & ":" & 256 * 1 - sonkolonno + 1

Umarım anlatabilmişimdir.

 

[Aytaç]

çok iyi yaa

Çok teşekkür ederim sayın rakkas. bu bilgi çok yararlı olacak... Kolay Gelsin!!!

 

[Seyit Tiken]

Aşağıdaki kodta son dolu sütunu gösterir.

Sub Düğme1_Tıklat()
If Sayfa1.[B1] = "" Then Exit Sub
[a1].End(2).Select
End Sub