How to transfer data from Word forms to Excel
- Thread starter mclamb
- Start date
Mclamb
Firstly welcome to the Chandoo.org Forums
You will notice I have changed the title of your post.
It is important to use a descriptive title which aids searching as well as focuses people attention on areas where they maybe able to help
Please read the 3 sticky green posts at the main forum screen for more info to help you at Chandoo.org Forums
Firstly welcome to the Chandoo.org Forums
You will notice I have changed the title of your post.
It is important to use a descriptive title which aids searching as well as focuses people attention on areas where they maybe able to help
Please read the 3 sticky green posts at the main forum screen for more info to help you at Chandoo.org Forums
Hi mclamb,
Firstly, welcome to this forum and we glad to have you here.
I do agree with SirJB7 regarding uploading the word file which will,indeed, help us to get a better picture of your requirement.
Meanwhile, you can have a look at the following excel macro which will copy the contents of whatever Word document is active in your system and paste its contents into whatever Excel worksheet is active.
However, in Excel, you need to set a reference to the Word object library (e.g. Microsoft Word 12.0 Object Library)....Go to Tools...Reference...select the reference for word object library available in your system.
Here is the code(paste it in new code module):
Sub GetContentsFromWord()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim wordApp As Word.Application
Set wordApp = Word.Application
Dim wordDoc As Word.Document
Set wordDoc = wordApp.ActiveDocument
wordDoc.Range.Copy
ActiveSheet.Paste Destination:=ActiveSheet.Range("A1")
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub
Please note that the code I have provided, may not be the ultimate one for your exact requirement but, meanwhile it will give you an idea how it may work.
Regards,
Kaushik
Firstly, welcome to this forum and we glad to have you here.
I do agree with SirJB7 regarding uploading the word file which will,indeed, help us to get a better picture of your requirement.
Meanwhile, you can have a look at the following excel macro which will copy the contents of whatever Word document is active in your system and paste its contents into whatever Excel worksheet is active.
However, in Excel, you need to set a reference to the Word object library (e.g. Microsoft Word 12.0 Object Library)....Go to Tools...Reference...select the reference for word object library available in your system.
Here is the code(paste it in new code module):
Sub GetContentsFromWord()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim wordApp As Word.Application
Set wordApp = Word.Application
Dim wordDoc As Word.Document
Set wordDoc = wordApp.ActiveDocument
wordDoc.Range.Copy
ActiveSheet.Paste Destination:=ActiveSheet.Range("A1")
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub
Please note that the code I have provided, may not be the ultimate one for your exact requirement but, meanwhile it will give you an idea how it may work.
Regards,
Kaushik