AccessTr.neT

Bul · 14/01/2020, 16:14

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

Bul · 14/01/2020, 17:12

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

Bul · 14/01/2020, 17:53

iRow = Counta(sheets(sheeetName) .range("A:A"))

Bu kod dolu hücreleti sayar

Bul · 14/01/2020, 17:55

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

Bul · 14/01/2020, 18:22

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

Bul · 14/01/2020, 18:24

Burda nasıl olmuş anlayamadım

AccessTr.neT

Excel Son Satır No Bulmak

Excel Son Satır No Bulmak

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

Giriş yap

Hesap oluştur

Konu Linkleri