VBA Code for clean all data from ms word document

macropod · #1 05-15-2014, 04:49 PM

Why are you bothering with this? Surely you could just create a new, empty document?! Still, if that's what you want, try:

Code:

Sub CleanData()
ActiveDocument.Content.Delete
End Sub

egyp7 · #2 05-16-2014, 04:41 AM

thank for answer macropod, i already find way clean document data and paste my content. my solution look like :

Code:

Sub doc_clean_paste()

Word.ActiveDocument.Range.Select
    Selection.WholeStory
    Selection.Delete Unit:=wdCharacter, Count:=1
    
   Dim doc As Word.Document
   Set doc = ThisDocument 
   
   doc.Range.InsertParagraphAfter
   doc.Range.InsertAfter "Text Added at " & Time
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
VBA Code to take data from a table in word document and place it in a summary table	VBLearner	Word VBA	1	03-09-2014 08:42 PM
importing Access data to a Word document	WayneCusack	Word VBA	2	12-24-2012 12:26 AM
Help Plz! Link Excel data to Word document	cory_0101	Office	1	09-27-2012 07:15 PM
How do you view the source code in a Word 10 web document?	provlima	Word	2	05-25-2012 01:12 PM
Error Code 5453 Word has finished searching the document	Charles Kenyon	Word VBA	2	05-17-2012 11:18 AM