Matrices

27/12/2007 - 18:17 por Diego LB | Informe spam
Hola grupo,
Alguien me pude decir como hago para pasar una matriz de una o dos
dimensiones de caracter numérico o cadena a un archivo de texto o bien a una
hoja de cálculo

gracias
DEL
 

Leer las respuestas

#1 Ivan
28/12/2007 - 00:37 | Informe spam
hola Diego

como hago para pasar una matriz de una o dos


dimensiones de caracter numérico o cadena a un archivo de texto o bien a una
hoja de cálculo



si quieres prueba algo +/- asi

para 2 dimensiones:

Sub Matriz_Rango()
Dim f As Integer, c As Integer, matriz(10, 10)
For f = 1 To 10
For c = 1 To 10
matriz(f, c) = f * c
Next
Next
Range(Cells(1, 1), Cells(f, c)) = matriz
End Sub


para una dimension (creada con la funcion Array, pero igual te valdria
con una matriz normal [creo])

Sub Array_Rango()
Range("b1:k1") = Array("Titulo1", "Titulo2", "Titulo3", "Titulo4", _
"Titulo5", "Titulo6", "Titulo7", "Titulo8", "Titulo9", "Titulo10")
End Sub

solo ten en cuenta que (si no me equivoco) excel siempre toma/adjudica
el 1er elemento de la matriz a las filas y el segundo (en el caso de
bidimensionales) a las columnas. Con lo que por ej. la siguiente
expresion =>

Range("A1:a5") = array(1, 2, 3, 4, 5)

te devolveria 1 para todas las celdas, y en el caso de las
bidimensionales, aunque la matriz y el rango tengan el mismo numero de
elementos/celdas, si el orden y nº. de estas no es igual al de los
elementos no te cuadraria el resultado, es decir, si pej. tubieras una
matriz de 2 x 3 => matriz(2,3), podrias ponerla sin problemas en un
rango de 2 filas y 3 columnas pero si probaras en uno de 3 filas y 2
columnas [creo que] solo te rellenaria las celdas de las 2 primeras
filas, que serian algo asi como la interseccion de ambos

bueno, no me hagas demasiadop caso y corre unas pruebas, que seguro es
como mejor lo ves

un saludo
Ivan

Preguntas similares