Hi
I need to read the Comment Text in the first workbook and place the
comment in the second workbook without opening the first workbook
I expet the macro running in the second workbook.
I have been trying this
sub ( conn()

a = ExecuteExcel4Macro("'\[first.xls]sheet'!" & Cells(1,
1).Comment.Text(, , xlR1C1))

workbook(second).sheets("Sheet1").range("A1").valu e = a

end sub

anyone have an idea

Thanks

Kurt

Why not just open the first workbook and copy & paste/special/comments??
--
Gary''s Student - gsnu2007k


"kurthh" wrote:

Hi
I need to read the Comment Text in the first workbook and place the
comment in the second workbook without opening the first workbook
I expet the macro running in the second workbook.
I have been trying this
sub ( conn()

a = ExecuteExcel4Macro("'\[first.xls]sheet'!" & Cells(1,
1).Comment.Text(, , xlR1C1))

workbook(second).sheets("Sheet1").range("A1").valu e = a

end sub

anyone have an idea

Thanks

Kurt