Jump to content

AlexanderS

Moderators
  • Content Count

    1,356
  • Joined

  • Last visited

  • Days Won

    54
  • Country

    Costa Rica

Everything posted by AlexanderS

  1. Hola @aaquino, no se si te estoy entendiendo, pero si lo que buscas es guardar una copia de tu archivo en formato xlsx, puedes usar la grabadora de macros y un guardar como, algo así con un poco de modificación: Sub Macro1() Dim ruta$, Nombre$ ruta = ThisWorkbook.Path & "\" Nombre = Split(ThisWorkbook.Name, ".")(0) ActiveWorkbook.SaveAs Filename:=ruta & Nombre, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False End Sub Saludos.
  2. No estoy muy seguro pero creo que en vb.net se utiliza algo parecido String.Join. Saludos
  3. Hola @nickmartinez, una matiz empieza su cuenta desde 0 por lo que hice que "X" al inicio tuviera un valor de -1 para que al momento de que se cumpliera la condición de "seleccionado" del listbox, "x" pasara a valer 0 ( -1 + 1 = 0 ), lo hice así para evitar que al final del ciclo el array tuviera un valor de mas vacío. Aunque seleccionaste 3 elemento "X" debe valer 2 porque en el Array se almacenan así: nArray(0) = valor1 (x=0) nArray(1) = valor2 (x=1) nArray(2) = valor3 (x=2) No se si me explico, si desde el principio hubiera dado a "X" un valor de 0, a la hora de incrementar (X=X+1) y finalizado el ciclo con 3 valores seleccionados "X" hubiera terminado con un valor de 3, por lo que el array también y nArray(3) = "" ( seria igual a nada), por lo que a la hora de realizar el JOIN hubiera quedado mal 'valor1','valor2','valor3','NADA'. Espero haberme explicado bien, saludos.
  4. Que tal @myusagi tal como comenta @Gerson Pineda M y DAX van muy de la mano, en mi caso suelo sacar mas provecho de DAX pero M es un buen complemento en muchas situaciones. Con respecto a la documentación, si es difícil encontrar algo en español, yo en mis inicios encontré una app para android que me ayudo mucho ya que muestra las formulas disponibles para M y DAX ordenadas por categoría y con una pequeña descripción, aparte de estar completamente en español tal vez pueda ser de utilidad. https://play.google.com/store/apps/details?id=br.com.iaronsoftware Solo es para android desconozco si esta disponible para ios. Saludos.
  5. Que tal @nickmartinez, la instrucción con la que puedes unir elementos de un array utilizando un separador se llama JOIN por ejemplo Join(TuArray,",") dará como resultado una cadena string separados por una coma. Esto solo funciona en una matriz de una solo dimensión. Con respecto a tu archivo, para que funcionara tuve que realizar un ligero cambio a la forma como se redimenciona la matriz. Saludos. Array_Select.xlsm
  6. Hola @Daniela Andrea, bienvenida al foro!! Respecto a tu consulta, te adjunto el archivo, para mi solución cree una columna calculada en DAX y luego cree una medida. Espero haber entendido bien tu consulta, me comentas como me fue. Saludos, Restar precio entre dos fechas.xlsx
  7. Y cual es el problema? debes ser un poco mas especifico para poder ayudarte.
  8. Hola @vaguilarpau, debes saber que muchos de los colaboradores de este foro no manejamos Autocad y con la prácticamente nula información que brindas (sin archivos de ejemplo) es imposible ayudarte. Por otra parte hay demasiada información en internet sobre como extraer información de Autocad a excel, así que te recomiendo buscar la información intenta armar algo tu y si tienes dudas en el progreso no dudes en preguntar. https://www.google.com/search?client=opera&hs=zEC&sxsrf=ALeKk00fSRsaQ8W2TZ2GwDKm9XudZg3uxQ%3A1586186466930&ei=4kiLXuysOLGb_QatzY6oCw&q=autocad+to+excel&oq=autocad+to+e&gs_lcp=CgZwc3ktYWIQAxgAMgUIABDLATIFCAAQywEyBQgAEMsBMgUIABDLATIFCAAQywEyBQgAEMsBMgUIABDLATIFCAAQywEyBQgAEMsBMgUIABDLAToECAAQRzoECAAQQzoCCAA6BAgAEBM6CAgAEBYQHhATShQIFxIQNy0xNDBnMjQ1ZzEyOGc3OUoNCBgSCTctMWcxZzFnN1DeMFjeVWDRXGgBcAN4AIAB7wGIAfoHkgEFMC42LjGYAQCgAQGqAQdnd3Mtd2l6&sclient=psy-ab Saludos
  9. Hola @enrsolgon2, puedes probar asi: .RowSource = "Hoja!A1:C" & Sheets("Hoja").Range("A1").End(xlDown).Row Saludos
  10. Hola @Enid86, si lo que buscas es saber si la variable "vehiculo" se encuentra dentro de la matriz "listacalidad", puedes utilizar esta linea: If UBound(Filter(listacalidad, Vehiculo)) >= 0 Then Esto buscara dentro de la lista cuantas veces aparece el vehículo, si no aparece devuelve un -1, si aparece devuelve un numero mayor o igual a 0 dependiendo de las veces que se repita dentro de la lista. Saludos a ambos @Sergio, @Enid86
  11. A mi me funciona correctamente siempre, igualmente puedes probar las opciones de JSDJSD y Antoni. Saludos.
  12. 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
  13. 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
  14. 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
  15. 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
  16. Hola @lphant, se puede solo debes definir el rango de tus datos, mira el adjunto. Saludos. Libro1.xlsm
  17. Hola, click derecho en la segmentación -> "Configuración de segmentación de datos", y en las opciones seleccionas la siguiente opción: Saludos
  18. Hola @nickmartinez, por el momento lo que se me ocurre es esto. Saludos ejemplo.xlsx
  19. 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.
  20. 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
  21. Puedes subir el archivo?, solo para ver como lo tienes acomodado y ver si puedo modificar la macro para que funcione como lo quieres.
  22. 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.
  23. Pon un archivo de excel de ejemplo, poco podemos hacer si no sabemos la estructura de tus datos. Saludos.
  24. 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