雙擊Excel的某個單元格便會自動複製單元格里的數據內容到剪貼板。
工具/原料
excel(小編使用版本為 MS office2013)
第一部分:為什麼要這樣做?
首先,說明一下為什麼要實現雙擊單元格複製其內容。
有過複製excel數據至word、文本文檔或者其他軟件經厲的朋友應該曉得,當選擇單元格(不敲入進行框選)使用Ctrl+C複製後粘貼到第三方軟件時數據內容後面會有空格或回車符。如圖小編將單元格數據Ctrl+C後 ,Ctrl+V到word,後面生成了回車符。
使用雙擊單元格複製其內容的方法進行粘貼操作後,粘貼到word的數據保持原樣不會生成回車符。
PS:當然,點進單元格框選裡面的內容複製就不會生成空格或者回車符了。
第二部分:教程
在打開的excel工作表上直接鍵盤按下Alt+F11呼出VBA編輯器。如圖,雙擊打開該工作表目錄下的“thisworkbook”。
然後在代碼輸入框裡粘貼以下代碼:
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
If Target = "" Then Exit Sub
With CreateObject("new:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
.SetText Target.Value
.PutInClipboard
End With
Cancel = True
End Sub
粘貼後點擊關閉即可。
如圖,點擊保存,保存後關閉VBA編輯器即可。
回到Excel表格,雙擊單元格,現在雙擊並不會敲進單元格了,而是執行的複製。雙擊後粘貼到word或者文本文檔等的應用看看吧。
如果工作完成不需要雙擊複製功能了怎麼辦?
很簡單,回到“thisworkbook”,選中代碼全部刪除後關閉,再進行一次保存就可以了。