Agregar color de texto y nombre de hojas a copiar |
Responder |
Autor | |
JoaoM
Habitual Unido: 14/Septiembre/2010 Localización: Venezuela Estado: Sin conexión Puntos: 66 |
Tema: Agregar color de texto y nombre de hojas a copiar Enviado: 09/Febrero/2020 a las 20:58 |
Ejecución de la macro: Crea una hoja llamada Global. Copia el contenido de
todas las hojas existentes a esa Global
Quisiera que después de ejecutada la macro, o en su ejecución, quedara como se ve en la imagen de la hoja Global. que es la creada para recibir las copias. Los títulos ya yo pude agregar, y el 1º título con el color y negrita, pero no tengo la capacidad para lo demás y También el nombre de cada hoja existente así como el color del texto que lo hice en el primer, (usando la grabadora) pero me falta que lo haga para todas las copias. Copiar el nombre de cada hoja y darle el color vbRed a Negrita (Bold) al nombre y títulos Subido en subir imagenes Asi quisiera que quedara Sub JuntarHojas() |
|
AnSanVal
Ver perfil usuario
Enviar mensaje privado
Ver los mensajes del usuario
Visite la página de los usuarios
Añadir a la lista de amigos
Administrador Unido: 16/Marzo/2005 Localización: España Estado: Sin conexión Puntos: 5974 |
Enviado: 10/Febrero/2020 a las 22:44 |
- Para hacer lo que pretendes NO debes trabajar con rangos fijos Range("A1:M1"), sino que debes emplear rangos variables. Proceso de ejemplo: 1.- Declara una variable DIM fila AS Double y en vez de (p.e.) Range("A1:M1") utiliza Range("A" & fila & ":M" & fila) 2.- Asigna a fila el valor 1 fila = 1 3.- Escribe Dpeto 1 en CELLS(fila,4). 4.- Incrementa fila fila = fila +1. 5.- Escribe los títulos. 6.- Incrementa fila fila = fila +1. 7.- ... etc. |
|
Saludos desde Tenerife.
|
|
Responder | |
Tweet
|
Ir al foro | Permisos de foro Usted No puede publicar nuevos temas en este foro Usted No puede responder a temas en este foro Usted No puede borrar sus mensajes en este foro Usted No puede editar sus mensajes en este foro Usted No puede crear encuestas en este foro Usted No puede votar en encuestas en este foro |