Jump to content

Luis Caballero

Members
  • Posts

    100
  • Joined

  • Last visited

  • Days Won

    4

Everything posted by Luis Caballero

  1. Hola, el símbolo REF es porque se ha producido algún tipo de error al copiar la fórmula, o porque se han eliminado filas o columnas, copia de nuevo la formula desde la casilla P7 hacía abajo y luego verifica los resultados.
  2. Hola, si subes el archivo que tienes si te podremos ayudar, en caso contrario es dificil
  3. Hola, en realidad yo no usaba los valores de x, y sino la interpolación, no entiendo porque usas M5, en el fichero que adjuntas está vacio.
  4. Hola, adjunto archivo, creo haber entendido bien tu consulta. Para Interpolar .xlsx
  5. Usa Formato Condicional, o sube el fichero con los datos ..
  6. 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. Hola de nuevo puedes usarlo igual With Worksheets("Referencias").Range("A:C") .AutoFilter .AutoFilter 2, "Code61", xlOr, "Code43" End With
  8. Hola, pero ¿ dónde están los datos que quieres filtrar?, ¿y la macro asignada al botón de filtrar,?
  9. Hola, Debes de montar un fichero Excel con los datos y explicar que quieres que se automatice con las macros
  10. Hola, aplicando Filtros Automáticos Ejemplo_With.xlsm
  11. 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
  12. Hola, no entiendo bien, estoy viendo la hoja "nota pedido" y parece que trae los datos correctos del mes de Octubre. ¿dónde esta el error?
  13. Hola Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks :=False, Transpose:=False
  14. Hola, usando Tabla dinámica lo tienes sencillo. Ejemplo Transponer datos.xlsx
  15. Hola, Puedes usar validación de Datos como en la forma de pago, cogiendo el nombre del producto de la hoja Catalogo BD - copia.xlsx
  16. Hola, como dice Haplox adivinos no somos pero intenta adaptarlo Sub Copiatodaslashojas() Dim hoja As Worksheet librodestino="Listado_de_Fondos" For Each hoja In Worksheets Sheets(hoja.Name).Copy After:=Workbooks(librodestino).Sheets(1) Next hoja End Sub
  17. Te has adelantado, funciona que es lo importante salvo que jhon diga lo contrario
  18. Hola, Sube el fichero con los números para verificar que funciona
  19. Hola, Pulsa la flecha... En el código puedes cambiar el numero de Filas y Columnas del rango Medicos.xlsm
  20. Hola, puedes ponerle que a partir de una fecha determinada no haga nada if now() > '2020/10'/25' Then exit sub else ' Tu macro end if
  21. 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
  22. hola, cambia esta linea en la macro If UCase(PI.Name) LIKE "%" & Numero & "%" Then por, If UCase(PI.Name) = Numero then
×
×
  • Create New...

Important Information

Privacy Policy