En Hoja1 valor en celdas númerico, pasarlo a Hoja2 sombreando las celdas

6 envíos / 0 nuevos
Último envío
Sergio
Imagen de Sergio
Offline
última acción: Hace 3 años 2 meses
alta: 21/02/2014 - 17:27
Puntos: 115
En Hoja1 valor en celdas númerico, pasarlo a Hoja2 sombreando las celdas

Hola, estoy tratando de hacer un diagrama de GANTT, (a mi manera) pq ya se que hay muchas plantillas pero no se adaptan a lo que yo quiero.

Veras en la Hoja1 Celdas A1 a A6 tengo respectivamente 10-20-30-25-15-10

      "     en la Hoja1 Celdas B4 a B9      "             "              "                              25-20-30-15-20-20

      "        "  "       "      Celdas C6 a C20    "             "             "                                             10-15-25-30-5-15-25-20-10-5-5-7-5-8

Y así sucesivamente hasta un máximo de 20 líneas, ya que se trata como ves de un escalonamiento en funcion de los tiempos de trabajo.

Lo que pretendo es que estos valores numericos me los pase a otra hoja con el mismo escalonamiento pero marcando la celda en color negro, es decir una raya que marque el inicio y el final de la tarea, no hace falta que sea en las mismas celdas, que están los números en la Hoja1.

Resumiendo los números transformarlos en "celda color" negro, en otra hoja, y en diferentes casillas.

Espero haberme explicado. Gracias

Etiquetas: 

Cron
Imagen de Cron
Offline
última acción: Hace 14 horas 51 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntos
alta: 23/06/2010 - 12:30
Puntos: 8840
Re: En Hoja1 valor en celdas númerico, pasarlo a Hoja2 ...

Yo una vez hice lo mismo, pero en la misma hoja.

Es decir, puse el fondo del mismo color que el texto, de manera que ahí ponía el número (imagino que para hacer un gannt valorado, como era mi caso) pero no se veía.

 

Eso lo conseguí con un formato condicional: si el valor de la celda <> "" entonces color de fondo = negro (o el que prefieras)

 

De esta manera, se te colorearán las celdas que tengan algún número (o sea, las fechas en las que se realiza algún trabajo), y te permite seguir operando para sacar los valores numéricos que necesitas.

 

Yo solo tuve una precaución más. En cada fila hice una suma de la fila entera, pues al no poder verse todos los números a la vez, se podían cometer errores. Al hacer la suma completa, me aseguro de que nunca voy a tener más ni menos del 100%

 

Espero que te sirva.

Un saludo

Sergio
Imagen de Sergio
Offline
última acción: Hace 3 años 2 meses
alta: 21/02/2014 - 17:27
Puntos: 115
Re: En Hoja1 valor en celdas númerico, pasarlo a Hoja2 ...

Hola, gracias por ayudarme, pero es que estoy tratando de trabajar en VBA y no en formato condicional, lo hago pq se trata de una presentación muy condicionada a una serie de datos, por ese motivo te pido ayuda, para saber si podemos resolver el problema. Gracias

Cron
Imagen de Cron
Offline
última acción: Hace 14 horas 51 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntos
alta: 23/06/2010 - 12:30
Puntos: 8840
Re: En Hoja1 valor en celdas númerico, pasarlo a Hoja2 ...

Yo seguiría haciendo lo mismo, aunque lo hagas en otra hoja.

La cosa puede ser hacer referencia a la celda del mismo nombre pero de la hoja de al lado, y utilizar formato condicional. Es muy sencillo de utilizar y muy efectivo.

 

Si quieres andar poniendo colores, tienes que jugar con los valores de las propiedades de las celdas. Algo así como:

 

cells(columna,fila).select

    With Selection.Interior

        .Pattern = xlSolid

        .PatternColorIndex = xlAutomatic

        .ThemeColor = xlThemeColorLight1

        .TintAndShade = 0

        .PatternTintAndShade = 0

    End With

 

Esto te colorea la celda de negro.

 

Pero es mucho más complicado y hay que comprobar que no se producen errores.

 

Saludos

Sergio
Imagen de Sergio
Offline
última acción: Hace 3 años 2 meses
alta: 21/02/2014 - 17:27
Puntos: 115
Re: En Hoja1 valor en celdas númerico, pasarlo a Hoja2 ...

Donde tengo que insertar el algoritmo en la hoja1 (VBA) por ejempl, o en un módulo, con lo que tendria que hacer una macro para que funcionase.

Lo he insertado en la hoja de trabajo y no me funciona. Gracias

Cron
Imagen de Cron
Offline
última acción: Hace 14 horas 51 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntos
alta: 23/06/2010 - 12:30
Puntos: 8840
Re: En Hoja1 valor en celdas númerico, pasarlo a Hoja2 ...

Cuando pones código que afecta a más de una hoja, conviene ponerlo en un módulo.

 

Ten en cuenta que lo que te he puesto es el código que debes situar en su sitio, dentro de todo el código que generes.

 

No te he puesto ni los encabezados de los procedimientos ni nada de lo que es necesario para que funcione.

 

 

Un saludo