esempio: conta il numero di colonne di una determinata area
Set zonac = Range(Cells(1, 1), Cells(1, 1).End(xlToRight)) setto zonac l'area che si trova dalla cella A1 fino all'ultima colonna occupata, andando verso destra
x = zonac.Columns.Count in x memorizziamo in numero di quante colonne sono in zonac
esempio: conta il numero di righe di una determinata area
Set zonar = Range(Cells(1, 1), Cells(1, 1).End(xlDown)) setto zonar l'area che si trova dalla cella A1 fino all'ultima riga occupata, andando verso il basso
y = zonar.Rows.Count in y memorizziamo in numero di righe in zonar
per contare solo le schede visibili si usa For Each per correre le schede e verificare lo stato
Dim scheda As Variant
Dim conta As Long
For Each scheda In ActiveWorkbook.SheetsIf scheda.Visible = True Then conta = conta + 1Next
esempio: assegno ad una variabile un valore del numero di caratteri o cifre della cella attiva
Dim lunghezza As Integer
lunghezza = Len(ActiveCell.Value)