Sub EX6() Dim intTab2D(1 To 5, 1 To 5) As Integer Dim intLinea As Integer Dim intColumna As Integer VBA.Randomize For intLinea = 1 To 5 For intColumna = 1 To 5 intTab2D(intLinea, intColumna) = (100 * VBA.Rnd) + 1 Debug.Print "Línea", ...
Suscripción
acceso ilimitado a todos los libros de ENI sin compromiso de permanencia
libro impreso o digital online