Matriz en excel VBA usando: for, to, step, next.
Mi pegunta es como crear una matriz que en el eje X comience en 750 hasta 1400 con un step de 10, en el eje Y comienza en 50 hasta 400 con step de 10. Y que la matriz se ubique desde el rango "C3". Que permita hacer: Matriz(i, j) = i * j
1 Respuesta
Respuesta de Dante Amor
1
H o l a:
Supongo que solicitas lo siguiente:
En la celda C3 el resultado de 750 * 50
En la celda D3 el resultado de 760 * 50
En la celda E3 el resultado de 770 * 50
...
En la celda C4 el resultado de 750 * 60
En la celda D4 el resultado de 760 * 60
En la celda E4 el resultado de 770 * 60
...
Si es así, te anexo la macro:
Sub Matriz()
'Por.Dante Amor
Application.ScreenUpdating = False
xini = 750
xfin = 1400
yini = 50
yfin = 400
'
n = Range("C3").Row
m = Range("C3").Column
Range("C3", ActiveCell.SpecialCells(xlLastCell)).ClearContents
For j = yini To yfin Step 10
For i = xini To xfin Step 10
Cells(n, m) = j * i
m = m + 1
Next
n = n + 1
m = Range("C3").Column
Next
End Sub
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
