Bucles en ecel
Hace unos 2 días preguntando de este ejemplo
For i = 1 To 31
j = Trim(Str(i))
Sheets(j).Select
Range("A1").Select
next
El porque de la j O el trim o las paréntesis cuando usarlos porqué usarlos.
Algún manual me gustaría adquirirlo
For i = 1 To 31
j = Trim(Str(i))
Sheets(j).Select
Range("A1").Select
next
El porque de la j O el trim o las paréntesis cuando usarlos porqué usarlos.
Algún manual me gustaría adquirirlo
Respuesta de Elsa Matilde
1
Paso a explicarte las funciones utilizadas en la rutina:
Str(i): convierte en un tipo Variant una cadena numérica. Como i va de 1 a 31 lo convierte en string (texto).
Trim: elimina espacios a ambos lados de la cadena.
Estas funciones son utilizadas para asegurarnos de que la coincidencia con el nombre de hojas sea exacta (si hubiese un espacio o se tratara de un número ya no lo reconocería como igual)
Espero haberte aclarado el tema y con respecto a un manual te recomiendo muy especialmente el de las 400Macros.
Allí encontrarás un capítulo completo dedicado a los bucles (for, for each, etc), otro de Tratamiento de variables, explicando las funciones para la conversión (Trim, CInt, Cstr, Cdate y muchas más).
Te invito a descargar la demo gratuita desde:
Saludos
Elsa
http://es.geocities.com/lacibelesdepunilla
Str(i): convierte en un tipo Variant una cadena numérica. Como i va de 1 a 31 lo convierte en string (texto).
Trim: elimina espacios a ambos lados de la cadena.
Estas funciones son utilizadas para asegurarnos de que la coincidencia con el nombre de hojas sea exacta (si hubiese un espacio o se tratara de un número ya no lo reconocería como igual)
Espero haberte aclarado el tema y con respecto a un manual te recomiendo muy especialmente el de las 400Macros.
Allí encontrarás un capítulo completo dedicado a los bucles (for, for each, etc), otro de Tratamiento de variables, explicando las funciones para la conversión (Trim, CInt, Cstr, Cdate y muchas más).
Te invito a descargar la demo gratuita desde:
Saludos
Elsa
http://es.geocities.com/lacibelesdepunilla
Podes pedir aclaraciones si el tema no ha quedado solucionado, sino por favor finaliza la consulta. Gracias
Saludos
Elsa
**Colección manuales: Excel+Tys, Macros, Userforms. Demos en:
Saludos
Elsa
**Colección manuales: Excel+Tys, Macros, Userforms. Demos en:
