Copy all items from listbox and paste to word document

subrota · #4 05-06-2019, 04:07 AM

Paul Edstein
Thanks for your instruction. I did try and try and at last I got the code as your instruction.

Greg Maxey: According Paul Edstein's instruction and your code make me easy to understand me. Hope I will go forward with your helping hand.

Sometimes some easy thing is going complex. I hope it will be more easier day by day. Wish for me.

Sorry for my poor English

Thanks and Thanks.
Subrota

Code:

Dim mySym As String
Dim i As Long
Dim strClipText As DataObject
Dim strInputText As String

For i = 0 To ListBox2.ListCount - 1
mySym = mySym & ListBox2.List(i)
mySym = mySym & vbCrLf
Next


Set strClipText = New DataObject
strInputText = mySym

strClipText.SetText strInputText
strClipText.PutInClipboard

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
copy and paste Outlook Email bodytext to Word document	eYos	Word VBA	1	08-25-2015 09:41 PM
How can I let my users copy and paste into a protected Word Document?	moden9999	Word	4	02-02-2015 05:39 PM
Moving Selected Items from a Multiselect Listbox on a userform to a bookmark in Word	marksm33	Word VBA	3	01-15-2015 07:55 PM
Getting mult resps. selected in listbox to concatenate & paste at a bookmark in Word	marksm33	Word VBA	3	01-15-2015 05:59 PM
copy from web and paste in a word document : no images are shown	Ron Wolpa	Word	5	09-11-2013 02:16 AM