Ver originalDim _Array(10) As String Sub Llenar() For i=1 to 10 _Array(i)=Inputbox("Ingresa cadena para llenar el array")Next