Dim t As Range
Set t = ActiveCell


"Bob Barnes" wrote in message
...
I had 2 other threads here yesterday and found answers, but we still need.
Need to code for the ActiveCell in the 1st line of
Private Sub SeeDiff() .. below.

TIA - Bob

Snippets from the 2 other threads from yesterday...
I'm going to run this code in Workbook_Open instead of Worksheet_Change
(it
does work in Worksheet_Change). We've decided the Excel file will be
essentially only a "snapshot" as all data will be maintained in the Access
Database.

So..Workbook_open will include code for each of the 72 Cells, IE...
Range("DNine").Select
Call SeeDiff
Range("ENine").Select
Call SeeDiff
....

Private Sub SeeDiff()
Set t = Application.Caller <---No "Target" here...how do I set the
"ActiveCell"?
....I tried Application.Caller & Application.ThisCell suggested in this
thread by Chip...
...but that didn't work............................