Skip to main content

AccessTr.neT


Excel Son Satır No Bulmak

Excel Son Satır No Bulmak

Çözüldü #1
iyi günler 

iRow = [Counta(Muayene!A:A)] bunu

sheeetName = "Muayene"

iRow = [Counta(" & sheeetName & "!A:A)] 

böyle yazdım kabul etmedi nasıl yazmak lazım
@benbendedeilem
Cevapla
#2
yanılmıyorsam bu kod son satırı bulmak için kullanılmaz belirli bir bölgedeki dolu hücre sayısını göstermek için kullanılır
Cevapla
#3
iRow = Counta(sheets(sheeetName) .range("A:A"))

Bu kod dolu hücreleti sayar
Cevapla
#4
iRow = sheets(sheeetName) .cells(rows.count,"a").end(3).row

Buda a sütununun son satırını bulur
Alttakide sayfadaki son satır no bulur tüm sütunlara bakar ve biraz yavaş çalışır.


Kod
MsgBox sheets(sheeetName).Cells.Find("*", , , , xlByRows, xlPrevious).Row
Son Düzenleme: 14/01/2020, 18:09, Düzenleyen: feraz.
Cevapla
#5
Kod
    Dim sh As Worksheet
    Set sh = ThisWorkbook.Sheets("Sheet1")

    Dim k As Long

    k = sh.Range("A1", sh.Range("A1").End(xlDown)).Rows.Count
Cevapla
#6
Burda nasıl olmuş anlayamadım
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da