VBA matriz de enteros

Dim intA() as integer
adriendums