Dante Amor

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?

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:

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

Tienes que crear una macro y ponerla en el libro1. Después de hacerle cambios a la celda, deberás presionar un botón y ejecutar la macro. No dices si el libro2 está abierto o cerrado. Pero vamos a suponer que está abierto, entonces pon esta macro en...

Prueba lo siguiente: Sub guardar() Dim ruta As String, arch As String ' ruta = "C:\Users\kike\Desktop\PEDIDOS\COPIAS\" ruta = "c:\trabajo\" arch = Sheets("Entradores").Range("E3").Value & " " & Format(Date, "dd-mm-yyyy") Sheets.Copy...

Pon la siguiente fórmula en la celda A2 y copia hacia abajo =IZQUIERDA(C2)&CONTAR.SI($C$2:C2,C2) Nota: Cambia en al fórmula la coma ( , ) por punto y coma ( ; ) si es lo que utilizas en las fórmulas.

H o l a G.E C y bienvenido a TodoExpertos. Puedes explicar con ejemplos lo que necesitas.

"Pero solo quiere que me copie las celdas que tengan números igual o mayor que cero, pero no las de texto, las pegue en la misma celda de la otra hoja dejando las de texto vacías" Puedes explicar eso con ejemplos

C7:C10 y la celda A13:A25 No son el mismo número de celdas! Te paso la macro y tú la ajustas. Sub Copiar_Valores() Dim sPath As String Dim sh As Worksheet Dim l2 As Workbook ' Set sh = ActiveSheet ' With...

Respuesta: A