Dante Amor

Pon aquí tu macro. Utiliza el icono para insertar código. También pon una imagen y con esa imagen te apoyas para explicar lo que necesitas. Lo que debe tener una imagen:

Tienes el problema de que en un año tienes 2 presidentes. Si en la celda D13 pones el año 1994, entonces TIENES 2 resultados: Cesar Gaviria y Ernesto Samper. La fórmula que te presenté resuelve la búsqueda sin necesidad de separar los años, pero...

Prueba lo siguiente: If Target.Count > 1 Then Exit Sub If Not Intersect(Target, Range("Y:Y,Z:Z,AB:AB,AC:AC")) Is Nothing Then Application.EnableEvents = False Select Case Len(Target.Value) Case Is = 3: Target.Value = Mid(Target.Value, 1, 1) & ":" &...

Puedes responder en el siguiente orden: 1. ¿El color en la celda está con Color de relleno o con formato condicional? 2. ¿Las celdas con color tienen datos o pueden estar vacías?

Prueba esto: Private Sub AddInfoSPARE_Click() Dim cont As Object For Each cont In Me.Controls If TypeName(cont) = "ComboBox" Then cont.List = Array(1, 4, 7, 10) End If Next End Sub

Pon esta fórmula: =INDICE(B3:B5,SUMAPRODUCTO((IZQUIERDA(A3:A5,4)+0<=D3)*(DERECHA(A3:A5,4)+0>=D3)*(FILA(B3:B5)))-FILA(A2)) Pero debes corregir los años, porque si pones el año 1985, tendrás 2 gerentes CARDENAS Y CASTRO. Revisa el siguiente ejemplo:

Una ves se abre el libro debo buscar un código contenido Ahí me perdí. Puedes explicarlo más despacio y con un ejemplo. Utiliza datos genéricos en tu ejemplo. Tienes 2 libros Por ende tienes 2 hojas Así que explica paso a paso, libroX. HojaX. CeldaX...

270-240=30 ¿Pero esos valores los tienes en celdas de una hoja de excel? ¿Y quieres una fórmula para validar si 270 menos 240 es igual a 30? Algo como esto: =SI(A2-B2=30, "Correcto", "Error")

Puedes responder en el siguiente orden: 1. Pon aquí la fórmula. 2. Realmente es una tabla, la creaste con la funcionalidad de excel, Menú, Insertar, Insertar Tabla. O solamente es un rango de datos en la hoja. 3. Un ejemplo de cómo está la celda...

Revisa si es lo que necesitas: Sub test() Dim ruta As String ruta = Environ("USERPROFILE") & "\Desktop\PEDIDOS\NO INFORMADOS\" & "NOINFORMADOSMIERES.xls" End Sub