Paco Alonso

Dante Amor respondió: O puedes utilizar lo siguiente sin ciclo: Sub Concatenar() Range("M8:M" & Range("J" & Rows.Count).End(3).Row).Formula = "=L8 & ""-"" & J8" End Sub

Dante Amor respondió: Podrías responder lo siguiente y ese orden: ¿Cuántos registros tienes en tu hoja? ¿Existen celdas vacías en la columna C? ¿Siempre los duplicados son 2 registros? Es decir, no hay casos en los que aparezca 3 veces el mismo datos

Dante Amor respondió: Aquí una macro con otro enfoque para considerar: Sub Contar_Numeros() Dim c As Range Dim dic As Object ' Range("B2:C" & Rows.Count).ClearContents Set dic = CreateObject("Scripting.Dictionary") For Each c In Range("A2", Range("A" & Rows.Count).End(3))...

Julián González Cabarcos respondió: Me apuesto tu dinero a que el error te lo da en TravelingDays. ¿Dónde está ese campo? Mira, como los idiomas no son lo mio te lo pongo en "cristiano". Si tengo la tabla Creo la consulta como Con lo cual al abrir la consulta Aunque parezca que las...