Jump to content

mjrofra

Members
  • Content Count

    2,696
  • Joined

  • Last visited

  • Days Won

    13

mjrofra last won the day on March 18 2013

mjrofra had the most liked content!

About mjrofra

  • Rank
    Advanced Member
  • Birthday 01/23/1979

Recent Profile Visitors

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

  1. Re: Mayor que menor que Hola IPSOfacto, parece que respondí cuando tu respondías aclarando tu problema: Creo que la primera fórmula que sugerí hace lo que quieres, basta con que uses la celda que corresponda para la tasa: =MIN(MAX(A1*[COLOR="blue"]B1[/COLOR];2971);37231)[/CODE]
  2. Re: Mayor que menor que ... y otras más para la colección: =MIN(MAX(A1*1%;2971);37271)[/CODE] ó [CODE]=MIN(MAX(A1*1,01;2971);37271)[/CODE] dependiendo de lo que quieras exactamente. La primera te dará el 1% de A1, la segunda el valor de A1 + el 1%.
  3. Re: Macro que grabe en el Editor de Visual Basic Hola, quizás puedas recorrer todas las hojas del libro en un bucle e irlas agregando al combobox, algo así, por ejemplo: Private Sub UserForm_Initialize() Dim hoja As Excel.Worksheet For Each hoja In ThisWorkbook.Worksheets Hoja1.AddItem hoja.Name Next hoja End Sub[/CODE]
  4. Re: Ventana de formato condicional Edito: Veo que ya Logroastur te dio una muy buena respuesta. Pues no sé cómo lo habrá hecho nuestro amigo Pedro ni a cuál post te refieres . Espero que él vea este tema y te responda. Mientras, puedes seleccionar la fórmula o la parte de la fórmula de muchas formas. Una de ellas, con las flechas en modo de "Modificar", mientras mantienes presionado Shift (Mayús) irás seleccionando la fórmula. También puedes usar las teclas Inicio + Mayus (Shift) + Fin (siempre en modo "Modificar", si lo haces en modo introducir, como ya los has experimentado, lo que hará
  5. Re: Ventana de formato condicional Presiona F2 antes de usar las flechas, eso cambiará de modo "Introducir" a modo "Modificar". Puedes ver el modo en el que te encuentras en la barra de estado, parte inferior izquierda de Excel. De manera predeterminada cuando editas una fórmula (sea en una celda, en el administrador de nombres, en un gráfico, en formato condicional, etc.) el modo es "Introducir", que hace que al usar las flechas te desplaces de una celda a otra. Con F2 puedes cambiar de modo y así usar las flechas para desplazarte por la fórmula (sea en una celda, en el administrador de no
  6. Hola narc61, tuve, el tema ya ha sido discutido en el foro: Al final de ese tema hay un vídeo que te puede ayudar. Basta con que selecciones cualquier celda de tu tabla y le des ordenar (desde donde quieras: menú, botón derecho ¿?). A mi me resulta práctico seleccionar cualquier celda, botón derecho del ratón y seleccionar ordenar.
  7. Re: Necesito una función con booleanos facilita... ... y si definitivamente necesitas una UDF, creo que usar un bucle puede no ser la mejor opción, que suelen ser lentos los bucles en VBA. Quizás puedas usar algo así: Public Function ESLIQUIDO(Dato) As Boolean On Error Resume Next ESLIQUIDO = Range("q:q").Find(what:=Dato, lookat:=xlWhole) Is Nothing End Function[/CODE]
  8. Re: Necesito una función con booleanos facilita... Hola, quizás yo ande perdido, pero no puede evitar sugerir una fórmula (aunque quizás no tenga nada que ver con lo que buscas). En B1 y copias hacia abajo: =ESERROR(COINCIDIR(A1;[COLOR="blue"]Q$1:Q$69[/COLOR];0))[/CODE] Siendo [color=blue]Q$1:Q$69[/color] el rango en donde están los datos a buscar. Estoy usando como separador de argumentos el punto y coma ";", quizás debas cambiarlo por la "," si ese es tu separador de argumentos.
  9. Re: Barra de desplazamiento en grafico .... esto te puede ayudar un poco con la función desref, aunque el vídeo ya no está, la explicación puede ayudarte:
  10. Re: Barra de desplazamiento en grafico Hola xqd29. en Excel hay muchas formas de resolver las cosas. En el archivo encuentras otra opción sin nombres definidos (supongo, puedo estar equivocado, que en el ejemplo de ioyama usa nombres definidos, más si llama la atención sobre los nombres de las series). La ventaja de no usar nombres definidos: las fórmulas y el "truco" quedan a la vista. La desventaja: las fórmulas y el "truco" quedan a la vista. ¡JA! Como ves todo el trabajo sucio lo hace la función Desref, que ya tu consultarás en la ayuda de Excel. Como verás en el archivo, basta con crea
  11. Re: Hallar valores faltantes en un rango Hola Gerson, con el permiso de Antonio (y los demás que han participado en este tema), la intención de mis palabras no era más que poner énfasis en que lo que planteaba era sólo una idea suelta, sin mayor elaboración. Cuando el tiempo me lo permite (y me siento con el ánimo) elaboro más la respuestas, pero este no era el caso... y me parece que hay que motivar al usuario a que explore un poco y no sólo darle la solución, que es como también lo haces tú (planteando a la idea e invitando a la discusión, justo como lo has hecho ahora ). Que el foro no
  12. Hola, en el adjunto van dos archivos, uno con formato condicional (a mi me funciona bien en Excel 2010, no lo he probado en versiones anteriores) y el otro con macro de evento (que no cambia mucho de lo que ya te he sugerido, puedes ver el código en el módulo de la hoja). FormatoII.zip
  13. Re: Problema con macro y protección de celdas. Hola, no he descargado el archivo y no estoy muy seguro de entender, pero depronto quieras desproteger la hoja antes de ejecutar el código y protegerla nuevamente al final del código: Sub Ejemplo() [COLOR="blue"]sheets("Hoja1").Unprotect "Clave"[/COLOR] ' código..... ' código..... ' código..... ' código..... [COLOR="blue"]sheets("Hoja1").Protect "Clave"[/COLOR] End Sub [/CODE]
  14. me parece que algo así te pude poner en camino, a ver si es por ahí: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Me.Range("f6:m6")) Is Nothing Then If UCase(Target(1, 1)) = "EXCEL" Then With Target.Offset(1).Interior .Pattern = xlPatternLinearGradient .Gradient.Degree = 90 .Gradient.ColorStops.Clear With .Gradient.ColorStops.Add(0) .ThemeColor = xlThemeColorDark1 .TintAndShade = -0.149021881771294 End W
×
×
  • Create New...

Important Information

Privacy Policy