Copy and paste entire word document into excel spreadsheet

Hey everyone

I was wondering if someone could guide me to the proper resources or help me to come up with a macro for the following:

Cell 1	Cell 2	Cell 3
Hyperlinked Text (Word Doc)	Full Text of Word Doc (Shrunk to Fit)

Basically I have columns of hyperlinks to word documents and in the adjacent column, I'd like to have the copied and pasted content of those documents in the adjacent column, shrunk to fit.

This would immensely help me because right now I am clicking the link, Ctrl+A, Ctrl+C the word document, closing the document, then Ctrl+V-ing each and every time.

I tried to record a macro (in excel) but it seems that the code doesn't recognize the select all/copy functions done in the word document. I've also created a shortcut macro (in Word) just to simplify the select all/copy functions under one shortcut but it doesn't save me enough time.

Thank you!!

anyone? at least tell me it isn't possible.

This is what I get, how can I get the macro to detect my select all/copy functions in the word document before pasting it into the adjacent cell in excel?

Sub Macro4()
'
' Macro4 Macro
'
' Keyboard Shortcut: Ctrl+q
'
Range("C3").Select
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
Range("D3").Select
ActiveCell.FormulaR1C1 = _
"ARTICLE TEXT......."
"ARTICLE TEXT......."
"ARTICLE TEXT......."
"ARTICLE TEXT......."
"ARTICLE TEXT......."
"ARTICLE TEXT......."
"ARTICLE TEXT......."
Range("D3").Select
With Selection
.HorizontalAlignment = xlGeneral
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = True
.ReadingOrder = xlContext
.MergeCells = False
End With
End Sub

Can anyone help me?

some "forum"...