Help! I am fairly new to using macros (I did most of my programming in FORTRAN, yikes!) and I need to do a task. I have a form in Word that I go through and fill out different fields in the table with text. I need to be able to copy each specific field to an excel spreadsheet so we can have a database of the info. So far I am just recording a macro and trying to modify it. I can get excel to open, then i am stuck. This is what I have so far:
Sub Testing()
'
' Testing Macro
' Macro recorded 9/21/2006 by xzkryj
'
Selection.HomeKey Unit:=wdStory
Selection.MoveDown Unit:=wdLine, Count:=2
Selection.MoveRight Unit:=wdCell
Selection.Copy
Set appEX = CreateObject("Excel.Application")
appEX.Visible = True
appEX.Workbooks.Open FileName:="D:/AE Service Session/macro.xls"
End Sub
It needs to take the value that it copied and paste it into the first blank cell in column A. Any ideas?
-Joe
Sub Testing()
'
' Testing Macro
' Macro recorded 9/21/2006 by xzkryj
'
Selection.HomeKey Unit:=wdStory
Selection.MoveDown Unit:=wdLine, Count:=2
Selection.MoveRight Unit:=wdCell
Selection.Copy
Set appEX = CreateObject("Excel.Application")
appEX.Visible = True
appEX.Workbooks.Open FileName:="D:/AE Service Session/macro.xls"
End Sub
It needs to take the value that it copied and paste it into the first blank cell in column A. Any ideas?
-Joe