Estoy haciendo una práctica del manual de Fermi Vilá que es la siguiente:
Sub Programa19()
Dim A(1 To 2, 1 To 5) As Double
Dim i As Byte, j As Byte
For j = 1 To 5
For i = 1 To 2
A(i, j) = InputBox("hora inicio y después hora finalización, para cada día de la semana,empezando por el lunes y acabando en el jueves")
Next
Next
For j = 1 To 5
For i = 1 To 2
MsgBox A(i, j) 'Cambiado el Debug.Print del Original por MsgBox
Next
Next
End Sub
No puedo utilizar Debug.Print, porque despues de meter los datos el programa desaparece, si lo cambio por MsgBox, veo los resultados.
Que debo hacer? falta algo?
Saludos [email protected]
