Доступ к тексту примечания ячейки excel в vb.net

Chigurk
Дата: 01.02.2010 11:18:14
Здравствуйте, ребята!

Вопрос у меня дурацкий, но разобраться самостоятельно не смог. Мне необходимо получить текст примечания, которые добавляются к ячейкам на листе рабочей книги excel. В объектной модели excel примечанию соответствует класс Microsoft.Office.Interop.Excel.Worksheet.Range.Comment. Как получить текст уже созданного примечания - совершенно не понятно. Вообще, передо мной стоит задача переноса примечаний из одного листа на другой, но
If inp_sheet.Cells(inp_row_num, inp_col_num).comment IsNot Nothing Then
   out_sheet.Cells(out_row_num, inp_col_num).Addcomment( _
   inp_sheet.Cells(inp_row_num, inp_col_num).comment.text)
end if


такая хрень не канает. И, естесственно,

If inp_sheet.Cells(inp_row_num, inp_col_num).comment IsNot Nothing Then
   out_sheet.Cells(out_row_num, inp_col_num).Addcomment( _
   inp_sheet.Cells(inp_row_num, inp_col_num).comment.ToString)
end if


не канает тоже. MDSN не помог. Может быть, подскажет кто-нибудь чего-нибудь дельное?
sews
Дата: 01.02.2010 11:54:49
Chigurk,

Здесь



 out_sheet.Cells(out_row_num, inp_col_num).Addcomment( _
   inp_sheet.Cells(inp_row_num, inp_col_num).comment.Text)
Chigurk
Дата: 01.02.2010 13:02:39
sews,

Спасибо! Ничего нового я не узнал, но задачу решить помогло))
Chigurk
Дата: 01.02.2010 16:28:49
out_sheet.Cells(out_row_num, OUT_TAB_COMMON_SHEET_BSNUM_COL + i).AddComment( _ inp_sheet.Cells(inp_row_num, INP_TAB_ORD_NUM_COL + i).comment.text)

мб поможет кому-то