Copy Destination



  • Copy Destination
    di alfrimpa data: 10/09/2015 23:15:19

    Ciao a tutti

    Come si può sostituire la sottostante istruzione per copiare i soli valori e non le formattazioni?

    Alfredo
     
    Range("A1").Copy Destination:= Range("B1")
    
    Va bene scrivere
    
    Range("A1").Copy
    Range("B1").PasteSpecial(xlValues)
    
    Oppure si può integrare la prima aggiungendo qualcosa per copiare i soli valori?






  • di Marius44 data: 11/09/2015 00:04:13

    Ciao Alfredo
    Per quanto ne so io la Destination non accetta alcuna limitazione: incolla TUTTO.
    Quando scrivi il codice seguente:

    Range("G4").Copy Destination:=Range("G5").PasteSpecial

    se dai uno spazio appare una casella che ripete Copy[(Destination)] quasi come un avvertimento perchè non puoi scrivere altro. Se aggiungi una " ( " ti appare l'elenco delle diverse xlPaste ed anche PasteSpecial[(Paste As XLPasteType = xlPasteAll)] come a voler significare che puoi SOLO INCOLLARE TUTTO.

    Spero di essere smentito (ed imparo qualcosa).
    Ciao,
    Mario



  • di alfrimpa data: 11/09/2015 00:26:03

    Ciao Mario

    Credo proprio che non sarai smentito

    Ho fatto qualche ricerca in rete e sembra proprio che Destination non accetti proprio alcuna limitazione.

    Ho utilizzato la seconda istruzione che ho detto prima e funziona perfettamente.

    Alfredo





  • di Vecchio Frac data: 11/09/2015 08:12:43

    Io per la mia esperienza confermo che la strada è PasteSpecial(xlValues) [togliere poi con CutCopyMode = False il tratteggio della modalità Copia] a meno di non intraprendere una strada più tortuosa con le API :)





  • di Vecchio Frac data: 11/09/2015 08:14:19

    Oppure con l'assegnazione diretta:
    Range("G5") = Range("G4")