Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

valores en matriz

15/10/2004 - 20:05 por Garanya | Informe spam
Ayuda Hacer una pregunta
Intento coger los valores de un Rango y meterlos en una matriz para luego
copiarlos en otra hoja
Dim cont As Integer
Dim i As Integer
Dim j As Integer
Dim Articles() As Integer
i = 16
cont = 1
Cells(16, 2).Select
Do While cont < 6
If Not IsEmpty(ActiveCell) Then
Articles(cont) = Cells(i, 2).Value 'Aqui tengo un error alguien
puede ayudarme
i = i + 1

cont = cont + 1
End If

Loop
email Siga el debateRespuesta 3 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Anonimo
16/10/2004 - 10:05 | Informe spam
No dices qué error es, no obstante, tal vez sea que el dato
no es de tipo Integer y tu has definicido la matriz
Articles como integer.



Intento coger los valores de un Rango y meterlos en una


matriz para luego
copiarlos en otra hoja
Dim cont As Integer
Dim i As Integer
Dim j As Integer
Dim Articles() As Integer
i = 16
cont = 1
Cells(16, 2).Select
Do While cont < 6
If Not IsEmpty(ActiveCell) Then
Articles(cont) = Cells(i, 2).Value 'Aqui tengo un


error alguien
puede ayudarme
i = i + 1

cont = cont + 1
End If

Loop
.

Preguntas similares

 

Busqueda sugerida :