Mi da errore su tutti i paste e pastespecial. Non capisco il perchè!!!codice:Sub Incolla() On Error GoTo GestioneErrori Worksheets("Ultima Rosa").Range("A52").PasteSpecial Format:="HTML", Link:=False, DisplayAsIcon:=False, NoHTMLFormatting:=True Worksheets("Ultima Rosa").Range("Y52:Y100").Cells.Value = "" Worksheets("Rosa Attuale").Range("A2:X50").Cells.Copy Worksheets("Ultima Rosa").Range("A2").Paste Worksheets("Ultima Rosa").Range("A52:X100").Cells.Copy Worksheets("Rosa Attuale").Range("A2").Paste Exit Sub GestioneErrori: MsgBox Err.Description End Sub