Israel Cassales

Por lo general el libro de ejemplo lo debe proporcionar usted de ser posible. AyudaExcel.xlsx

Sin libro de ejemplo y en base a lo explicado creo que puedo participar con la siguiente idea. Si no es lo adecuado, le recomiendo subir su libro de ejemplo con los resultados esperados, aunque intentó plasmarlo en su consulta, de verdad aporta más saber qué resultado exacto desea usted. De ser así, es posible que algún miembro avanzado o Maestro le aporten algo adicional o más específico.

Sin presentación o libro de ejemplo en la consulta es complicado ayudar, porque en base a lo explicado cuando se elimina una celda que está siendo referenciada por otra, Excel no podrá encontrar la referencia y por lo tanto te muestra ese error. Lamento no aportar otra cosa, aunque si mejoras la consulta es posible que algún Maestro o miembro avanzado del foro pueda aportar algo adicional.

Puedes evitarte complicaciones usando la función MINUTO() es más simple. Si aun necesitas formato personalizado, para evitar que Excel confunda las mm entonces le tienes que restar la parte de la hora para que solo queden los minutos, pero el formato se debe mantener como h:mm, es decir, Excel va a intentar poner la hora, pero con la fórmula determinas la hora 0 =A1-HORA(A1). Nota: Pero si tenemos que poner fórmula volvemos a la recomendación inicial. También es posible que algún maestro o miembro avanzado del foro aporten algo distinto. Hay que estar al pendiente.

Sin libro de ejemplo y si es que lo entendí bien podría recomendar aplicar a tu macro los siguientes cambios: Set NuevoLibro = Workbooks.Add: Este comando crea un nuevo libro de Excel y lo asigna a la variable NuevoLibro. Hoja10.Copy Before:=NuevoLibro.Sheets(1): Este comando copia la Hoja10 al nuevo libro que se acaba de crear. La hoja se coloca antes de la primera hoja del nuevo libro. NuevoLibro.SaveAs Filename:=RutaArchivo: Este comando guarda el nuevo libro (que ahora tiene solo la Hoja10) en la ubicación especificada por RutaArchivo. NuevoLibro.Close SaveChanges:=False: Este comando cierra el nuevo libro. El argumento SaveChanges:=False significa que no se guardarán los cambios si se realizan cambios adicionales al libro después de guardar y antes de cerrar. Debe quedarte algo así: Sub control2558() Application.ScreenUpdating = False Dim I As Integer I = 4 While Hoja10.Cells(I, 102) <> "" Hoja10.Cells(6, 82) = Hoja10.Cells(I, 102) Dim NombreArchivo, RutaArchivo As String NombreArchivo = "Hoja Control " & Hoja10.Cells(I, 102) RutaArchivo = ActiveWorkbook.Path & "\" & NombreArchivo & ".xlsm" Dim NuevoLibro As Workbook Set NuevoLibro = Workbooks.Add Hoja10.Copy Before:=NuevoLibro.Sheets(1) NuevoLibro.SaveAs Filename:=RutaArchivo NuevoLibro.Close SaveChanges:=False I = I + 1 Wend MsgBox ("Proceso generado con éxito") Application.ScreenUpdating = True End Sub Espero que te funcione como esperas.

Hi, Sin archivo de ejemplo quedan eventos a la suposición, por lo tanto la sugerencia que te puedo ofrecer es limitada en base a lo expresado y a las imágenes mostradas. Si tu captura de registros es de arriba abajo de manera consecutiva y sin espacios en blanco una idea que es posible te ayude es contar los registros superiores para validar que los totales de "Kevin" sean los mismo que los de "Cerrado", no importará si dice en "revisión" o no, porque parece que lo importante es que los registros superiores estén completos con ambos criterios, es decir; tampoco debería dejarte registrar si hay un "Kevin" con el concepto de ticket vacío. Ese resultado lo puedes encontrar con las diferentes funciones de CONTAR y usarlas en la validación de datos, considerando siempre lo de "arriba" y no caer en una referencia circular. Es lo que puedo aportar, si subes el libro tal vez uno mismo, algún miembro avanzado o Maestro del foro puedan ayudarte con algo más elaborado a lo que buscas.

Con gusto, concluyo mi participación en este tema.

Saludos totales, este tema me recuerda a este: formula de distintos porcentajes Y en base a esa experiencia no me lo tome a mal pero parece que aún le cuesta darse a explicar, así que tomando en cuenta su descripción... de que no importan los demás cálculos si esa X está ahí, entonces solo hay que anteponerla como criterio a todo. =SI(B4="X",25,SI(O(B2="SI",B3="si"),15,25-2*(A1<10^6))) Es con lo que podría participar en su consulta. Maestro @Victor7 gusto en coincidir con usted nuevamente, saludos cordiales.

Ojalá pudieras compartir cómo quedo al final, puede ser útil para futuros visitantes. Concluyo mi participación en la consulta.

Bueno, ahora he entendido esto: =MAX(INDIRECTO("$D$"&FILA(F14)):D16) ejemplo ayudaexcel.xlsx

