execute operation with a selection

[firuz]

I wanna be able to select some cells, and then execute some operation regarding each cell in the selection for example set each cell content uppercase. I manage to write a code for setting any activecell content as uppercase, but fail to do it for a selection.

[Al Chara]

Try the following code by putting it in the code for your worksheet:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$F$4:$G$4" Then
Target.Value = UCase(Target.Text)
End If
End Sub

Subsitute "$F$4:$G$4" with your range, formatted the same way.

[Juan Pablo González]

You can use a for each statement, like

Dim Cll as Range
For each Cll in Selection
'do my stuff with the Cell "Cll"
Next Cll

[firuz]

Thanx Juan Pablo,

It helped me for 100%. I'am not professional in programming, so I ve been searching for this facility for several months.