Varying selected cells returning value always to the same cell
Hi,
You don't provide too many clues about ranges but this may get you started.
Right click your sheet tab, view code and paste the code below in. If you
select a numeric cell in the range a1 - a100 the value will show up in B1
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count 1 Or IsEmpty(Target) Then Exit Sub
If Not Intersect(Target, Range("A1:A100")) _
Is Nothing And IsNumeric(Target.Value) Then
Range("B1").Value = Target.Value
End If
End Sub
Mike
"jk" wrote:
I would like to click or select a cell and the value in that cell show up in
another cell. Or in other words anytime I select a cell the value of that
cell will shop up always in the same cell. I could click on 20 different
cells (one at a time) but no matter what cell I click on or have selected
that value will show up in the same cell I chose it to. Something like a
@cell selected, @cell pointer, +cell selected, +cell pointer, etc. I want to
use this in conjunction with an @vlookup. So instead of keying in the number
I am trying to do a lookup on I can just select a cell with that number in it.
|