Sub test()
Dim rng As Range
Dim cel As Range
Set rng = ActiveSheet.Range("A1:A10")
For Each cel In rng
If IsNumeric(cel.Value) Then
cel.Value = cel.Value +...
Search:Type: Posts; User: Mohadin Search: Search took 0.02 seconds.
Results 1 to 3 of 3
|
Click Here to Expand Forum to Full Width |