Emily
14-06-2008, 09.24.52
:wall: Avrei bisogno di trovare il modo per formattare il risultato di una formula contenuto in una cella. Cerco di spiegarmi meglio, allegando due righe di codice come esempio:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("E1").FormulaR1C1 = "=RC[-4]"
'Nella cella E1 viene immessa la formula "=A1", quindi qualsiasi cosa io scriva in A1, questa appare anche nella cella E1.
With Range("E1").Characters(Start:=1, Length:=2).Font
.ColorIndex = 5 'Scritta in Blu
End With
'Vorrei che i primi due caratteri della cella E1, che contiene la formula =A1, avesse i due caratteri iniziali di colore Blu.
End Sub
Ora se io nella cella A1 digito 123456 e premo Enter, nella cella E1 mi appare 123456 tutto di colore Blu e non solo i primi due numeri 12, dove sbaglio?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("E1").FormulaR1C1 = "=RC[-4]"
'Nella cella E1 viene immessa la formula "=A1", quindi qualsiasi cosa io scriva in A1, questa appare anche nella cella E1.
With Range("E1").Characters(Start:=1, Length:=2).Font
.ColorIndex = 5 'Scritta in Blu
End With
'Vorrei che i primi due caratteri della cella E1, che contiene la formula =A1, avesse i due caratteri iniziali di colore Blu.
End Sub
Ora se io nella cella A1 digito 123456 e premo Enter, nella cella E1 mi appare 123456 tutto di colore Blu e non solo i primi due numeri 12, dove sbaglio?