basit satır sayma nasıl?

[474bak]

selamlar,

belli aralıktaki satırları sayma fonksiyonu nedir?
herhangi bir koşul vs. yok, sadece fare ile seçtiğim satırları saymasını istiyorum. bu nasıl yapılabilir?

 

[irfancantr]

Merhaba, koşulsuz satır saymak için;

=SATIRSAY(A1:A100)

 

[EXTRANET]

AŞAĞIDAKİ MAKRO YU KOD A YAPIŞTIRIN.BİR DÜĞME BAĞLAYIN.

MAUS İLE İŞARETLEDİKTEN SONRA TIKLAYIN

EKTE BİR ÖRNEK VAR UMARIM İSTEDİĞİNİZ BUDUR



Sub DoluHucreSay()
'Returns a count of non-blank cells in a selection
Dim myCount As Integer
'using the CountA ws function (all non-blanks)
myCount = Application.CountA(Selection)
MsgBox "Seçili alandaki boş olmayan hücre sayısı: " _
& myCount, vbInformation, "Dolu Hücre Say"
End Sub

 

[Necdet]

Merhaba,

Basit bir örnekte benden olsun. Aşağıdaki kodlar ilgili sayfanın kod bölümüne kopyalayıp deneyiniz.

Birden fazla hücre seçildiğinde mesaj verir.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Selection.Count > 1 Then
        MsgBox "Seçilen Toplam Hücre Sayısı : " & Selection.Count & Chr(10) & _
                "Seçilen Satır Sayısı : " & Selection.Rows.Count & Chr(10) & _
                "Seçilen Kolon Sayısı : " & Selection.Columns.Count
    End If
End Sub