help, find copied cell
 

sub yyy()
Dim rngObj As Range
If Application.CutCopyMode = xlCopy Then
Set rngObj = Application.blinking ' my source(virtual)
MsgBox "the current address of copied cell is" & rngObj.Address
End If
End Sub

*** Sent via Developersdex http://www.developersdex.com ***

help, find copied cell
 

Excel doesn't have anything that would allow you to know the range that was
copied.



x taol wrote:

sub yyy()
Dim rngObj As Range
If Application.CutCopyMode = xlCopy Then
Set rngObj = Application.blinking ' my source(virtual)
MsgBox "the current address of copied cell is" & rngObj.Address
End If
End Sub

*** Sent via Developersdex http://www.developersdex.com ***

--

Dave Peterson