Dante Amor

En el Caso 1, ¿si hay 100 diferencias quieres 100 mensajes? ¿Cuántas filas hay para evaluar? ¿Quieres qué la macro funcione para los dos casos o quieres dos macros? ¿O quieres los resultados en alguna columna auxiliar?

Tus datos están como se muestra en la siguiente imagen: Y qué quieres hacer, es decir, según mi ejemplo, quieres buscar los datos de A en C o los datos de C en A, y lo más importante, te faltó mencionar, qué quieres de resultado. Si los datos no...

.End(3).Row o .End(xlUp).Row End(3) o End(xlup) es lo mismo, el 3 es una clave interna de VBA que sustituye a xlup. En VBA además de los parámetros en ocasiones también puedes utilizar números. Por ejemplo: Range("Database").AdvancedFilter...

Podrías hacerlo si poner la macro en un userform, por ejemplo: En el botón Inicio pones tu código de la siguiente manera: Private Sub CommandButton1_Click() 'Inicio tu código 'Supongo que tienes un ciclo 'Inicio ciclo 'instruciones ' DoEvents 'Fin...

Prueba la siguiente macro Sub SumaRangos() Dim a As Range, i As Long, f As Long, t As Long Application.ScreenUpdating = False For Each a In Range("A5", Range("A" & Rows.Count).End(3)).SpecialCells(xlCellTypeConstants).Areas i = a.Cells(1).Row f = i +...

¡Bienvenido a TodoExpertos! Podrías proporcionar lo siguiente: - Una imagen de cómo están tus clientes en tu Hoja, donde se muestre el cliente, los nombre de los archivos por cliente, las filas y las columnas de excel.- El correo de cada cliente.-...

Utiliza lo siguiente para renombrar la tabla de la celda activa Sub test() Dim sTabla As String sTabla = ActiveCell.ListObject.Name ActiveSheet.ListObjects(sTabla).Name = "Quiero este nombre" End Sub

Puedes escribir los siguientes datos: - ¿En cuál celda está la fórmula? - ¿Cómo se llama la tabla dinámica? - ¿Cómo se llame el campo a filtrar? - ¿La celda y la tabla dinámica están en la misma hoja? ¿Cómo se llama la hoja?

Lo que pasa que el contenido en un textbox o en un combobox o en un label es un texto y excel no te permite realizar ciertas operaciones matemáticas con textos. Por eso esta línea te envía error: If CCT.Value <= CC2 Then Estás comparando un valor con...

Tome el valor de la celda actual en Hoja "LISTADO PROVEEDORES" Prueba lo siguiente: Sub RevisarSubcuentas() Dim variable As String Application.ScreenUpdating = False ' Sheets("LISTADO PROVEEDORES").Select variable = ActiveCell.Value '...