Simple Macro - I think... Copy - Paste on Click
Thanks Dave. It worked out perfect.
"Dave" wrote:
Hi Scott,
Try this
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If ActiveCell.Column = 1 Then
Sheets("Sheet2").Range("A1") = ActiveCell
Sheets("Sheet2").Select
End If
End Sub
You may have to unwrap the first line if it gets wrapped by this window.
Regards - Dave
|