Ciao a tutti ho trovato il seguente codice in rete che farebbe proprio al caso mio se solo funzionasse nel senso inverso
Il seguente codice copia dal foglio 2 i valori contenuti nella riga 10 e li copia nella riga del foglio1
a secondo del numero di riga riportato in A1
Sub prova()
'
Ur = Sheets("foglio1").Range("A1").Value
Sheets("foglio2").Rows("10:10").Copy
Sheets("Foglio1").Cells(Ur, "A").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End Sub
Sarebbe per me fantastico se potesse copiare i valori contenuti nella riga riportata in A1 ( foglio 1
dalla colonna A : F del foglio 1 e copiarli nel foglio 2 nella riga 10 partendo dalla colonna F
Pensavo che fosse stato sufficiente invertire PasteSpecial e Copy ma non sono riuscito a risolvere :-(
UN GRAZIE A TUTTI
Simone