Hola !!
tengo una función que em cuenta las filas de una hoja.
Éste es el codigo
Código:
Sub RowCount(ByVal i As Integer)
Range("W1").Select 'el control se hará sobre la columna A, a partir de la fila ***
While ActiveCell.Value <> ""
ActiveCell.Offset(1, 0).Select 'si la celda contiene datos, pasa a la fila siguiente
Wend
numRows(i) = ActiveCell.Row 'guarda en la variable filalibre el número de la primer fila sin datos.
numRows(i) = numRows(i) - 1 'Le descontamos la primera fila que es la cabecera
End Sub
pero ahora necesito otra función que me cuente las columnas, sabríais decirme cómo puedo hacerlo?
Gracias!!!