glombardi

deathwatch respondió: A ver si probamos con una función hecha por nosotros y no con una que traiga excel, para evitarnos incompatibilidades Ahora, si me pudieras explicar para que sirve la función que escribiste, pues nunca la he usado

Elsa Matilde respondió: Pruébalo con estos cambios: For i = 11 To ultimafila If Left(Cells(i, 1), 9) = "MEXICOGAT" Then equipo = Worksheets("Hoja1").Cells(i, 1).Value On Error Resume next Cells(i, 4).Value = Application.WorksheetFunction.VLookup(equipo,...