Jump to content

Luis Caballero

Members
  • Content Count

    98
  • Joined

  • Last visited

  • Days Won

    4

Reputation Activity

  1. Like
    Luis Caballero got a reaction from Silvia in Filtro de tabla dinámica en función de valor de celda   
    Hola, si subes el archivo que tienes si te podremos ayudar, en caso contrario es dificil
  2. Thanks
    Luis Caballero got a reaction from Silvia in Interpolación lineal   
    Hola, adjunto archivo, creo haber entendido bien tu consulta.
     
    Para Interpolar .xlsx
  3. Like
    Luis Caballero got a reaction from avalencia in Macros excel con VBA METODOS DE TRANSPORTE   
    Hola, 
    Debes de montar un fichero Excel con los datos y explicar que quieres que se automatice con las macros
  4. Like
    Luis Caballero got a reaction from tierra_pampa in Añadir una segunda condición en filtro   
    Hola, aplicando Filtros Automáticos
     
     
    Ejemplo_With.xlsm
  5. Confused
    Luis Caballero got a reaction from victorjavega in Ver disponibilidad filtrando por campos   
    Hola, pero ¿ dónde están los datos que quieres filtrar?, ¿y la macro asignada al botón de filtrar,?
  6. Like
    Luis Caballero got a reaction from Maria_80 in Añadir una segunda condición en filtro   
    Hola, con cualquiera de los dos métodos, puedes hacer varios filtros usando el operador en la misma columna, y también puedes filtrar desde distintas columnas de la tabla.
    Saludos,
  7. Like
    Luis Caballero got a reaction from Maria_80 in Añadir una segunda condición en filtro   
    Hola de nuevo puedes usarlo igual
    With Worksheets("Referencias").Range("A:C")
    .AutoFilter
    .AutoFilter 2, "Code61", xlOr, "Code43"
            
    End With
  8. Thanks
    Luis Caballero got a reaction from CarlosKurt in Extraer texto de una celda   
    Hola,
    Con esta formulación funciona siempre y cuando estén siempre todos los datos, como puedes ver si falla alguno de ellos se produce un error.
    prueba (1).xlsx
  9. Thanks
    Luis Caballero got a reaction from CarlosKurt in Extraer texto de una celda   
    Hola,
    Con esta formulación funciona siempre y cuando estén siempre todos los datos, como puedes ver si falla alguno de ellos se produce un error.
    prueba (1).xlsx
  10. Thanks
    Luis Caballero got a reaction from hectorcc_18 in Ruta de complemento en diferentes equipos   
    Hola, si ejecutas la macro con el libro abierto  Curdir(), te devuelve la ruta al directorio actual completo
    Fichero = ThisWorkbook.Name
    Ruta = CurDir()
    Completo  = Ruta &  "\" & Fichero
     
     
     
  11. Like
    Luis Caballero got a reaction from jeaa in NECESITO MACRO PARA FILTRAR TABLA DINÁMICA   
    hola, cambia esta linea en la macro
    If UCase(PI.Name) LIKE "%"   & Numero &  "%"  Then
    por,
    If UCase(PI.Name) = Numero  then
     
     
     
  12. Like
    Luis Caballero got a reaction from tierra_pampa in Ayuda con turbo filtro   
    Hola,
    Simplemente cambiando el rango de BDF
    AT.xlsm
  13. Like
    Luis Caballero got a reaction from armau in Macro para dividir un archivo word de x páginas en x archivos word de una página cada uno   
    Hola, quita el bucle For, y solo lo hará una vez.
     
  14. Thanks
    Luis Caballero got a reaction from Silvia in Marcar cadena de caracteres que tiene más de 3 consonantes seguidas o 3 vocales   
    Hola, esta pequeña macro lo hace, ya depende donde quieras adaptarlo.
     
    errores en cadenas.xlsm
  15. Thanks
    Luis Caballero got a reaction from paikerr in CÓMO HACER QUE LA APLICACION SE EJECUTE SOLO EN UN ORDENADOR   
    Hola, obten el nombre de la maquina y comparalo con el valor que quieras
     
    With CreateObject("WScript.Network")
    nombreequipo = .ComputerName
    End With
     
    if nombreequipo="el que tu quieras" then
    else
    Msgbox "Uppsss... Está tratando de abrir la aplicación ofimática en otro puesto de trabajo." .Quit end if
  16. Thanks
    Luis Caballero got a reaction from jumarcano in Macro para crear y eliminar informe   
    Hola , tienes que ir cambiando el nombre de la hoja que creas, puedes usar la fecha por ejemplo
     
    Sub ReporteC()
    '
    ' Reporte del dia
    '
    nombreHoja = "Conteo_" & Day(Range("i4")) & "_" & Month(Range("i4"))
        Worksheets.Add.Name = nombreHoja
        ActiveCell.FormulaR1C1 = "Reporte del Dia " & Sheets("Reportes").Range("i4") & " de la Recaudación"
        Sheets("Reportes").Select
        Range("B2:L18").Select
        Selection.Copy
        Sheets(nombreHoja).Select
        Range("B3").Select
        Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
            :=False, Transpose:=False
        Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
            SkipBlanks:=False, Transpose:=False
        Range("E6").Select
        Columns("B:B").ColumnWidth = 8.38
        Columns("E:E").ColumnWidth = 3.3
        Columns("J:J").ColumnWidth = 3.5
        Application.CutCopyMode = False
        ActiveWorkbook.Save
        ActiveSheet.Move After:=Worksheets(Worksheets.Count)
        Sheets("Reportes").Select
        Range("B3").Select
        
        
    End Sub
     
  17. Like
    Luis Caballero got a reaction from jhon fredy in cambiar linea de codigo   
    Hola, si la macro se va a ejecutar siempre en la hoja activa, simplemente borra esa línea del código
  18. Like
    Luis Caballero got a reaction from Silvia in Tabla doble entrada a partir de base de datos   
    Hola Bárbara, si adjuntas el excel será mas fácil ayudarte
  19. Like
    Luis Caballero got a reaction from Bárbara in Extraer fecha más reciente   
    Hola,
    a ojo?,  la tabla dinámica resumes por el código de envío y sacas como resultado la fecha máxima, si subes el fichero lo vemos
  20. Like
    Luis Caballero got a reaction from Bárbara in Extraer fecha más reciente   
    Hola,
    La mejor solución una tabla dinámica
  21. Like
    Luis Caballero got a reaction from tierra_pampa in Ayuda con turbo filtro   
    Hola,
    Simplemente cambiando el rango de BDF
    AT.xlsm
  22. Thanks
    Luis Caballero got a reaction from juanmanuel85 in si(y y si juntos   
    Hola,
    Corregida
    =SI(F8="efectivo A";"36.000";SI(F8="efectivo B";"48000";SI(Y(F8="cuotas A";M8=0);"18000";SI(Y(F8="cuotas A";M8 > 0 );"6000";SI(Y(F8="cuotas B";M8=0);"48000";SI(Y(F8="cuotas B";M8>0);"8000";"No se Cumple"))))))
     
     
     
  23. Thanks
    Luis Caballero got a reaction from juanmanuel85 in si(y y si juntos   
    Hola,
    Corregida
    =SI(F8="efectivo A";"36.000";SI(F8="efectivo B";"48000";SI(Y(F8="cuotas A";M8=0);"18000";SI(Y(F8="cuotas A";M8 > 0 );"6000";SI(Y(F8="cuotas B";M8=0);"48000";SI(Y(F8="cuotas B";M8>0);"8000";"No se Cumple"))))))
     
     
     
  24. Thanks
    Luis Caballero got a reaction from cathyuska in Macro o formula que copie celdas en una columna   
    Hola,
    Adjunto fichero con la macro para lo que necesitas.
    Trabajo_Columnas.xlsm
  25. Like
    Luis Caballero got a reaction from Silvia in Ocultar duplicados   
    Hola, selecciona las 2 columnas y Datos - Quitar Duplicados.
     
×
×
  • Create New...

Important Information

Privacy Policy