Jump to content

laubreeze

Members
  • Content Count

    17
  • Joined

  • Last visited

  • Country

    Spain

About laubreeze

  • Rank
    Member

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Muchas gracias por la ayuda para esta inexperta
  2. Hola a todos. Tengo el siguiente código para copiar columnas de una hoja a otra, pero si en la primera tengo fórmula, me copia la fórmula; y ahora necesito que me copie solamente los valores, como cuando hacemos un pegado especial manualmente. Dim ShER1 As Worksheet Dim SHDestino1 As Worksheet Set ShER1 = Worksheets("b.p.") Set SHDestino1 = Worksheets("b.d.") ShER1.Range("b10:D1500").Copy SHDestino1.Range("b10:D1500").PasteSpecial Paste:=xlAll Application.CutCopyMode = False ¿Alguien puede decirme el código para hacer lo que pretendo? Muchas gracias de antemano.
  3. No sé por qué razón, pero me sigue poniendo del mismo color las que llevan X que las que no (primera y última condición en el mismo color)... Las X deberían ir en gris, y tampoco es cuestión de mayúsculas o minúsculas como me comentábais. Lo dejo aquí tal cual está por si queréis verlo. Aprovecho para preguntaros otra cosa, tampoco estos son los mismos colores que tengo en la hoja "investigación" ¿Cómo tendría que hacer para conseguir aquellos tonos? porque he probado con RGB(166,166,166) por ejemplo, al final del código del color, y da error. No sé si saldré de esta XD. bbdd_BP_1.5.xlsm
  4. Dejo el archivo. Necesito que en la hoja B PROVISIONALES me ejecute el formato condicional de la hoja INVESTIGACIÓN. Pero con una macro. MUCHAS GRACIAS! bbdd_BP_1.3.xlsm
  5. Gracias, casi casi me va bien. Pero me hace igual la primera condicion y la última, y por más que la intento adaptar no me lo modifica. Le he puesto a la primera: If Cells(i, "K") = 1 And Cells(i, "F") <> "" And Cells(i, "I") = "x" Then Range(Cells(i, "B"), Cells(i, "K")).Interior.ColorIndex = 16 Y nada...
  6. Buenas, Necesito una macro que me haga el siguiente formato condicional, si es posible. Muchas gracias.
  7. Pues listo, muchas gracias por tu ayuda. He tenido que desglosarlo en 3 partes porque finalmente quise mantener dos columnas y que me copiara el resto. Lo dejo aquí por si a alguien le sirve: Sub Copiahojainvbp() Dim ShER1 As Worksheet Dim ShER2 As Worksheet Dim sher3 As Worksheet Dim SHDestino1 As Worksheet Dim SHDestino2 As Worksheet Dim shdestino3 As Worksheet Set ShER1 = Worksheets("investigacion") Set SHDestino1 = Worksheets("b. provisionales") ShER1.Range("a10:d1500").Copy SHDestino1.Range("a10:d1500").PasteSpecial Paste:=xlPasteColumnWidths SHDestino1.Range("a10:j1500").PasteSpecial Paste:=xlAll Application.CutCopyMode = False Set ShER2 = Worksheets("investigacion") Set SHDestino2 = Worksheets("b. provisionales") ShER2.Range("h10:j1500").Copy SHDestino2.Range("h10:j1500").PasteSpecial Paste:=xlPasteColumnWidths SHDestino2.Range("h10:j1500").PasteSpecial Paste:=xlAll Application.CutCopyMode = False Set sher3 = Worksheets("investigacion") Set shdestino3 = Worksheets("b. provisionales") sher3.Range("f10:f1500").Copy shdestino3.Range("f10:f1500").PasteSpecial Paste:=xlPasteColumnWidths shdestino3.Range("f10:f1500").PasteSpecial Paste:=xlAll Application.CutCopyMode = False End Sub
  8. Gracias! Creo que vamos por el buen camino, pero no me sirve porque me copia los datos que tienen que ser, pero al pegarlos no me los pone en las columnas correctas, puesto que entonces me pisa las columnas que no copia... NO sé cómo hacer para que me lo pegue en dos partes, al igual que copia en dos veces.
  9. Hola! A ver si consigo explicarme. Tengo una hoja excel "investigación" que cubre esa fase del proyecto. Cuando terminemos con dicha fase, pasaremos a "B provisionales". Para no cargar a mano odos los datos, porque pueden ser muchísimos, he creado un botón con una macro en la pestaña "B provisionales", para cargar los datos la primera vez que se empiece a trabajar en esta fase, porque luego son datos que se irán modificando al trabajar con ellos, mientras que "investigación" ya quedará a un lado, solo para consultas pasadas. El caso es que no quiero que me copie todo. Puesto que el nº de propietario va a ser diferente en esta fase (en la anterior era el nº de investigación), y ese dato lo saco de la hoja "propietarios" que es donde voy a tener los datos personales. En cada fase, ese número puede ir cambiando, por tanto en cada fase habrá que ir a relacionarlo a una columna diferente en la pestaña "propietarios". Así que no quiero que me copie de "investigación" a "b provisionales" ese dato, porque ahí quiero tener por defecto una fórmula que me relacione un número con otro de la pestaña "propietarios". CONCLUSIÓN: Necesito copiar los datos de "investigación" a "b provisionales", de las columnas A a D, y de las columnas G a J, en una misma macro. De momento he creado la macro "copiarhojainvbp" que podéis ver, pero me copia todo, porque cuando he intentando hacerlo por partes me ha dado errores. Os dejo el archivo adjunto. Muchas gracias! bbdd_BP.xlsm
  10. Hola a todos, Adjunto captura y archivo de lo que me traigo entre manos. En la imagen, podréis ver que tengo una hoja excel, se trata "simplemente" de que si en algún momento pongo "X" en la columna "EX" (columna H) automáticamente se vacíen los datos que hay en las columnas E y F de esa misma fila. ¿Es posible sin tener que acudir a hacer click a ningún botón que haga referencia a esa macro? ¿O tenéis alguna otra idea? La idea final es, que si yo excluyo una parcela, me vacíe esos datos, porque no tendría sentido que aparecieran. Es como si una persona fallece, deja de tener DNI. En este caso, si una parcela "muere", deja de tener un dueño y un nombre. Gracias a todos. Lo he intentado con fórmulas pero no he dado con nada que haga lo que busco. nueva4.0.xltm
  11. Muchísimas gracias a todos. He ido directa a probar la macro que me había dejado masticadísima JanLui y me ha salvado de un apuro. Genial!!!! Muy muy muy agradecida. Va de maravilla y es exactamente lo que quería.
  12. Hola. Tengo una base en la que por columnas introduzco diferentes datos. Necesito una macro que me cree filas en blanco para introducir nuevos registros, pero no me elimine el formato y las fórmulas, porque sin ellas el resto de la base no tiene sentido, y las personas que le darán uso no estarán atentas para arrastrar las fórmulas de las otras filas hacia las nuevas. Solo conseguí la macro que crea filas nuevas, pero me copia el valor de la fila superior, y si ordeno limpiar las celdas no consigo que me respete las fórmulas. A ver si alguien me puede ayudar, muchas gracias.
×
×
  • Create New...

Important Information

Privacy Policy