Jump to content

FelipeLopez1121

Members
  • Content Count

    89
  • Joined

  • Last visited

About FelipeLopez1121

  • Rank
    Advanced Member
  • Birthday 03/18/1989

Converted

  • Campos
    ,
  1. Al multiplicar por 1 a G4 no cambia el resultado, sigue saliendo cero. Pruebalo y veras que el resultado sera A7:A8
  2. Es solo hacer consultas. Respecto a lo resaltado en amarillo no se de donde sacarías dicha información con los datos que poner. Saludos CONTROl.xls
  3. Hola No entiendo para que quieres macro si lo que necesitas son solo formulas en las celdas que piden información Saludos
  4. OK en este archivo lo tengo bien explicado >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>SALUDOS<<<<<<<<<<<<<<<<<<<<<<<<<<<<< ProblemaConRange.rar
  5. Bueno yo quiero hacer unas selección que esta en función a ciertos valores de 4 celdas La seleccion la hago asi: Range("A8:A" & (Range("D1") * Range("G1") * Range("G2") * Range("G3")*(If Range("G4")= ""0"" Then ""1"" Else ""0"" End if)) ) + 7).Select Donde el rango va de A8 hasta A¿? , donde ¿? es un numero que depende de las celdas G1, G2, G3, G4. El asunto es que quiero hacer una transformación (función si) usando la celda G4, pero no me sale..... Ojala puedan ayudarme >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>SALUDOS<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
  6. Bueno directo al grano, lo que quiero es que MiMacro se ejecute SI Y SOLO SI hay cambios (uno inmediatamente después de otro) hay cambio en los valores de 2 celdas. Es decir, si en mi hoja hago un cambio solo en B1 y no en B2, la macro no debería de ejecutarse, igualmente si hago un cambio solo en B2 y no en B1, la macro no debería de ejecutarse. PERO si hago un cambio en B1 y también cambio en B2, la macro SI debería de ejecutarse. Espero me entiendan. Esta es la macro con la que estoy trabajando, pero no hay problema si aparecen aportes nuevos. Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, [b1,B2]) Is Nothing Then Exit Sub End If MiMacro End Sub >>>>>>>>>>>>>>>>>SALUDOS<<<<<<<<<<<<<<<<<
  7. Hola como están, una pregunta para los capos de Macros Bueno yo estoy trabajando con una tabla con formulas(que es mi objeto) y tengo una macro que busca insertar/eliminar filas y columnas de este objeto dependiendo de ciertos valores Declaro lo siguiente: Sub ActualizarTabla() Dim f&, c&, oldRows&, newRows&, oldColumns&, newColumns& f = Range("H1") c = Range("H2") With ListObjects(1) oldRows = .Range.Rows.Count oldColumns = .Range.Columns.Count newRows = f + 1 newColumns = c + 1 newRows = Application.Max(3, newRows) .Resize .Range.Resize(newRows, newColumns) If newRows < oldRows Then .Range.Offset(newRows).Resize(oldRows - newRows).Delete xlShiftUp If newColumns < oldColumns Then .Range.Offset(newColumns).Resize(oldColumns - newColumns).Delete xlShiftToLeft End With End Sub Defino estas variables como: oldRows = Numero de filas previo al cambio de valores oldColumns = Numero de columnas previo al cambio de valores newRows = Numero de filas luego de cambio de valores newColumns = Numero de columnas luego de cambio de valores Aquí viene el problema: La macro si me funciona en lo que respecta a filas ( lo que hace es, en caso el numero de filas DESPUÉS del cambio de valores sea MAYOR al numero de filas ANTES del cambio de valores, insertar el numero de filas que faltan ( newRows - oldRows). Y si en caso sucede lo contrario (oldRows > newRows), lo que hace es eliminar el exceso de filas que hay. Es decir, con la macro funciona para insertar y eliminar filas formuladas. Por ejemplo si mi tabla tenia antes del cambio 50 filas y luego con el cambio esta debería de tener 20, lo que me hace la macro es eliminarme las 30 filas de sobra que hay (50-20). Hasta aquí todo bien. Pero cuando corre la parte de las columnas, lamentablemente no funciona. Yo sospecho que la clave esta en analizar : .Resize .Range.Resize(newRows, newColumns) No se que opinan ustedes. Saludos
  8. ¿Quieres que solo salgan unicamente los que empiezen con "Juan" o quieres que incluya la palabra "Juan" en cualquier posicion (por ejemplo "Victor Juan")?
  9. Hola Mi duda es como poder usar caracter comodin tomando como referencia un celda en vez de poner un valor manualmente. En el excel esta mi ejemplo Saludos Contar.Si.rar
  10. Hola En d7 pega la siguiente formula =ELEGIR(SI(C:C=0,1,SI(C:C=2,2,SI(C:C=3,3,4))),"LIBRE","PRESO","PRIVADO",C7*10) Respecto a lo del color, es sencillo hacerlo con formato condicional Saludos
  11. Prueba esta formula en AE2 y arrastra hacia abajo y la derecha. =SUMAPRODUCTO(--(INDIRECTO("P"&COINCIDIR($AD2,$AD:$AD)&":"&"AC"&COINCIDIR($AD2,$AD:$AD))=INDIRECTO("A"&AF$1&":"&"N"&AF$1)))
  12. Listo. Me avisas como te va con esto BackLog.xls
  13. La segunda consulta que tienes no la entendí del todo. Toda la columna esta de naranja, y no se bajo que criterios se haria la suma de estos. Saludos BackLog.xls
×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png