Skip to main content

How to copy current document or open files in word?

When you are editing a document, you may need to copy and paste current document or all open files into another folder, or to enclose current document / all open documents into an email as attached files in Word. This tutorial will show you some tricky ways to copy current document or open files in word without closing all those documents

Copy current document with shortcut and right click in Word

Copy current document with VBA

Copy current document or open files with Kutools for Word

Recommended Productivity Tools for Word

Kutools for Word: Integrating AI 🤖, over 100 advanced features save 50% of your document handling time.Free Download

Office Tab: Introduces the browser-like tabs to Word (and other Office tools), simplifying multi-document navigation.Free Download


arrow blue right bubble Copy current document with shortcut and right click in Word

Office Tab: Brings tabbed interfaces to Word, Excel, PowerPoint...
ot word middle ad 100
Enhance your workflow now.      Read More       Free Download

The general method to copy the current document is pressing Ctrl + A to select the whole document, and the right click to select Copy.


arrow blue right bubble Copy current document with VBA

You can copy the current document with VBA.

Step 1: Press Alt+F11 to open the VBA window in Word;

Step 2: Click Module in Insert tab, and insert the VBA code into Module window;

Step 3: Click Run button to apply the VBA code (or press F5);

The VBA code of copy current file in Word

Sub CopyFile()
Dim fso
Dim file As String, sfol As String, dfol As String
file = "test.xls" ' change to match the file name
sfol = "C:\" ' change to match the source folder path
dfol = "E:\" ' change to match the destination folder path
Set fso = CreateObject("Scripting.FileSystemObject")
If Not fso.FileExists(sfol & file) Then
MsgBox sfol & file & " does not exist!", vbExclamation, "Source File Missing"
ElseIf Not fso.FileExists(dfol & file) Then
fso.CopyFile (sfol & file), dfol, True
Else
MsgBox dfol & file & " already exists!", vbExclamation, "Destination File Exists"
End If
End Sub


arrow blue right bubble Copy current document or open files with Kutool for Word

The Kutool for Word’s Copy Current File tool provide you a very handy way to copy current documents or all open documents in Word. With one click, you can copy current document or open files quickly.

Kutools for Word, a handy add-in, includes groups of tools to ease your work and enhance your ability of processing word document. Free Trial for 45 days! Get It Now!

doc-copy-current-document-1

Click Copy Current File to copy current document. Moreover, you can click Copy All Open Files to copy all open documents. If you have copy the current document or all open documents successfully, you can see or at the left-bottom of the Word window as:

Tip: After copying the documents with this utility, you can quickly enclose it as attached file in your E-mail just by pasting it.

Note: Before you copy the current document or all open documents, the current document and all open documents must be already saved.

For more detailed information about Copy Current File of Kutools for Word, please visit: Copy Current File feature description.


Best Office Productivity Tools

Kutools for Word - Elevate Your Word Experience with Over 100 Remarkable Features!

🤖 Kutools AI Assistant: Transform your writing with AI - Generate Content  /  Rewrite Text  /  Summarize Documents  /  Inquire for Information based on Document, all within Word

📘 Document Mastery: Split Pages  /  Merge Documents  /  Export Selection in Various Formats (PDF/TXT/DOC/HTML...)  /  Batch Convert to PDF  /  Export Pages as Images  /  Print Multiple Files at once...

Contents Editing: Batch Find and Replace across Multiple Files  /  Resize All Pictures  /  Transpose Table Rows and Columns  /  Convert Table to Text...

🧹 Effortless Clean: Sweap away Extra Spaces  /  Section Breaks  /  All Headers  /  Text Boxes  /  Hyperlinks  /  For more removing tools, head to our Remove Group...

Creative Inserts: Insert Thousand Separators  /  Check Boxes  /  Radio Buttons  /  QR Code  /  Barcode  /  Diagonal Line Table  /  Equation Caption  /  Image Caption  /  Table Caption  /  Multiple Pictures  /  Discover more in the Insert Group...

🔍 Precision Selections: Pinpoint specific pages  /  tables  /  shapes  /  heading paragraphs  /  Enhance navigation with more Select features...

Star Enhancements: Navigate swiftly to any location  /  auto-insert repetitive text  /  seamlessly toggle between document windows  /  11 Conversion Tools...

👉 Want to try these features? Kutools for Word offers a 60-day free trial, with no limitations! 🚀
Free Download     Read More     Buy Now
 
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations