Excel VBA code to copy a specific string to clipboard

by

EDIT – MSForms is deprecated, so you should no longer use my answer. Instead use this answer: https://stackoverflow.com/a/60896244/692098

I leave my original answer here only for reference:

Sub CopyText(Text As String)
    'VBA Macro using late binding to copy text to clipboard.
    'By Justin Kay, 8/15/2014
    Dim MSForms_DataObject As Object
    Set MSForms_DataObject = CreateObject("new:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")
    MSForms_DataObject.SetText Text
    MSForms_DataObject.PutInClipboard
    Set MSForms_DataObject = Nothing
End Sub

Usage:

Sub CopySelection()
    CopyText Selection.Text
End Sub

More Related Contents:

  1. Get text from clipboard using GetText – avoid error on empty clipboard
  2. I am confused on purpose of using “Not”, also on matching of “If” criteria, code says “is nothing” else run code for “MsgBox”
  3. Detect whether Excel workbook is already open [closed]
  4. How to add a custom Ribbon tab using VBA?
  5. In Excel VBA, how do I save / restore a user-defined filter?
  6. Way to run Excel macros from command line or batch file?
  7. Transpose multiple columns to multiple rows with VBA
  8. ExecuteExcel4Macro to get value from closed workbook
  9. Using VBA in Excel to Google Search in IE and return the hyperlink of the first result
  10. VBA – Write all possible combinations of 4 columns of data [duplicate]
  11. Remove duplicates from array using VBA
  12. 2 ways for “ClearContents” on VBA Excel, but 1 work fine. Why? [duplicate]
  13. How to automatically insert a blank row after a group of data
  14. Get File Path (ends with folder)
  15. Email a single attachment from folder of files each to a different person
  16. Bad data selection using VBScript , on date field values
  17. Excel error 1004 “Unable to get …. property of WorksheetFunction class” appearing inconsistently
  18. Sending object array to variant works before August 2019 Windows update, but fails after update
  19. Find last row in range
  20. How can I install/use “Scripting.FileSystemObject” in Excel 2010 for MAC?
  21. Excel VBA User Defined Function that counts cells with conditional formatting
  22. How to add an attachment to an email using VBA in Excel
  23. Get Timezone Information in VBA (Excel)
  24. Excel is calculating a formula with a VBA function as an error unless it is re-entered
  25. Excel VBA Run-time error ’13’ Type mismatch
  26. ThisWorkbook.FullName returns a URL after syncing with OneDrive. I want the file path on disk
  27. Importing Excel spreadsheet data into another Excel spreadsheet containing VBA
  28. using a sheet in an excel user defined function
  29. Excel VBA For Each Worksheet Loop
  30. How does one restore default case to a variable in VBA (Excel 2010)?

Leave a Comment