ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   New Users to Excel (https://www.excelbanter.com/new-users-excel/)
-   -   how to copy on double-click the cell value to Clipboard (https://www.excelbanter.com/new-users-excel/12765-how-copy-double-click-cell-value-clipboard.html)

cyrille

how to copy on double-click the cell value to Clipboard
 
Hello everybody,
My question is in the title... I just want to be able to automatically
copy the text content of one selected cell (selected by double-click)
into the Clipboard. Can you help me?
I tried something like the following, but it doesn't work.
Thanks in advance
Cyril

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
On Error Resume Next
If ActiveCell.Value < "" Then
ActiveCell.Value.Copy
End If
Cancel = True
End Sub

pep819

Hi Cyrille,

Just double click, then click ctrl and c. To paste the data, click ctrl and
v. This works on almost any Windows application.

"cyrille" wrote:

Hello everybody,
My question is in the title... I just want to be able to automatically
copy the text content of one selected cell (selected by double-click)
into the Clipboard. Can you help me?
I tried something like the following, but it doesn't work.
Thanks in advance
Cyril

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
On Error Resume Next
If ActiveCell.Value < "" Then
ActiveCell.Value.Copy
End If
Cancel = True
End Sub


pep819

After double clicking to access the cell contents, Click ctrl and c. To
paste click ctrl and v. This works in almost any Windows application.

"cyrille" wrote:

Hello everybody,
My question is in the title... I just want to be able to automatically
copy the text content of one selected cell (selected by double-click)
into the Clipboard. Can you help me?
I tried something like the following, but it doesn't work.
Thanks in advance
Cyril

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
On Error Resume Next
If ActiveCell.Value < "" Then
ActiveCell.Value.Copy
End If
Cancel = True
End Sub



All times are GMT +1. The time now is 03:40 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com