Jump to content

AlexanderS

Moderators
  • Content Count

    1,320
  • Joined

  • Last visited

  • Days Won

    53

AlexanderS last won the day on March 5

AlexanderS had the most liked content!

About AlexanderS

  • Rank
    Riddle
  • Birthday 08/22/1990

Profile information

  • Gender
    Hombre
  • Localización:
    Costa Rica

Converted

  • Campos
    ,

Recent Profile Visitors

4,966 profile views
  1. A mi me funciona correctamente siempre, igualmente puedes probar las opciones de JSDJSD y Antoni. Saludos.
  2. Hola @lidavq, he probado el cogido y funciona sin problema, deberás subir un archivo de ejemplo con el error para comprobar. Te adjunto el archivo donde realice la prueba. Saludos. Test.xlsm
  3. Hola @Joaquin Wertmuller, como trabajas con tablas, se te facilita mucho la utilización de Autofiltros, puedes probar el adjunto. Comentas Saludos. Registro ventas (1).xlsm
  4. Que tal @Xogas, excel no es capaz de abrirse por si solo, las macros solo funcionan cuando excel ya esta abierto. Te recomiendo buscar alguna aplicacion para programar tareas o usar las tareas programadas de Windows https://www.solvetic.com/tutoriales/article/3441-como-abrir-y-configurar-programador-tareas-windows-10/ Saludos
  5. Hola, debes indicar el nombre de la hoja donde están los datos, por ejemplo si los datos estuvieran en la "hoja2": Rango_Datos = "[Hoja2$" & Sheets("Hoja2").Range("A2").CurrentRegion.Address(0, 0) & "]" Saludos
  6. Hola @lphant, se puede solo debes definir el rango de tus datos, mira el adjunto. Saludos. Libro1.xlsm
  7. Hola, click derecho en la segmentación -> "Configuración de segmentación de datos", y en las opciones seleccionas la siguiente opción: Saludos
  8. Hola @nickmartinez, por el momento lo que se me ocurre es esto. Saludos ejemplo.xlsx
  9. Puedes establecer un nombre para el campo y si lo quieres dinámico puedes utilizar un DESREF en el nombre, ademas creo que el cells o range no te van a funcionar sin el .Address Si necesitas ayuda mas precisa sube un archivo de ejemplo. saludos.
  10. Creo que ahora si quedo, lo hace por linea y con la segmentación, prueba el archivo y me comentas. saludos. Macro monedas - copia.xlsm
  11. Puedes subir el archivo?, solo para ver como lo tienes acomodado y ver si puedo modificar la macro para que funcione como lo quieres.
  12. Hola @sergiobendrao@hotmail.com, debería funcionar bien si pones los países como filas, eso no afecta la macro. Con lo otro efectivamente utilice el filtro de país para poder crear el evento de cambio en la hoja, con la segmentación directamente es mas difícil ta que no existe un evento que detecte un cambio en la selección. Con lo del error al tener cuando el filtro pais dice "Todas" se puede corregir asi: Private Sub Worksheet_Change(ByVal Target As Range): On Error Resume Next If Application.Intersect(Target, Range("B1")) Is Nothing Then Set divisa = Sheets("Hoja1").Range("Tabla1[País]").Find([B1], , , xlWhole).Offset(0, 1) If divisa Is Nothing Then divisa = "" Range("A4").CurrentRegion.NumberFormat = Replace("_([$-]* #,##0.00_)", "-", divisa) End If End Sub Y para que se aplique en celdas especificas debes cambiar esta linea: Range("A4").CurrentRegion.NumberFormat = por Range("E4:F14").NumberFormat = Saludos.
  13. Pon un archivo de excel de ejemplo, poco podemos hacer si no sabemos la estructura de tus datos. Saludos.
  14. Hola @cristian9209, creo que con una formula y un formato de fecha personalizado podría ser suficiente. Saludos Ejemplo (2).xlsx
×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png