Dante Amor

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...

Prueba la siguiente en la celda D2 =Si(Contar.Si.Conjunto($A$2:$A$7;A2;$B$2:$B$7;"No*")+Contar.Si.Conjunto($A$2:$A$7;A2;$C$2:$C$7;"No*")=0;"Cumple";"No Cumple")

[Hola y bienvenido a TodoExpertos! En tu ejemplo tienes estos datos: "CAMPO GRANDE" en la celda P6 "3361" "OBERA" en la celda P8 "3360" ¿Quieres una fórmula que cambie el valor de la celda P6 a "3362" y que mantenga el valor en la celda P8? Eso no es...

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...

Try this Option Explicit ' Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function DrawMenuBar Lib "user32" (ByVal hWnd As Long) As Long Private...