You need an event macro for this if you want conversion whne you have entered
the US currency
Put this code in a sheet module
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Intersect(Range("A2"), Target) Is Nothing Then Exit Sub
Application.EnableEvents = False
Target.Value = Target.Value * 1.22738
Application.EnableEvents = True
End Sub
Replace the * value with the current rate
cell in question is A2, adapt to fit
Regards,
Peo Sjoblom
"Nevi" wrote:
Hi,
I am trying to convert Canadian dollars into USD in the same cells where the
values are entered, i.e. I do not want to insert another column where I can
write a formula. How can i do that?
|