Lo lamento, no entendí el ejemplo. Tal vez algún miembro o Maestro puedan aportar algo más específico. Me parece que lo buscas se puede lograr con =INDIRECTO() y si por si sola no te devuelve la referencia la puedes anidar con =DIRECCION()

Me da gusto que te haya servido, concluyo mi participación en la consulta.

Sin libro de ejemplo solo puedo participar en tu consulta con código pensado de manera general. Private Sub ComboBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) Dim i As Integer Dim existe As Boolean existe = False ' Verificar si el elemento ya existe en la lista For i = 0 To ComboBox1.ListCount - 1 If ComboBox1.List(i) = ComboBox1.Text Then existe = True Exit For End If Next i ' Si el elemento no existe, agregarlo a la lista If Not existe Then ComboBox1.AddItem ComboBox1.Text End If End Sub Este código agrega un nuevo elemento al combobox cuando el usuario escribe algo y presiona ‘Enter’. Espero te sea de ayuda, sino comparte el ejemplo y es posible que algún miembro o Maestro te brinde ayuda más específica.

Hola, Me da gusto por usted, entiendo que lo resolvió por su cuenta pero sería una buena idea (si está de acuerdo claro está) compartir con los posibles lectores futuros cómo lo ha hecho. Sería un gran aporte.

Estas en la sección de fórmulas y hacer lo que pides con fórmulas según lo que yo sé no es posible, porque interviene un desplazamiento de las filas, así que lo más cercano a lo que buscas es con VBA. Te dejo un libro de ejemplo, pero recuerda que debes de habilitar las macros para que funcione con lo que planteas Libro1 - Ayuda Excel.xlsb

Entiendo que si desbloqueas las macros debería funcionar sin problema. Sí, aunque dependerá de tu experiencia para editar la sentencia. Usa el ejercicio para hacer pruebas y ve compartiendo los resultados o complicaciones que vayas teniendo y ya sea uno mismo o algún Maestro en el foro te ira ampliando la ayuda de ser posible.

Comparto esa lógica.

Saludos cordiales a ambos. El libro adjunto debe ser capaz de hacer lo que describes como ejemplo, este lo puedes usar para iniciar con lo que pretendes hacer, haz pruebas y comparte tus alcances y desafíos. Para que aparezca al calendario le das doble clic en A1, la fecha que selecciones se escribirá en A1 y al dar clic en cualquier otra celda se ocultará el calendario. Para repetir, vuelve a hacer doble clic en A1 AYUDA EXCEL.xlsb

Hola, lamento no poder ayudar más si no subes un libro de ejemplo y es aquí dentro de la sección de forma general. Por otro lado, tengo entendido que el envío de información personalizado no está permitido, aunque el foro está preparado para brindar ese tipo de ayuda si lo requieres. Agrego al tema a los administradores que estoy seguro que podrán brindarte la orientación necesaria porque de manera individual no puedo ayudarte porque se presta a malas interpretaciones. @Abraham Valencia @Gerson Pineda

Con gusto, y me alegra saber que en algo te pude ayudar. Concluyo mi participación en el tema.

Más que incompleta los argumentos están mal expresados, en su forma simple lo primero que se indica es lo que va a buscar, y ahí tiene un rango. Para una mejor ayuda necesita subir su libro con un ejemplo de lo que requiere para evitar ambigüedades, así algún miembro o Maestro avanzado del foro le podrán brindar una ayuda más específica. Para buscar en dos hojas primero tiene que indicar qué hacer al terminar de buscar en una, y por otro lado qué hacer si lo que está buscando se encuentra en las dos, ¿eso puede ocurrir? Si no, entonces no hay tanto problema. Detalle mejor su consulta y vera que la ayuda que recibirá es mejor.

Hola, sin libro de ejemplo y en base a lo explicado uno pensaría que el problema lo tienes en cómo se maneja el formato de la fecha en tu código cuando lo llama el formulario, es decir; se interpreta como un número en lugar de una fecha. Sin código que leer, es posible que debas modificar a algo como esto en tu macro: Dim FechaComoTexto As String FechaComoTexto = Format(TuFecha, "dd/mm/yyyy") Ahí el resultado, FechaComoTexto, debería ser la fecha en el formato “dd/mm/yyyy”. lo que dice Tu fecha es la variable que contiene la fecha que quieres dar formato. Bajo estas condiciones, es lo que puedo aportar a este tema.

Me da gusto que hayas conseguido lo que buscas. Concluyo mi participación en el tema.

Hi, Viendo el libro y asumiendo que las referencias son fijas me parece que con usar =CONCATENAR() para los códigos y =SUMAR.SI() para el resultado, sería suficiente para conseguir lo que estás buscando. Podrías discriminar algunos resultados de error que se pueden anticipar con alguna función lógica como =SI() Haz una prueba y de ser posible ve compartiendo tus avances o tus dudas, seguramente encontrarás ayuda en el foro, ya sea de algún miembro o algún Maestro avanzado. Si la prueba se te complica, entonces el ejemplo que compartes hazlo con datos llenos para que la ayuda que posiblemente recibas sea más específica.

Gracias por el aporte @cucoland