Vba Excel 2003-Creare un range per copiare valori e formule

Question

Buongiorno a tutti,

ho questa istruzione  che copia da una cartella aperta ad un'altra dei valori con un range così costruito :

miorange = ("C" & n & ":N" & n)

wkinput.Worksheets(nome_foglio).Range(miorange).Value = wkoutput.Worksheets(nome_foglio).Range(miorange).Value

funziona benissimo, senza dover attivare prima una cartella per fare un copia , e poi l'altra per fare un incolla.

Ma se volessi copiare sia le formule che i valori ? Sempre con il metodo fileinput.range = fileoutput.range .

Grazie a tutti e buon week

Answer 1

               

Ma se volessi copiare sia le formule che i valori ? Sempre con il metodo fileinput.range = fileoutput.range .

Un esempio:

    wk1.Worksheets("Foglio1").Range("A1:C3").Copy

    wk2.Worksheets("Foglio1").Range("A1").PasteSpecial

    Application.CutCopyMode = False

E' sufficiente indicare la prima cella dove vai ad incollare.

Occhio però!

Se i riferimenti non sono assoluti nelle formule che vai a copiare e se le celle di destinazione non sono le stesse, potrebbero esserci delle sorprese.

Answer 2

Grazie . Funziona

Le celle di destinazione sono le stesse, sul discorso riferimenti assoluti , boh ... la metterò come regola

Ok.

Grazie per il riscontro.

Ciao, buon lavoro e alla prossima.

Answer 3

Grazie . Funziona

Le celle di destinazione sono le stesse, sul discorso riferimenti assoluti , boh ... la metterò come regola