Copying Selected Text Between Word Documents

Iluvatar343 · #1 06-04-2014, 06:39 PM

Hello all. I'm relatively new to VBA, so forgive me if the answer to this is obvious.

I'm working on organizing a series of trivia questions based on their category (ie Science, History, etc). I have word documents that contain ~50 questions each, and then several other word documents where I have been compiling the questions to date. What I'm trying to create is a macro that will copy highlighted text to the appropriate document based on a certain key press. For instance, if I came across a literature question, I'd like to be able to highlight the text (or have it detect the length of the question and select it for me, though I think I can do that) and press Ctrl+Shift+L to move it into the correct document, or do the same by pressing Ctrl+Shift+S for a science question.

Thanks in advance for your help.

jpb103 · #2 06-05-2014, 05:15 AM

Something like this might help to get you started:

Code:

Sub MovetoLit()
    Selection.Copy
    ChangeFileOpenDirectory "\\path\"
    Documents.Open FileName:= _
        "\\path\filename.docx", _
        ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
        PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
        WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
        wdOpenFormatAuto, XMLTransform:=""
        Selection.PasteAndFormat (wdPasteDefault)
End Sub

And just assign it to Ctrl+Shift+L when you create it. Do pretty much the same thing with the other macros (all you really need to change is the name of the macro, the key-binding and the path/filename for each category). Hope that helps!

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Copying text from Word 2010 into Outlook	Keith	Outlook	0	11-25-2011 02:30 PM
Mac Word - replace within selected text only.	bakerbj	Word	0	10-31-2011 11:47 PM
Importing Selected Text Into Word Document	Mooseman60	Word	1	10-06-2011 03:18 AM
Copying text from Excel to Word	Fossils13	Office	1	02-22-2010 08:39 PM
Copying tables between Word documents best practices?	dylane	Word Tables	0	12-18-2008 12:21 PM