Gerson Pineda

Hola Te adjunto un opción en el adjunto Saludos Almacenar Fechas en Matriz_GP.xlsm

Hola! Si no tienes Excel 365, tu subo una otra alternativa con formulas Saludos EXTRAER REGISTROS ENTRE DOS FECHAS.xlsx

Hola Garland y bienvenido Utiliza cualquiera de estas dos formulas =BUSCARV(A2,$A$2:$C$18,3,0)-$C2 =AGREGAR(14,6,$C$2:$C$18/($A$2:$A$18=$A2),1)-$C2 Saludos

Hola Ruben Usar SUMARSI con 20mil registros no me parece para que Excel se ralentice, a menos que sea por otras mas razones, pe: si tu archivo esta lleno de mas hojas, con demasiadas formulas [entre ellas volátiles], referencias a columnas completas y formato condicional, puede ser lo que ocasiona tu problema Además para realizar una TD, necesitas tener tus datos en forma tabular o como una especie de BD, pero este no es tu caso Te adjunto una opción con VBA, solo presionas ctrl+k y listo Saludos SumarSi Evaluate VBA_GP.xlsm

Hola Prueba por aqui https://signup.microsoft.com/create-account/signup?products=CFQ7TTC0L3PB:0016&fSkuId=powerbi&fOfferId=03FB6305-216A-410F-856B-FD6142D94604&ru=https:%2F%2Fapp.powerbi.com%2F&pbi_source=webpurchase&scenarioID=Allotments&cmpid=pbiweb-pricing&ali=1 Saludos!

Hola Puedes usar el grafico tornado, búscalo y agrégalo desde la galería [App Source] de Power BI, como Tornado Chart Saludos

Hola No estoy seguro, pero es posible que esos usuarios necesiten instalar la aplicación en su PC En ondrive empresarial es mas simple compartir una carpeta y configurar con quienes se comparte y listo Saludos

Es que no habías mencionado que estabas usando un evento, o puedes ser opción para ti, lo que yo te mande fue pensando que estas usando un formulario o algún botón Saludos a todos!

Esa pantalla aparece cuando cierras una instancia de Excel con VBA Respecto a tu duda, pues debes investigar un poco mas como proteger el libro y su estructura y por otro lado deshabilitar el Ribbon, tal como te lo menciona @avalencia Saludos a ambos!

Disculpa tienes razón, entonces deja .Save, pero incluye al principio y fin del procedimiento Application.DisplayAlerts = False Application.EnableEvents = False todo tu codigo Application.DisplayAlerts = true Application.EnableEvents = true Saludos

Despues de ese paso: Application.Quit Saludos

Hola Prueba usar esta linea ActiveWorkbook.Close savechanges:=True o ActiveWorkbook.Close 1 Saludos

Hola! Visor, tal como te lo hemos comentado por aquí, la declaración de variables es la mejor practica en VBA, especialmente cuando los proyectos a desarrollar son grandes en proceso o complejos en su funcionamiento, que yo no las haya declarado todas no significa que esta bien [ya tu ya en archivo real debes hacerlo], pero si son funcionales, dado que VBA, asigna automáticamente su tipo, las va ejecutar siempre y cuando esa variable [no declarada] sea aplicada al tipo de dato correcto, por eso es que ves que en mi caso, no hay errores de tipo Respecto a SET, es recomendable siempre hacerlo, especialmente si ese objeto será utilizado muchas veces dentro del procedimiento o modulo actual, ya en tu archivo lo haces... en resumen declararlas y activarlas es lo recomendable Respecto al tema de .Copy no soy muy amigo de ese método, pero si es útil con el filtro avanzado [dado que esta herramienta es de las mas potentes de Excel], y cuando no se tiene alcance para trabajarlo en memoria o matriz, como te lo hice en el segundo archivo Ese error te lo describe claramente VBA pero técnicamente, ya en español sencillo, estas copiando un rango y quieres pegarlo en rango de tamaño distinto, asumo que ese error te lo esta provocando el contador "cont" o "ufila", revisa ambos Saludos

Holas! Otras 2 alternativas Saludos Obtener o extraer coincidencia_GP.xlsx

Hola @jkoroso Para lograr ese proceso, se necesita combinar ambas tablas por ID y luego dinamizar por la columna de código por afectado Revisa el adjunto y nos comentas Saludos! Transformar -combinar_dinamizar- power query_GP.xlsx

Hola Armando Puedes utilizar la formula siguiente Actual YEAR(NOW()) Anterior YEAR(NOW())-1 Saludos

Adjunto otra alternativa Saludos a ambos! Extraer segun delimitador_GP.xlsm

Hola! Otra alternativa podría ser así: Private Sub UserForm_Initialize() With Hoja2 vuf = .Range("A" & .Rows.Count).End(xlUp).Row .Range("H5:H" & vuf).AdvancedFilter 1, , , 1 For Each c In .Range("H5:H" & vuf).SpecialCells(12) ComboBox1.AddItem c.Text Next ComboBox1.RemoveItem 0 Me.TextBox1 = ComboBox1.ListCount .ShowAllData End With End Sub Saludos a todos!

A ver asi: With Application hoy = VBA.CDate(VBA.Date) mday = .WeekNum(hoy, 2) fmes = .EoMonth(hoy, -1) fec = VBA.Format(mday, "dd/mm/yyyy") uday = .WeekNum(fmes, 2) mes_ = VBA.Month(hoy) resul = VBA.IIf(mes_ = 1, mday, mday - uday + 1) End With

Un leve cambio: resul = VBA.IIf(mday <= 5, mday, mday - uday + 1) Saludos

Para que no quede en el tintero, otra opción podría ser así With Application hoy = VBA.Date mday = .WeekNum(hoy, 2) fmes = .EoMonth(hoy, -1) uday = .WeekNum(fmes, 2) resul = mday - uday + 1 End With Saludos a todos!

Si te vas al explorador del proyecto VBA, en el árbol de módulos, puedes ver la hoja "aux" Te adjunto otro método, trabajando con una matriz y como te lo comenté al inicio, trasladando los registros visibles Saludos! Importar datos de otro libro.zip

Hola! Para fin de mes, prueba con Application.EoMonth Saludos a todos!

Visor He tenido un tiempito hoy, así que envío mi versión, revísalo y nos comentas Saludos a ambos! Importar datos de otro libro_GP.zip