Jump to content

eugeniocol

Members
  • Posts

    541
  • Joined

  • Last visited

  • Days Won

    2

Reputation Activity

  1. Thanks
    eugeniocol reacted to Antoni in Copiar rango cada x Filas ???   
    Sub CopiarMúltiple() Application.ScreenUpdating = False Range("C3:I7").Copy For x = 12 To 4998 Step 9 Range("C" & x).PasteSpecial xlPasteAll Next Application.CutCopyMode = False End Sub  
×
×
  • Create New...

Important Information

Privacy Policy