jrgces respondió:
No está demasiado claro qué es lo que intentas conseguir, pero si se trata de poner en D20 su propio valor y, unido a él, el de E20, y así con todo el rango D20:E35500, el código podría ser: Sub prueba() Dim lngFila As Long Application.ScreenUpdating...