riporto
10-10-2011, 15:54
Premetto che ne so pochissimo di VBA, sto iniziando solo ora con qualche riga di codice e un bel libro che mi aiuta.
Ho bisogno di fare in modo che alla scrittura di un dato in un foglio lo stesso dato venga replicato, in posizione diversa, nell'altro foglio.
Tutto funziona bene con il seguente codice:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Range("ResumeItem"), Target) Is Nothing Then
With Range("ResumeItem")
.Copy Destination:=Sheets("RADIANT").Range("RadiantItem")
End With
End If
End Sub
L'unico problema è che con questo codice viene copiata anche la formattazione del testo, cosa che io voglio evitare, come faccio???
p.s. ho visto che esiste la funzione ValuesOnly() che dovrebbe fare al caso mio, ma non so come integrarla. :cry:
Ho bisogno di fare in modo che alla scrittura di un dato in un foglio lo stesso dato venga replicato, in posizione diversa, nell'altro foglio.
Tutto funziona bene con il seguente codice:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Range("ResumeItem"), Target) Is Nothing Then
With Range("ResumeItem")
.Copy Destination:=Sheets("RADIANT").Range("RadiantItem")
End With
End If
End Sub
L'unico problema è che con questo codice viene copiata anche la formattazione del testo, cosa che io voglio evitare, come faccio???
p.s. ho visto che esiste la funzione ValuesOnly() che dovrebbe fare al caso mio, ma non so come integrarla. :cry: