Jump to content

Max2005

Members
  • Content Count

    202
  • Joined

  • Last visited

  • Days Won

    2

Everything posted by Max2005

  1. Hola [uSER=219417]@CMSM[/uSER] Te anexo una propuesta y comenta si es lo que necesitas Mucha Suerte Saludos !!! consulta_Max.zip
  2. Hola [uSER=190363]@Chisco[/uSER], Te dejo otra propuesta usado formula, comentas si es lo que necesitas Mucha Suerte Saludos !!! ayudaexcel2_Max.zip
  3. Hola [uSER=218899]@dpr87[/uSER] Revisa la modificación que hice a tu Macro y comentas si es lo que necesitas Mucha Suerte Saludos !!! 5.2.2016-2_Max.xlsm.zip
  4. Hola [uSER=83431]@Celest3[/uSER], Hice una modificación a tu macro te anexo el código solo pegalo en tu hoja y comentas Sub MiniGrafico() Dim i As Double Dim Rango As Range Dim Uf, Uc As Double Uf = HistorialT.Range("A1").End(xlDown).Row Uc = HistorialT.Range("A1").End(xlToRight).Column 'Borramos cualquier gráfico creado cada vez que active el código HistorialT.Columns("B:B").Select Selection.SparklineGroups.Clear HistorialT.Range("B1").Select For i = 2 To Uf Set Rango = HistorialT.Range(Cells(i, 3), Cells(i, Uc)) 'rango desde C2 hasta Ultima columna con dato If HistorialT.Cells(i, 1) <> "" Then HistorialT.Cells(i, 2).SparklineGroups.Add Type:=xlSparkLine, SourceData:=Rango.Address End If Next End Sub [/CODE] Mucha Suerte !!! Saludos Max2005
  5. Hola @daliangy, el amigo ioyama te envio la respuesta yo solo complemento en tu archivo Mucha Suerte Saludos !!! practica 1.xls
  6. Hola [uSER=9941]@pcourtois[/uSER], Espero haberte entendido, usa la siguiente condición =SI(C2="NO",A2,"") [/CODE] Mucha Suerte Saludos !!!
  7. Hola [uSER=158636]@GCaceres[/uSER], Primero debes leer las Normas del foro, pues no veo tu Archivo por ningún lado Mucha Suerte Saludos !!!
  8. Hola [uSER=214395]@jotade2[/uSER], Te anexo Archivo con solución pero debo aclarar que la respuesta del AMIGO [uSER=60846]@gerson[/uSER] la deberías de tomar en consideración analízala y te duras cuenta que es más simple que lo que yo te propuse
  9. Hola [uSER=214395]@jotade2[/uSER], Espero haber entendido bien tu planteamiento, te anexo una posible solución Mucha Suerte Saludos !!! no extraer si celda esta vacia_Max.xls
  10. Hola [uSER=212719]@darkwork6[/uSER], Para poder ayudarte debes de leer las Normas de Foro, es mejor si subes tu archivo para no asumir respuestas ... Saludos !!! Max2005
  11. Hola [uSER=210403]@jgrc93[/uSER] Usa este código en la Hoja 1 y comentas si es lo que necesitas Private Sub Worksheet_Change(ByVal Target As Range) 'Max2005 If Range("A1") = "/" Then: MsgBox ("Caracter no valido"): Range("A1") = "" End Sub[/CODE] Mucha Suerte Saludos !!!
  12. Hola [uSER=207597]@Guz Man[/uSER], Podríamos ayúdate si nos compartes tu archivo para revisarlo Saludos !!!
  13. Hola [uSER=211778]@richardqueve25[/uSER], Te anexo una propuesta y dime si es lo que necesitas Mucha Suerte Saludos !!! libro excelent_Max.zip
  14. Hola [uSER=211799]@Marlon Galicia Dimas[/uSER] Prueba con la siguiente condición y me comentas si es lo que necesitas =SI(O(A2<$L$18,A2>$O$18),"si","no") [/CODE] Mucha Suerte Saludos !!!
  15. Hola [uSER=78941]@marduksystem[/uSER] , Prueba el adjunto y menciona si es lo que necesitas Mucha Suerte Saludos !!! marduksystem_Max.zip
  16. Hola [uSER=175568]@marco1099[/uSER] toma en cuenta el mensaje del amigo [uSER=140867]@jonetoja[/uSER] ¡¡¡ Y si nos compartes tu archivo !!!, sería más fácil revisar sobre este para no asumir soluciones Saludos !!!
  17. Hola [uSER=77135]@sebastian1509[/uSER] (Saludos Amigo [uSER=140867]@jonetoja[/uSER] ) Revisa el adjunto y coméntanos si es lo que necesitas Mucha Suerte !!! Saludos Desarrollo_Max.zip
  18. Hola [uSER=142684]@yameregistre[/uSER] Prueba el adjunto y menciona si es lo que buscabas Mucha Suerte Saludos !!! VA LENTO_Max.xls
  19. Hola [uSER=187503]@juan[/uSER] Reyes Martínez, Te anexo propuesta Mucha Suerte Saludos !!! Contar si comienza por numero especifico_Max.xls
  20. Hola [uSER=187503]@juan[/uSER] Reyes Martínez, Tu solicitud esta confusa, pero por lo que logro entender, te recomiendo acomodar primero tu base de datos por orden Ascendente o Descendente y usa esta formula: =SI(A1=A2,"si","no")[/CODE] Pégala en la celda B2 y cópiala Mucha Suerte Saludos !!!
  21. Hola [uSER=210713]@fernandocr[/uSER] , Te anexo otra propuesta, pero intenta como te indica [uSER=23001]@GabrielRaigosa[/uSER], es más sencillo, pues yo utilice tu formula y la complemente Mucha Suerte Saludos !!! Pregunta1_Max.xls
  22. Estimada [uSER=209979]@Nady[/uSER] Un Gusto haberte podido ayudar Saludos a Todos [uSER=1509]@cesar[/uSER] Duran [uSER=140867]@jonetoja[/uSER]
  23. Hola Nady No te he comprendido del todo, (como decimos aquí en México Barájamela más despacio) .... Actualmente con lo que entendí se mantiene el mismo consecutivo en todas las hojas Por favor pruébalo con esta modificación Saludos !!! comprobante_de_Egreso 2.zip
  24. Estimado [uSER=113842]@johnmpl[/uSER], no dejas de sorprenderme y este es uno de los motivos por lo que ingrese a este foro "APRENDER", Gracias por tus comentarios Bendiciones a Todos Saludos !!!
  25. Gracias Amigo [uSER=140867]@jonetoja[/uSER] Espero le sea de Utilidad a Nady ... Saludos desde México
×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png