2015-07-01 2 views

ответ

0

Для количества количества используемых клеток на листа использовании в:

Sub HowManyUsedCells() 
    Dim total As Long 
    With ActiveSheet.Cells 
     On Error Resume Next 
      total = .SpecialCells(xlConstants).Count 
      total = total + .SpecialCells(xlFormulas).Count 
     On Error GoTo 0 
    End With 
    MsgBox total 
End Sub 

Чтобы найти используемые клетки на листе, это:

Sub WhereAreTheUsedCells() 
    MsgBox ActiveSheet.UsedRange.Cells.Address 
End Sub 

будет работать самый времени.

+0

Просьба предоставить код CSharp для этого. – SharpSubbu

Смежные вопросы