Condividi:        

Copia e incolla solo valori

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Copia e incolla solo valori

Postdi Statix » 21/01/12 17:16

Ciao a tutti,
non riesco a ricordarmi,il copia e incolla solo valori
in un foglio ultima riga disponibile.
con questa macro va bene ,ma vorrei incollare solo i valori.

Codice: Seleziona tutto
Sub Copia_Manuale()
 Sheets("Manuale").Select
    Range("AA3:CF3").Copy Destination:=Workbooks("Archivio").Sheets("Archivio").Range("A" & Rows.Count).End(xlUp).Offset(1, 0)
               
       
    Sheets("Manuale").Select

End Sub
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Sponsor
 

Re: Copia e incolla solo valori

Postdi Flash30005 » 21/01/12 17:39

Fai una registrazione macro del range da copiare e incolli solo valori nel range destinazione
fermi la macro
leggi il codice e lo adatti alla tua macro

ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Copia e incolla solo valori

Postdi Statix » 21/01/12 18:57

Ciao Flash30005,
questo l'ho già fatto,il problema è che devo incollare i dati solo valori,
nel foglio Archivio ,ultima riga disponibile.
è in questa macro che non riesco ad inserire

Codice: Seleziona tutto
Range("AA3:CF3").Copy Destination:=Workbooks("Archivio").Sheets("Archivio").Range("A" & Rows.Count).End(xlUp).Offset(1, 0)



Codice: Seleziona tutto
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False


Codice: Seleziona tutto
Sub Macro2()
'
' Macro2 Macro
'

'
    Sheets("Manuale").Select
    Range("AA3:CF3").Select
    Selection.Copy
    Sheets("Archivio").Select
     
    Range("A4945").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("Manuale").Select
End Sub
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Copia e incolla solo valori

Postdi Statix » 21/01/12 19:18

Ok ho risolto in questo modo.
grazie

Codice: Seleziona tutto
Sub Manuale()

    Sheets("Manuale").Select
    Range("AA3:CF3").Select
    Selection.Copy
    Sheets("Archivio").Select
    UR = Range("A" & Rows.Count).End(xlUp).Select
   
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("Manuale").Select
End Sub
Statix
Windows 10,
Office 2013,
Statix
Utente Senior
 
Post: 1287
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Copia e incolla solo valori

Postdi Anthony47 » 22/01/12 00:51

Oppure
Codice: Seleziona tutto
Range("AA3:CF3").Copy
Workbooks("Archivio").Sheets("Archivio").Range("A" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial _
   Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19196
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Copia e incolla solo valori":


Chi c’è in linea

Visitano il forum: Marius44 e 50 ospiti